Micro Focus Screen section

From: kme (xzr_at_cnaqben.or.ROT13.invalid)
Date: 04/27/04


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


Relevant Pages

  • Re: Help with SQL - Variable Not Initialized?
    ... As noone else yet has tried to answer this, I'll give it a shot... ... Instance variables are "automatically" initialized with default values. ... I would have expected the compiler to give you a similar message ...
    (comp.lang.java.databases)
  • Looking for a good close shot of marlboro picture on Ferrari F2005
    ... As i am a graphist in need, i am looking all over the net for a good shot of the marlboro picture on the ... ferrari f2005 because i would like to reproduce the visual effect of it. ... Please to send me the pic here removing (nospam) -> loic@caldera.fr ...
    (rec.autos.sport.f1)
  • Looking for a good close shot of marlboro picture on Ferrari F2005
    ... As i am a graphist in need, i am looking all over the net for a good shot of the marlboro picture on the ... ferrari f2005 because i would like to reproduce the visual effect of it. ... Please to send me the pic here removing (nospam) -> loic@caldera.fr ...
    (rec.autos.sport.f1.moderated)
  • Re: trees example
    ... Don Kim wrote: ... failed on your compiler. ... (Because I am no C++ expert, I was careful to test ...
    (alt.comp.lang.learn.c-cpp)
  • Re: Replacement for film
    ... nospam wrote: ... I haven't shot any pics for many years now, ... it was called silicon film, among other names, and was never anything ... I'd gladly buy something like this if it existed, as those camera bodies and ...
    (alt.photography)