הפעלת פרוצדורה מטריגר ממסך

פורומים אפיון ופיתוח פריוריטי הפעלת פרוצדורה מטריגר ממסך

  • Post
    שלום לכולם,
    האם מישהו פיתח / נתקל בהפעלת פרוצדורה מטריגר במסך ואם כן מה הסינטקס ?
    תודה רבה.
מוצגות 3 תגובות – 1 עד 3 (מתוך 3 סה״כ)
  • Replies
    אלמוני
    אורח
    בכמה מקומות בטריגרים של מסך ORDERS מופיעה הפקודה EXECUTE INTERFACE

    בכמה פרוצדורות שאני כתבתי (אמנם לא טריגרים) מופיע EXECUTE SONRAW

    SERIAL/BUF13 מכילה את הפקודה המענינת EXECUTE MAKEKITITEMS

    שתי הדוגאמות האחרונות משתמשות בתכניות חיצוניות ולא פרוצדורות. אני לא מכיר דוגמא של הפעלת פרוצדורה "פנימית" בתוך טריגר.

    אלמוני
    אורח
    התשובה באה לי אתמול באמצע הלילה!

    קודם נגדיר את הפרוצדורה אשר תופעל ע"י הטריגר. נקרא לה "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 מתעודת בהקשר של משלוח אוטומטי של דו"ח אל קבוצת נמענים והרחבתי את הרעיון.

    אני מודה שקשה לי לחשוב על שימוש אמיתי בטכניקה הזו: אשמח ללמוד.

    תודה רבה , הסתדרתי
מוצגות 3 תגובות – 1 עד 3 (מתוך 3 סה״כ)
  • יש להתחבר למערכת על מנת להגיב.