IBM Support

Got COBOL? Bet you didn't know you could do THIS in COBOL

News


Abstract

Presentation material for SHARE session 1541.
We will discuss a number of new features, functions and actions that you can take using Enterprise COBOL and LE that were not possible in earlier environments. Features such as dynamic storage allocation, dynamic file allocation, bit manipulation, new callable services, displaying hex data as printable, etc

Content

The presentation also refers to the following examples:
  • Handlem2 is the General Condition Handler that contains the dynamic allocation, variable length file coding and LE callable services examples
  • SSRANGE is the program that abended with USRHDLR(,HANDLEM2) in effect
  • OPENIT is the program that can open any file with fixed records
  • CALLOPN is the program that called OPENIT for different files
  • System is the program that got Operating System information, including the source for program SHOWHEX
  • Bitcheck is the COBOL program that can look at bits using math

S1541TR.pdf
handlem2.jcl
ssrange.jcl
openit.jcl
callopn.jcl
system.jcl
bitcheck.cbl

[{"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Component":"Documentation","Platform":[{"code":"PF035","label":"z\/OS"}],"Version":"3.1;3.2;3.3;3.4;4.1;4.2","Edition":"","Line of Business":{"code":"LOB17","label":"Mainframe TPS"}}]

Document Information

Modified date:
06 April 2021

UID

swg27009580