Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
How WITH NO ADVANCING will work

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
venosol
Warnings : 1

New User


Joined: 16 Nov 2006
Posts: 43
Location: Bangalore

PostPosted: Mon Mar 19, 2007 10:34 am    Post subject: How WITH NO ADVANCING will work
Reply with quote

How WITH NO ADVANCING will work ?

Suppose I had a DISPLAY statement Like this.

DISPLAY ' ENTER ONE DIGIT' WITH NO ADVANCING.

ACCEPT WS-NUM.

I tried it but I am getting some error. Please clarify me.
Back to top
View user's profile Send private message

guptae

Moderator


Joined: 14 Oct 2005
Posts: 1187
Location: Bangalore,India

PostPosted: Mon Mar 19, 2007 10:42 am    Post subject:
Reply with quote

Hi There,


Please refer the manual

http://publib.boulder.ibm.com/infocenter/pdthelp/v1r1/index.jsp?topic=/com.ibm.entcobol4.doc/tpbeg16b.htm
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Mon Mar 19, 2007 7:28 pm    Post subject:
Reply with quote

Hello,

You are confusing DISPLAY and WRITE.

As suggested by Ekta, please refer to the Fine Manual.

As a hint, "NO ADVANCING" will not work with DISPLAY or WRITE. . .

After checking in the manual, please let us know if you have questions icon_smile.gif

To go a little deeper - if you are putting output on paper asking the use to enter a digit, how will this work? The DISPLAY/WRITE output will not be visable until the job is already finished. If you have a requirement to interact with a user, a different approach is needed.
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4650
Location: Raleigh, NC, USA

PostPosted: Mon Mar 19, 2007 7:34 pm    Post subject: Re: with no advancing
Reply with quote

It's kind of odd that only the NO ADVANCING option is there for DISPLAY. You'd think that there would be the full range of ADVANCING parameters.

I guess it must be intended for a foreground-oriented interactive program.
Back to top
View user's profile Send private message
j_sram

New User


Joined: 03 Jul 2006
Posts: 6

PostPosted: Wed Mar 21, 2007 4:39 pm    Post subject:
Reply with quote

If you specify the WITH NO ADVANCING phrase and the output is going to a ddname, the printer control character + (plus) is placed into the first output position from the next DISPLAY statement. + is the ANSI-defined printer control character that suppresses line spacing before a record is printed.

For example:
DISPLAY ?ABC?
DISPLAY ?CDEF? WITH NO ADVANCING
DISPLAY ?GHIJK? WITH NO ADVANCING
DISPLAY ?LMNOPQ?
DISPLAY ?RSTUVWX?

If you use the statements above, the result sent to the output device is:

ABC
CDEF
+GHIJK
+LMNOPQ
RSTUVMX
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Fileaid 2 commands instream work. In ... descann Compuware & Other Tools 2 Tue May 16, 2017 3:31 pm
No new posts What is the maximum number of sort wo... Pravina M SYNCSORT 2 Mon Mar 14, 2016 4:51 pm
No new posts JCL -> Rexx -> XMITIP : Doesnt ... enrico-sorichetti CLIST & REXX 2 Thu Aug 06, 2015 11:09 pm
No new posts Select Variable=string Rexx does not ... Csongor CLIST & REXX 11 Thu May 07, 2015 9:33 pm
No new posts Does FUNCTION NUMVAL work for alphanu... Venkata Ramayya COBOL Programming 8 Fri Mar 20, 2015 10:43 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us