NoamN

אני מנסה להדפיס תשובה אבל האתר כל פעם דוחה את מה שאני כותב. תיעדתי לעצמי את התליך באנגלית לפני שנה באתר https://progpitfalls.blogspot.com/. צריך לחפש את mail merge

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

תפלטי את הנתונים אל אקסל, כך נתגבר על המבנה הטבלאי. תהפכי את שדה התנאי ל"נראה" לפני שאת יוצרת את הפלט, כך הצבע (כמספר) יופיע בשורות. אולי כך יהיה ניתן לראות את הסיבה לצביעת ערכים לא נכונים.

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

למען האמת, גם אני בעבר כתבתי קוד שיעדכן סטטוס ישירות, בלי ממשק,  ואף ירשום את שינוי הסטטוס בלוג, כך לא ניתן לסמוך על שורה בלוג הסטטוסים כהוכחה שהסטטוס שונה באמצעות ממשק.

אני לא יודע איך את שומרת את הנתונים בין שלב הפרוצדורה לבין שלב הדו"ח, אבל נניח שאת משתמשת ב-STACK8 כאשר KEY1 מכיל את התאריך ו-KEY2 מכיל את מספר ההזמנה. תכניסי רשומה לתוך STACK8 עבור כל יום, אם או בלי הזמנות (זאת אומרת, במקרה כזה, KEY1 = 22/12/21 ו-KEY2 = 0).

כך תקבלי את הימים ללא הזמנות.

יהיה יותר מסובך אם את משתמשת ב-STACK4 : מן הסתם KEY יהיה מספר ההזמנה. תשמרי ימים ללא הזמנה עם KEY = -DATE, אבל זה יסבך מאד את הדו"ח.

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

למטה מופיע קוד להפעלת POST-INSERT במסך CINVOICES (זאת אומרת, הנספחים מועתקים מתעודת משלוח ולא הזמנה, אבל הרעיון אותו הדבר)

DECLARE @GPIX CURSOR FOR
SELECT EXTFILENAME, EXTFILEDES
FROM EXTFILES
WHERE IV = :$.DOC
AND TYPE = 'D';
OPEN @GPIX;
GOTO 300 WHERE :RETVAL <= 0
;
SELECT COUNT (*) INTO :COUNT
FROM EXTFILES
WHERE IV = :$.IV
AND TYPE = 'I';
LABEL 100;
FETCH @GPIX INTO :EF, :ED;
GOTO 200 WHERE :RETVAL <= 0;
:COUNT = :COUNT + 1;
INSERT INTO EXTFILES (IV, TYPE, EXTFILENUM, EXTFILENAME,
EXTFILEDES, CURDATE, UDATE, USER, EI_COND)
VALUES (:$.IV, 'I', :COUNT, :EF, :ED, SQL.DATE8, SQL.DATE,
SQL.USER, 'Y');
LOOP 100
;
LABEL 200;
CLOSE @GPIX;
LABEL 300;

עבור השדה הריק, תשתמש ב"רווח קשה" של HTML,

&nbsp; (זה הפוך: ה-& צריך להיות בצד שמאל וה-; בצד ימין. נדמה לי שהוא נמצא ב-WWWDOC

אני משער שתוכל לקבוע את הרוחב על ידי אותה מחרוזת כמה פעמים שנדרש

מוטב לשכוח ממה שכתבתי קודם.

נניח שבשלב 10 לפרוצדורה יש פרמטר FLG שמוגדר סוג CHAR, אורך 1. במסך הבן "פרמטרים לפרוצדורה – הרחבה" מסומן Y בשדה "סוג". ההגדרות הללו יתנו שדה בוליאני.

עכשיו לערך המחדלי: בשלב קודם לפרוצדורה (נניח שלב 9), שם ישות SQLI, תרשום בגוף השלב

:DEFAULT = 'Y'

(כרגיל יוצא משובש כאן: צריך להיות משתנה כמו DEFAULT עם נקודותיים בצד שמאל שלו, כאשר הערך שלו Y). עכשיו בשלב 10, בשורה של FLG יש לרשום את :DEFAULT (שם המשתמש שהוגדר קודם) בשדה "ערך". כיון שהערך מגיע ממשתנה שמוגדר מראש, הערך הזה יהיה מחדלי.

יש דוגמא (אמנם לא שדה בוליאני אבל זה לא משנה) בפרוצדורה DELPART – בשלב 7 מוגדר ערך למשתנה והוא מופיע בקלט בשלב 8.