Go Premium for a chance to win a PS4. Enter to Win

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 549
  • Last Modified:

Basic question about DISPLAY in COBOL

I'm new in Cobol for AS400. I wrote some little program with several DISPLAY operators. In my AS400 shows what I wanted to display , but it suspends(stops) after every DISPLAY and wating for me press "Enter" and only after pressing "Enter" it shows me the next DISPLAY.
Why this ?
Thank you.
0
Maximka2000
Asked:
Maximka2000
1 Solution
 
P_S_PriceCommented:
This would again seem to be a duplicate of your other question.
0
 
Maximka2000Author Commented:
Yes you right see my reaction in the first one.
0
 
theo kouwenhovenCommented:
Maximka2000,

The DISPLAY and ACCEPT method are for sending and retrieving operator messages.

I think you have to create a display file and look for the extended DISPLAY and extended ACCEPT method.

Good Luck
0
Veeam Task Manager for Hyper-V

Task Manager for Hyper-V provides critical information that allows you to monitor Hyper-V performance by displaying real-time views of CPU and memory at the individual VM-level, so you can quickly identify which VMs are using host resources.

 
xingerCommented:
You may code a
  DISPLAY ... UPON CONSOLE
and you will not be bothered with needing to press Enter.  

But beware that this will place the displayed message on the QSYSOPR message queue.  That may be an acceptable solution depending on your environment (e.g., you are the only one using the machine.)  But if your company has operators who monitor the QSYSOPR message queue, you may make enemies if you do a lot of this.

If you do this, enter the command
  DSPMSG QSYSOPR
to see your DISPLAY's when your program is done.
0
 
xingerCommented:
By golly, there is a simple way to do this...

CRTDSPF FILE(QTEMP/DISPLAY) RSTDSP(*NO) DFRWRT(*YES)
OVRDSPF FILE(QDLBACCDSP) TOFILE(QTEMP/DISPLAY)  
CALL YOURPGM
DLTOVR FILE(QDLBACCDSP)

And then if you have done all this within a PDM utility, press F10 twice to see your displays.  If you are doing this outside of a PDM utility, first CALL QCMD and then press F10 once.
0
 
Maximka2000Author Commented:
That is exactly what I need.
Thank You very much.
0

Featured Post

Nothing ever in the clear!

This technical paper will help you implement VMware’s VM encryption as well as implement Veeam encryption which together will achieve the nothing ever in the clear goal. If a bad guy steals VMs, backups or traffic they get nothing.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now