Re: "WAIT" command?!


"JJ" <jj@xxxxxxxxxx> schrieb im Newsbeitrag
news:dfydnVHGl4oRcXzYnZ2dnUVZ_qGjnZ2d@xxxxxxxxxxxxxx
That sounds like Acucobol - is it?


yes it is


Generally you have your grid in a screen section entry and you use a
PERFORM UNTIL loop to continually accept the screen until some event
occurs where you want to exit the program. After your event handler code
ends, the screen gets accepted again so the program doesn't end. It's a
way of simulating event driven code within Cobol.

but which event should i use in the perform loop?
i have a grid and some buttons, so if i use something like

perform until ende = 1
accept Screen1
end-perform


then it does not accept the button-click event. so the loop should end and
go the according event-
button click -> go to button click event
entry in grid -> according event




.

Quantcast