זה פשוט לא עובד אז החלטתי לא ללכת על המלאי מהמסך הרב חברתי וללכת על המלאי שבמחסנים אז רשמתי:
SELECT :$.PARTNAME INTO :GLOBAL.PRTNM FROM DUMMY;
SELECT :GLOBAL.PRTNM FROM DUMMY TABS ADDTO 'C:/TMP/GPRT.TXT';
:GLOBAL.ABAL = :GLOBAL.KBAL = 0;
ENV 'alli';
SELECT (WARHSBAL.BALANCE / 1000) INTO :GLOBAL.ABAL
FROM PART, WAREHOUSES, WARHSBAL
WHERE PART.PARTNAME = :GLOBAL.PRTNM
AND WARHSBAL.PART = PART.PART
AND WARHSBAL.WARHS = WAREHOUSES.WARHS
AND WARHSBAL.ACT -5
AND WARHSBAL.WARHS 0
AND WARHSNAME = '1';
SELECT (WARHSBAL.BALANCE / 1000) FROM PART, WAREHOUSES, WARHSBAL
WHERE PART.PARTNAME = :GLOBAL.PRTNM
AND WARHSBAL.PART = PART.PART AND WARHSBAL.WARHS = WAREHOUSES.WARHS
AND WARHSBAL.ACT -5 AND WARHSBAL.WARHS 0
AND WARHSNAME = '1' TABS ADDTO 'C:/TMP/ABAL.TXT';
ENV 'kis';
SELECT (WARHSBAL.BALANCE / 1000) INTO :GLOBAL.KBAL
FROM PART, WAREHOUSES, WARHSBAL
WHERE PART.PARTNAME = :GLOBAL.PRTNM
AND WARHSBAL.PART = PART.PART
AND WARHSBAL.WARHS = WAREHOUSES.WARHS
AND WARHSBAL.ACT -5
AND WARHSBAL.WARHS 0
AND WARHSNAME = 'Main';
SELECT (WARHSBAL.BALANCE / 1000) FROM PART, WAREHOUSES, WARHSBAL
WHERE PART.PARTNAME = :GLOBAL.PRTNM
AND WARHSBAL.PART = PART.PART AND WARHSBAL.WARHS = WAREHOUSES.WARHS
AND WARHSBAL.ACT -5 AND WARHSBAL.WARHS 0
AND WARHSNAME = 'Main' TABS ADDTO 'C:/TMP/KBAL.TXT';
:$.SARA_ENVBALANCE = :GLOBAL.ABAL + :GLOBAL.KBAL;
משהו מוזר קורה. כאשר אני מכניסה מק"ט אז המק"ט משתנה למק"ט אחר ואז אני יורדת שורה ומוסיפה שוב פעם את אותו מק"ט אך הפעם הוא לא נמחק לי אך רושם "רשומת האב נמחקה"
והכמויות מתעדכנות נכון
.
