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
 

 

Return code 16 at FILEMNGR step.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging
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    Post subject: Return code 16 at FILEMNGR step.
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

Global Moderator


Joined: 14 Mar 2007
Posts: 10210
Location: italy

PostPosted: Tue Mar 15, 2011 5:26 pm    Post subject: Reply to: Return code 16 at FILEMNGR step.
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: 2502
Location: Atlanta, Georgia, USA

PostPosted: Tue Mar 15, 2011 5:48 pm    Post subject: Reply to: Return code 16 at FILEMNGR step.
Reply with quote

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

http://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

Site Director


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

PostPosted: Tue Mar 15, 2011 9:07 pm    Post subject: Reply to: Return code 16 at FILEMNGR step.
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: 1703
Location: Australia

PostPosted: Wed Mar 16, 2011 5:27 am    Post subject:
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    Post subject:
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    Post subject:
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

Site Director


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

PostPosted: Thu Mar 17, 2011 4:18 am    Post subject:
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    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to Capture the Max return code of... anilkumar922 All Other Mainframe Topics 0 Thu Jan 12, 2017 12:02 pm
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts PL/I code tuning/Performance improvement Virendra Shambharkar PL/I & Assembler 4 Mon Dec 05, 2016 11:57 am
No new posts What is the code in CLIST to enable t... jackzhang75 CLIST & REXX 1 Fri Dec 02, 2016 3:02 am
No new posts IDEAL - Code Retrieval yugendran CA Products 0 Fri Nov 25, 2016 3:27 pm


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