View previous topic :: View next topic
|
Author |
Message |
Mukesh Pandey
Active User
Joined: 11 Nov 2008 Posts: 143 Location: India
|
|
|
|
Hi all,
I have newly coded the below step.
A return code of 16 is thrown by the below step. Can i know if there is any mistake in the sysin statements.
Purpose of the step : copies 80 byte flat file to 99 byte PDS memebr using FILEMNGR.
Code: |
//STEP1 EXEC PGM=FILEMGR
//**********************************************************************
//* UPLOAD TEMP FILE TO PDS *
//**********************************************************************
//DD01 DD DSN=PUBLIC.TEST1,
// DISP=(OLD,DELETE,DELETE)
// DD DSN=PUBLIC.TEST2,
// DISP=(OLD,DELETE,DELETE)
//DD01O DD DSN=PUBLIC.TEST(MEM1),
// DISP=(OLD,KEEP,KEEP)
//SYSIN DD *
*+* FMC2FM: BEGINNING OF FILE MANAGER STATEMENT OUTPUT *+*
$$FILEM SET PAD=' '
$$FILEM DSC INPUT=DD01,
$$FILEM OUTPUT=DD01O
/*
//*
|
MEM1 - 99 bytes.
PUBLIC.TEST1 and PUBLIC.TEST2 ( 80 bytes each ) |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10873 Location: italy
|
|
|
|
after 150 post You should know that to get help You MUST post complete info
where are the sysout and the Filemgr messages ??? |
|
Back to top |
|
|
Bill O'Boyle
CICS Moderator
Joined: 14 Jan 2008 Posts: 2501 Location: Atlanta, Georgia, USA
|
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Hopefully, you also realize that no matter what happens with this job/step, the input files are destroyed. . .
And the diagnostic information still not posted. . .
|
|
Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
you need to add a SYSPRINT DD statement to your JCL.
Gerry |
|
Back to top |
|
|
Mukesh Pandey
Active User
Joined: 11 Nov 2008 Posts: 143 Location: India
|
|
|
|
Thanks gcicchet.. i really missed to add the sysprint. |
|
Back to top |
|
|
Mukesh Pandey
Active User
Joined: 11 Nov 2008 Posts: 143 Location: India
|
|
|
|
Hi gcicchet. Thanks for your suggestion.
I was aware that the SYSPRINT statement is mandatory at the filemngr step else it will throw an RC of 16 but forgot to add this time.
I have tested the code and it is working fine.
Thanks for your help. |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Was there no message in one of the sysouts with wording like:
SYSPRINT DD statement missing. . . |
|
Back to top |
|
|
|