الناتج مش راضى يظهر مش عارف ليه

[yousef mohamed]

الكود دة انا عملتة بس عايز النتيجة تظهر فى خانة معينة هى L1

declare
s number;
d number;
 
begin
 
 
select sum(drug_d.count) 
into s 
from drug_d 
where patient_code=:DRUG_BILL.patient_code  
AND ITEM=:DRUG_D.ITEM
 ;
select sum (P_RET_D.count) 
into d 
from  P_RET_D  
where patient_code=:DRUG_BILL.patient_code  
AND ITEM=:DRUG_D.ITEM;
 
:L1 := D - S;  
 
END;

مع العلم انا عاملة على تريجر when- validate-item

تم تعديل 31 أغسطس 2015 بواسطة ميسم الكرام

[eslam elbyaly]

جرب السيليكتات دي شوفها بتجيب ايه في السكول بلس .

هتلاقى واحدة فيهم بتجيب null ولا حاجة

[yousef mohamed]

فعلا فيهم واحد null طيب اعمل nvlدى هيبقى الحل دى معنى كلام حضرتك مش كدة

تم تعديل 28 أغسطس 2015 بواسطة scdc2003

[eslam elbyaly]

مثلا

[yousef mohamed]

كتبت الكود كلة من جديد بالشكل دة وبردة مش عايز يطلع الناتج

declare
s number;
d number;

begin

if :global.operation=1 then
select sum(NVL(drug_d.count,0))
into s
from drug_d
where patient_code=:DRUG_BILL.patient_code
AND ITEM=:DRUG_D.ITEM
;
select sum (NVL(P_RET_D.count,0))
into d
from P_RET_D
where patient_code=:DRUG_BILL.patient_code
AND ITEM=:DRUG_D.ITEM;
if d= null then d:=0;
else
if s= null then s:=0;
end if;
:L1 := s-d;
end if;
end if;
END;

تم تعديل 31 أغسطس 2015 بواسطة ميسم الكرام

[eslam elbyaly]

ما طبيعي
مفيش حاجة اسمها لو كذا بيساوي NULL ‎ والسلكتات بتعتك بايظة جرب بتاعت ال NULL هتلاقيها بطلع زيرو

[yousef mohamed]

كلامك صح ياباشا والحمد لله لقيت الحل بمساعدتك

declare
s number;
d number :=0;

begin
if :global.operation=1 then
select NVL(sum(drug_d.count),0)
into s
from drug_d
where patient_code=:DRUG_BILL.patient_code
AND ITEM=:DRUG_D.ITEM
;
select NVL(sum (P_RET_D.count),0)
into d
from P_RET_D
where patient_code=:DRUG_BILL.patient_code
AND ITEM=:DRUG_D.ITEM;
:L1:= S-D;


END IF;
END;