קודם נגדיר את הפרוצדורה אשר תופעל ע"י הטריגר. נקרא לה "XXXX_TEST" והיא מקבלת פרמטר אחד, PAR, מסוג FILE. להלן קוד הפרוצדורה
LINK STACK TO :$.PAR;
WRNMSG 1 WHERE :RETVAL <= 0;
SELECT ITOA (ELEMENT) FROM STACK TABS 'R:/1.TXT';
UNLINK STACK;
כיון שלא רציתי לעשות משהו אמיתי עם הנתון, תוכן הטבלה המלונקקת נכתב אל קובץ חיצוני.
הטריגר נראה כך:
SELECT SQL.TMPFILE INTO :STK FROM DUMMY;
LINK STACK TO :STK;
INSERT INTO STACK (ELEMENT)
VALUES (:$.ID);
EXECUTE WINACTIV '-P', 'XXXX_TEST', 'STACK', :STK;
UNLINK AND REMOVE STACK;
הפקודה EXECUTE WINACTIV מתעודת בהקשר של משלוח אוטומטי של דו"ח אל קבוצת נמענים והרחבתי את הרעיון.
אני מודה שקשה לי לחשוב על שימוש אמיתי בטכניקה הזו: אשמח ללמוד.