Micro Focus Screen section
From: kme (xzr_at_cnaqben.or.ROT13.invalid)
Date: 04/27/04
- Next message: Jeff Lanam: "Re: [OT] Object construction"
- Previous message: yyfrqx_at_cnet.com: "Reality TV (private X Shots.jpg} 1090"
- Next in thread: James J. Gavan: "Re: Micro Focus Screen section"
- Reply: James J. Gavan: "Re: Micro Focus Screen section"
- Reply: Richard: "Re: Micro Focus Screen section"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Date: Tue, 27 Apr 2004 21:01:49 GMT
Hi
I have a Micro Focus screen section, but no MF Compiler. I need a screen
shot of this screen section. The source in which the screen section is
copied, is also not available.
Can someone provide me a screen shot of this screen section?
Here is the code of the screen section:
01 SCH1.
10 BLANK SCREEN.
10 LINE 1 COL 2 PIC X(20) FROM EK330-NAAMO.
10 LINE 1 COL 24 VALUE "Drukken etiketten - ".
10 VALUE "Levering".
10 LINE 1 COL 73 PIC 99/99/99 FROM WS-UDATEA.
10 LINE 2 COL 2 PIC X(20) FROM EK330-GEMTE.
10 LINE 2 COL 24 VALUE "------------------------".
10 VALUE "----".
10 LINE 2 COL 75 VALUE "AK6150".
10 LINE 3 COL 2 PIC X(8) FROM VOLLD OF WS-SCHERM.
10 LINE 4 COL 5 VALUE "Laadprogramma".
10 LINE 4 COL 32 VALUE "Transportnr".
10 LINE 5 COL 5 VALUE "Leverancier" UNDERLINE.
10 LINE 5 COL 19 VALUE "Intern" UNDERLINE.
10 LINE 5 COL 32 VALUE "Leverancier" UNDERLINE.
10 LINE 5 COL 46 VALUE "Intern" UNDERLINE.
10 LINE OCCURS 15 TIMES.
15 COL 1 VALUE " ".
15 COL 2 PIC ZZ FROM LIJNR OF WS-LIJN-LP
OF WS-SCHERM.
15 COL 5 PIC X(13) FROM LPNUM13 OF WS-LIJN-LP
OF WS-SCHERM.
15 COL 19 PIC X(11) FROM LPNIN OF WS-LIJN-LP
OF WS-SCHERM.
15 COL 32 PIC X(11) FROM VVMIL OF WS-LIJN-LP
OF WS-SCHERM.
15 COL 46 PIC X(11) FROM VVMID OF WS-LIJN-LP
OF WS-SCHERM.
10 LINE 21 COL 2 VALUE "Selectie : ".
10 LINE 21 COL 14 PIC ZZ USING SELEK OF WS-SCHERM.
10 LINE 21 COL 18 VALUE "LP-nr lever. : ".
10 LINE 21 COL 33 PIC X(9) USING LPNLE OF WS-SCHERM.
10 LINE 22 COL 1 VALUE " F1 Herbeginnen F2 Etiketten ".
10 VALUE "Laadprogr. F3 Etiketten transport".
10 LINE 23 COL 1 VALUE " F4 Detail F7 Einde".
10 LINE 24 COL 2 PIC X(78) FROM MESSG OF WS-SCHERM
BLINK.
******************************************************************
-- Rgds kme e-mail: kme _NOSPAM_ @pandora.be
- Next message: Jeff Lanam: "Re: [OT] Object construction"
- Previous message: yyfrqx_at_cnet.com: "Reality TV (private X Shots.jpg} 1090"
- Next in thread: James J. Gavan: "Re: Micro Focus Screen section"
- Reply: James J. Gavan: "Re: Micro Focus Screen section"
- Reply: Richard: "Re: Micro Focus Screen section"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Relevant Pages
|
|