IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Return code 16 at FILEMNGR step.


IBM Mainframe Forums -> ABENDS & Debugging
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Mukesh Pandey

Active User


Joined: 11 Nov 2008
Posts: 143
Location: India

PostPosted: Tue Mar 15, 2011 1:23 pm
Reply with quote

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
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Tue Mar 15, 2011 5:26 pm
Reply with quote

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
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2501
Location: Atlanta, Georgia, USA

PostPosted: Tue Mar 15, 2011 5:48 pm
Reply with quote

Have you checked the File Manager documentation? Here's a Bookshelf list -

publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/Shelves?filter=file+manager&SUBMIT=Find

Bill
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Tue Mar 15, 2011 9:07 pm
Reply with quote

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. . .

icon_confused.gif
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1702
Location: Australia

PostPosted: Wed Mar 16, 2011 5:27 am
Reply with quote

Hi,

you need to add a SYSPRINT DD statement to your JCL.


Gerry
Back to top
View user's profile Send private message
Mukesh Pandey

Active User


Joined: 11 Nov 2008
Posts: 143
Location: India

PostPosted: Wed Mar 16, 2011 1:17 pm
Reply with quote

Thanks gcicchet.. i really missed to add the sysprint.
Back to top
View user's profile Send private message
Mukesh Pandey

Active User


Joined: 11 Nov 2008
Posts: 143
Location: India

PostPosted: Wed Mar 16, 2011 5:46 pm
Reply with quote

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
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Thu Mar 17, 2011 4:18 am
Reply with quote

Hello,

Was there no message in one of the sysouts with wording like:
SYSPRINT DD statement missing. . . icon_confused.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> ABENDS & Debugging

 


Similar Topics
Topic Forum Replies
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts Return codes-Normal & Abnormal te... JCL & VSAM 7
No new posts How to append a PS file into multiple... JCL & VSAM 3
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
Search our Forums:

Back to Top