UPDATE

בניתי פרוצ' אשר מעדכנת את כל השורות של הזמנות רכש אשר יש להם מס' מכולה נבחר.
העשים 3 עדכונים: תאריך לפי קלט, סטטוס לפי קלט, תאריך של היום.
קלט: מס' מכולה-שדה טקסט, תאריך- שדה תאריך, סטטוס- שדה בחירה מתוך סטטוסים לשורות הזמנת רכש.
לינקקתי את טבלת סטטוסים לשורת הזמנת רכש.

לאחר הריצה, כל התעודות עודכנו בתאריכים אך רק התעודה הראשונה עודכנה בסטטוס.
זו הפרוצדורה:
LINK PORDISTATUSES POS TO :$.STS;
ERRMSG 1 WHERE :RETVAL <= 0; UPDATE PORDERITEMS SET DUEDATE = :$.DAT WHERE CONT = :$.CNT; :STAT = 0; SELECT POS.PORDISTATUS INTO :STAT FROM PORDISTATUSES POS WHERE PORDISTATUS <> 0;
UPDATE PORDERITEMSA SET PORDISTATUS = :STAT
WHERE ORDI IN
(SELECT ORDI FROM PORDERITEMS WHERE CONT = :$.CNT);
UPDATE PORDERITEMS SET FIXDATE = SQL.DATE
WHERE CONT = :$.CNT;