השתלת "קישום חם" לתוך מכתב שנוצא בתוך הפעלה

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

  • Post
    אלמוני
    אורח
    אני מנסה ליצור מכתב חכם אשר נשלח ממסך "יומן משימות", אם כי השאלה כללית יותר ואינה מוגבלת אך ורק למסך הזה.

    אני יוצר מכתב באמצעות ממשק אשר מכניס נתונים לתוך מסך MAILBOXSEND. בכותרת המכתב אני כולל שדות מהמסך CUSTNOTESA ובמלל המסך אני מכניס שורות מ-CUSTNOTESTEXT (מה שמופיע במסך בן "תקציר המשימה". עד כאן הכל עובד טוב.

    חסר לי בגוף המכתב הפניה למשימה עצמה, כדי שהנמען יכול ללחוץ עליה ולהגיע בחזרה אל המשימה. הגדרתי הודעה משימה ,
    ומכניס ל-PAR1 את מספר המשימה, אך במכתב עצמו אני מקבל את המלל כפי שהוא, ללא ההפניה למסך.

    האם יש למישהו רעיון איך אני יכול להשתיל "קישור חם" לתוך המלל?

    הנה הקוד הרלוונטי:

    :PAR1 = ITOA (:GLOB_CN);
    SELECT ENTMESSAGE ('CUSTNOTESA', 'F', 5002) INTO :GLOB_TEXT FROM
    DUMMY;
    INSERT INTO GENERALLOAD (LINE, RECORDTYPE, TEXT)
    VALUES (2, '2', :GLOB_TEXT);
    INSERT INTO GENERALLOAD (LINE, RECORDTYPE, TEXT)
    VALUES (3, '2', '');
    INSERT INTO GENERALLOAD (LINE, RECORDTYPE, TEXT)
    SELECT 3 + SQL.LINE, '2', TEXT
    FROM CUSTNOTESTEXT
    WHERE CUSTNOTE = :GLOB_CN;
    EXECUTE INTERFACE 'GLOB_CNSENDMAIL', SQL.TMPFILE, '-L', :GEN;

    כאמור, מספר המשימה מופיע אך לא כקישור.

מוצגות 4 תגובות – 1 עד 4 (מתוך 4 סה״כ)
  • Replies
    yitzchok
    משתתף
    IL
    ENTMESSAGE יתן לך טקסט בלבד

    כדי לקבל לינק במייל שלך תצטרך ליצור html בעצמך ולהכין בו בעצמך את הלינק

      [ בבקשה לא לשלוח הודעות פרטיות במערכת - אני לא קורא אותן ]
    yitzchok
    משתתף
    IL
    ולכן תרצה 2 הודעות
    טקסט עד הלינק ולאחר הלינק ואת הלינק נסח ישר בקוד (ממילא מספר המשימה מגיע ממשתנה)
      [ בבקשה לא לשלוח הודעות פרטיות במערכת - אני לא קורא אותן ]
    אלמוני
    אורח
    ניסיתי אך הסתבכתי עם ה-HTML.
    אלמוני
    אורח
    בסוף הסתדרתי. צריך לזכור שיש רוחב מוגדר לשדה TEXT ב-GENERALLOAD לכן מוטב לשמור קטעים קצרים כל פעם במקום לכתוב את כל פקודת ה-HTML במכה אחת. עקרונית אני גם צריך לשלוף את שם הסביבה ולשתול אותו בתוך המחרוזת


    SELECT MAX (LINE) INTO :GLINE FROM GENERALLOAD;
    INSERT INTO GENERALLOAD (LINE, RECORDTYPE, TEXT)
    VALUES (:GLINE + 1, '2', '

    ');
    INSERT INTO GENERALLOAD (LINE, RECORDTYPE, TEXT)
    VALUES (:GLINE + 2, '2', STRCAT (
    '', ' המישמ'));
    INSERT INTO GENERALLOAD (LINE, RECORDTYPE, TEXT)
    VALUES (:GLINE + 3, '2', STRCAT ('', ITOA (:GLOB_CN),
    '
    '));
    INSERT INTO GENERALLOAD (LINE, RECORDTYPE, TEXT)
    VALUES (:GLINE + 4, '2', '

    ');

    אני מקווה שלא אצטרך לבצע זאת שוב בזמן הקרוב!

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