View previous topic :: View next topic
|
Author |
Message |
cser_oxygen
New User
Joined: 25 Oct 2006 Posts: 33
|
|
|
|
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 |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
Is this result on paper or in the print dataset. If the latter did you check the cariage control character? |
|
Back to top |
|
|
cser_oxygen
New User
Joined: 25 Oct 2006 Posts: 33
|
|
|
|
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 |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
JCL please |
|
Back to top |
|
|
cser_oxygen
New User
Joined: 25 Oct 2006 Posts: 33
|
|
|
|
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 |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
What happens when you assign FBA in the DCB of the file to be printed? |
|
Back to top |
|
|
cser_oxygen
New User
Joined: 25 Oct 2006 Posts: 33
|
|
|
|
It also worked fine.
It won't work if and only if when I use sysprint as an output. |
|
Back to top |
|
|
cser_oxygen
New User
Joined: 25 Oct 2006 Posts: 33
|
|
|
|
Is there anybody can give some explanation about this issue???
I am very interest in this.
thanks. |
|
Back to top |
|
|
anbesivam
New User
Joined: 22 Aug 2006 Posts: 5
|
|
Back to top |
|
|
cser_oxygen
New User
Joined: 25 Oct 2006 Posts: 33
|
|
|
|
That's it!
Thanks a lot!! |
|
Back to top |
|
|
|