Abbydale Systems LLC. - Because IT matters Page #1  
Name
Description
  
COBPASSThis program demonstrates how to process parameters passed to a COBOL program.

This avoids the need to change code as it gets rolled out from development through to production it is recommended that the name of the target Queue manager and target queue(s) be passed to the program via the EXEC DD card rather than be hardcoded into the program.

DDLISTRThis code demonstrates how to gather system information from within a Cobol program.

The code really doesn't do anything useful, but it serves as an example of how to navigate down system control blocks and extract information from within them.

To see what information is maintained with system control blocks you will need to see the IBM documentation.

Getting the LPAR name of the system that the program is running on will allow the program to take decisions based upon it. For example, if the program is running on a development LPAR then you may want to write trace messages or take a different logic flow based on the LPAR.

JOBINFOThis code demonstrates how to gather system information from within a Cobol program.

The code really doesn't do anything useful, but it serves as an example of how to navigate down system control blocks and extract information from within them.

To see what information is maintained with system control blocks you will need to see the IBM documentation.

Getting the LPAR name of the system that the program is running on will allow the program to take decisions based upon it. For example, if the program is running on a development LPAR then you may want to write trace messages or take a different logic flow based on the LPAR.

MQVERCThis is a little program that will display all of the MQ systems that are defined to a z/OS system.

It will show the status of the systems (i.e Active or Inactive), the MQ version and the PTF level.

The output from MQVERC is written to the output stream.

Link to information page click here.

USERIDHow to obtain the userid of the user running the program

This could be useful when creating dynamic reply queues or for allocating and using user datasets within a Cobol program

Link to information page click here.

Page #1  
 
 


If you need any support or assistance with any of the code on this site
or
if you would like to contact us, please click here

follow us on facebook
Follow us on Facebook

 

Number of unique visitors 2714

Copyright © Abbydale Systems LLC 2015-2024

Abbydale Systems LLC Lic. 802696149. All rights reserved.

Last modified : Tuesday 26th of September 2023