דוח שגיאות – למשוך את LINE של GENERALLOAD

אתה צריך לכתוב דו"ח אשר יציג את הנתונים ולהציג אותו כאשר יש תקלה בממשק. נניח שיש לך קוד כזה

EXECUTE INTERFACE 'XXXX_COPYMANYCUST', SQL.TMPFILE, '-L', :$.GEN;
GOTO 100 WHERE NOT EXISTS (SELECT 'X'
FROM ERRMSGS WHERE USER = SQL.USER AND TYPE = 'i');
EXECUTE WINACTIV '-R', 'INTERFACEERR';
LABEL 100;

במקום להפעיל את דו"ח הסטנדרטי INTERFACEERR, תוכל להפעיל את הדו"ח שלך, בצורה

EXECUTE WINACTIV '-R', 'XXXX_INTERFACEERR', 'GENERALLOAD', :$.GEN

בצורה הזו, אתה מעביר את הטבלה המלונקקת לדו"ח. החיתוך מול ERRMSGS נעשה באמצעות SQL.USER ו-TYPE = 'i' .

תסתכל בsdk כתוב די ברור מה נשמר איפה.

אם אתה מסתבך אחפש לך דוגמא.

יחד עם זאת, יש שתי בעיות מחשבתיות עם הדפסה מ-GENERALLOAD:
1. כיון שכל טעינה משתמשת בשדות שונים, יש צורך להציג את כל השדות מהטבלה (ויש הרבה!). אמנם בדרך כלל יש שימוש ב-INT1 ו-TEXT6, אבל לא ניתן לקבוע בוודאות.
2. הנתונים בטבלה אינם תמיד בר קריאה לבני אדם: הטבלה יכולה להכיל מספרים פנימיים של מפתחות ראשיות, כמו מספר פנימי של פריט וכד'.

בנוסף, הדפסת השורות שלא נטענו לא תסביר מדוע השורות לא נקלטו.

מה ההבדל בין השימוש ב-STKERR לעומת הפקת הדו"ח INTERFACEERR? אני משער שיתנו את אותם הנתונים.