Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

"skip" doesn't work in my Progrram

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
cser_oxygen

New User


Joined: 25 Oct 2006
Posts: 33

PostPosted: Tue May 29, 2007 12:24 pm    Post subject: "skip" doesn't work in my Progrram
Reply with quote

Hi

Following is my pgm&result, it seems that "skip" doesn't work.
is there anybody can give me a brief direction?
many thanks!

Program:

*PROCESS GONUMBER,ATTRIBUTES(FULL);
PMAIN:PROCEDURE OPTIONS(MAIN);
PUT SKIP LIST('LINE1');
PUT LIST('LINE2') SKIP(2);
PUT LIST('LINE3') SKIP(3);
END;

Result:
LINE1
LINE2
LINE3
Back to top
View user's profile Send private message

Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Tue May 29, 2007 2:51 pm    Post subject:
Reply with quote

Is this result on paper or in the print dataset. If the latter did you check the cariage control character?
Back to top
View user's profile Send private message
cser_oxygen

New User


Joined: 25 Oct 2006
Posts: 33

PostPosted: Wed May 30, 2007 8:09 am    Post subject:
Reply with quote

thx for your reply.

I used "sysprint" to display the result first time, the skip doesn't work;
but when I tryed to use a sequential file instead of the "sysprint" as a output file, it woked as well,

could you explan a little about this issue?
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Thu May 31, 2007 1:53 am    Post subject:
Reply with quote

JCL please icon_wink.gif
Back to top
View user's profile Send private message
cser_oxygen

New User


Joined: 25 Oct 2006
Posts: 33

PostPosted: Thu May 31, 2007 11:04 am    Post subject:
Reply with quote

Code:
                       
// SET MEMBER=TEST4                                   
//*                                                   
//STEP01 EXEC IEL1CL                                 
//PLI.STEPLIB DD DSN=MSSGXY.PDS.PLI,DISP=SHR         
//PLI.SYSIN DD DSN=MSSGXY.PDS.PLI(&MEMBER),DISP=SHR   
//LKED.SYSLIB DD DSN=MSSGXY.PLI.LOD(&MEMBER),DISP=SHR
//            DD DSN=SYS1.CEE.SCEELKED,DISP=SHR       
//LKED.SYSLMOD DD DSN=MSSGXY.PLI.LOD(&MEMBER),DISP=SHR
//*                                                   
//RUNGO EXEC PGM=&MEMBER                             
//OUTFILE1 DD DSN=MSSGXY.PLI.OUTFILE1,DISP=SHR       
//OUTFILE2 DD DSN=MSSGXY.PLI.OUTFILE2,DISP=SHR       
//STEPLIB DD DSN=MSSGXY.PLI.LOD,DISP=SHR             
//PLI.SYSIN DD *   
/*                   
//SYSPRINT DD SYSOUT=*
//                                                       


Many thanks!
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Thu May 31, 2007 3:02 pm    Post subject:
Reply with quote

What happens when you assign FBA in the DCB of the file to be printed?
Back to top
View user's profile Send private message
cser_oxygen

New User


Joined: 25 Oct 2006
Posts: 33

PostPosted: Fri Jun 01, 2007 11:22 am    Post subject:
Reply with quote

It also worked fine.
It won't work if and only if when I use sysprint as an output.
Back to top
View user's profile Send private message
cser_oxygen

New User


Joined: 25 Oct 2006
Posts: 33

PostPosted: Wed Jun 06, 2007 2:58 pm    Post subject:
Reply with quote

Is there anybody can give some explanation about this issue???
I am very interest in this.

thanks.
Back to top
View user's profile Send private message
anbesivam

New User


Joined: 22 Aug 2006
Posts: 5

PostPosted: Fri Jun 08, 2007 7:22 pm    Post subject:
Reply with quote

It seems there is a patch available for this.

Please check following link for further information. It seems your problem is smilar to that.

http://www-1.ibm.com/support/docview.wss?uid=isg1PQ62463
Back to top
View user's profile Send private message
cser_oxygen

New User


Joined: 25 Oct 2006
Posts: 33

PostPosted: Mon Jun 11, 2007 7:48 am    Post subject:
Reply with quote

That's it!
Thanks a lot!!
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 -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Amount field is getting corrupted whe... thesumitk SYNCSORT 5 Tue Oct 18, 2016 8:20 pm
No new posts hot to get details when "EXEC CI... Andi1982 CICS 11 Tue Sep 20, 2016 5:01 pm
No new posts Multi row fetch - "for read only... Nileshkul DB2 3 Sun Aug 14, 2016 12:52 am
No new posts "DFSRRC00 vs IKJEFT01" for ... arunsoods All Other Mainframe Topics 5 Fri Aug 12, 2016 9:54 pm
No new posts why i need hit enter after EXECIO * D... jackzhang75 CLIST & REXX 10 Fri May 20, 2016 9:16 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us