Go to LeighWeb Home Page            

Back To LeighWeb Mainframe Utilities Page

View the module associated with this documentation

 VIEWJCL is an edit macro which, when executed from a COBOL program, wil00010000
 display a member list of production "execute" JCL for this program.    00020000
 That JCL may then be edited, browsed, etc.                             00030000
                                                                        00040000
 VIEWJCL extracts bytes 4 through 8 of the COBOL member name and then   00050000
 prefixes those bytes with a database prefix such as USC (the default if00060000
 none is specified) or LIN or WSL.  Then VIEWJCL goes to that database's00070000
 production JCL library and brings up a member list of all the members  00080000
 which begin with that character string.                                00090000
                                                                        00100000
 For example, if you are editing program SLS5035, you can type VIEWJCL o00110000
 the command line, press ENTER, and you will be displayed a member list 00120000
 in the USC10.PRD.CNTL library consisting of the members USC5035 and    00130000
 USC5035N.  If you had typed VIEWJCL LIN, you would get a member list in00140000
 the LIN51.PRD.CNTL library consisting of the members LIN5035 and       00150000
 LIN5035N.                                                              00160000
                                                                        00170000
 When you "END" out of looking at the JCL, you'll be back in your       00180000
 program.                                                               00190000