Lior

בכיף.

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

1. לכתוב קוד SQL כשלב מקדים
2. להכניס עמודה חישובית שתציג שרשור של כל הנתונים הללו למחרוזת אחת

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

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

כדי להציג את יצרן אחד – גם שם יצרן וגם תיאור יצרן צריך SQL בפרוצדורה.

האם יותר מובן כעת ? אם כן מה אתה בוחר ? אם לא , מה לא הסברתי טוב ?

1. כנראה שיש פה אי הבנה. האם אתה רוצה להפיק את הדו"ח רק על יצרן אחד קבוע מראש ?? אם כן, תחליף את YourManfName בביטוי שכתבתי בקוד היצרן הזה. אם אתה רוצה שלכל יצרן יופיע מוצר יחיד בדו"ח – זו כבר אופרה אחרת לגמרי.

2. יש שני תפריטים במערכת בשם דוחות עצי מוצרים. התפריט שאתה מסתכל בו הוא PARTTREEREP

תעתיק את הפרוצדורה ואת הדו"ח המופעל ממנה. יודע איך לעשות זאת ?

פתח את הפרוצדורה החדשה במחולל, רד לשלב 20,רשום שם את שם הדו"ח החדש במקום מה שיש שם, F6, רד לעמודה 70, רד לביטוי תנאי ורשום:
[code:1]= 'YourManfName'[/code:1]

'YourManfName' = מספר היצרן שאתה רוצה להציג
צא מהכל והרץ את הדו"ח

כספים > תמחיר תעשייתי > הרצות תמחיר > הצגת פרמטרים תמחיריים

[code:1]/* Replace YOURTABLENAME with the real table name */

/* CURDATE/POST-FIELD */
:$.SEKNAME = '1000' ;
/* this is the number of the first record change it to whatever you like*/
SELECT ITOA(MAX(ATOI(SEKNAME)) + 1) INTO :$.SEKNAME
FROM YOURTABLENAME ;

/* PRE-INSERT */
:«»SEKNAME = :$.SEKNAME ;
LABEL 10 ;
GOTO 20 WHERE NOT EXISTS
(SELECT 'X'
FROM YOURTABLENAME
WHERE SEKNAME = :«»SEKNAME)
;
:«»SEKNAME = ITOA(ATOI(:«»SEKNAME) + 1);
LOOP 10 ;
LABEL 20 ;

:$.SEKNAME =:«»SEKNAME ;
[/code:1]

הי,
כל טבלה חייבת שיהיה לה מפתח U. מפתח A אינו חובה.
הכי פשוט במבחינתך הוא להשאיר את מבנה העמודות כמו שהוא, להגדיר את SEKNAME מפתח U, את SEK מפתח A.

עד כאן הטבלה.

באשר למסך –

על אחת מהעמודות שתמיד יהיה בהן ערך (אם מחמת שהן חובה או אם מחמת שיהיה טריגר שימלא אותן) תכניס POST-FIELD. תפקידו של טריגר זה יהיה למלא את :$.SEKNAME במספר הרץ. כדי לחשב אותו, מצא את הערך המקסימלי הקיים והוסף לו 1.

זה עדיין לא הכל – ב PRE-INSERT עליך לבדוק שוב שהערך אינו קיים בטבלה (הוא יכול להיות קיים כי שני משתמשים פותחים שורה חדשה, מקבלים את אותו מקסימלי + 1, הראשון הצליח להכנס, כשהשני יורד מהשורה, הוא מנסה להכניס נתון קיים למפתח U וההכנסה נכשלת). אם מצאת שהוא קיים, קדם אותו באחד עד אשר לא תמצא ערך זהה בטבלה.