היי,
האם מישהו מכם יודע איך לכתוב פקודת execute עבור תכנית מקומפלת CLOSEFNCTRANS
שמשמשת לצורך רישום פקודות יומן זמניות בספרים?
מצורף קוד שניסיתי להריץ ונכשל (כשניסיתי להריץ את התנועות באופן ידני הן התקבלו ללא שגיאה ככה שאם הסינטקס היה נכון זה היה אמור לעבוד).
תודה רבה לכל מי שיעזור לי לפתור את זה לפני יום ראשון 🙂
:FNC = '';
SELECT SQL.TMPFILE INTO :FNC FROM DUMMY;
LINK FNCTRANS TO :FNC;
GOTO 99 WHERE :RETVAL <= 0;
INSERT INTO FNCTRANS
SELECT * FROM FNCTRANS ORIG
WHERE FNCNUM IN('T6','T7') ;
GOTO 99 WHERE :RETVAL <= 0;
EXECUTE CLOSEFNCTRANS 3, :FNC, 'CLOSEFNC' ;
UNLINK FNCTRANS;
LABEL 99;
מציין: אין מנות בפקודת היומן או בכלל המערכת שבה אני בודק.
ניסיתי גם עם משתנה FL, ניסיתי להכניס 0, ניסיתי לאפס משתנה FL = 0 (נקודותיים של משתנה) ועוד :)