gnucobol-users
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[open-cobol-list] How to use Multi-Line DISPLAY/ACCEPT with OCCURS n TIM


From: Veit Heise
Subject: [open-cobol-list] How to use Multi-Line DISPLAY/ACCEPT with OCCURS n TIMES clause in SCREEN SECTION
Date: Mon, 16 Sep 2013 12:43:31 +0200
User-agent: Mozilla/5.0 (X11; Linux i686; rv:17.0) Gecko/20130803 Thunderbird/17.0.8

Hello,

is there a way to use the OCCURS <n> TIMES clause in the SCREEN SECTION
to produce a multi-line output/input-Mask??

I mentioned that it have to look like

working-storage section.
01 zellen-array.
   03 zellen-zeile occurs 25 times indexed by idx1.
      05 zelle pic x(20).

screen section.
01 seite1.
   03 line 1 col 1 erase eos.
   03 line 2 col 40 value "This is a Test!".
   03 line 3 col 1 value " ".
   03 zeile1 occurs 25 times.
      05 auto-skip line plus 1 col 3 value "[".
      05 xfeld pic x(20) using zelle(idx1).
      05 value "]".

procedure division.
start-program.
   display seite1.
   accept  seite1.
   goback.

But, unlucky, it produces only ONE line with the first cell...

How to use and how to make it better?

Thankyou
Veit Heise



reply via email to

[Prev in Thread] Current Thread [Next in Thread]