Gen Example: Gen inline code to get the CICS system identifier
search cancel

Gen Example: Gen inline code to get the CICS system identifier

book

Article ID: 417607

calendar_today

Updated On:

Products

Gen Gen - Run Time Distributed Gen - Workstation Toolset

Issue/Introduction

Developers want to access the CICS system identifier (SYSID) when their Gen 8.6 COBOL code is executing.

Resolution

See attachment below demonstrating Gen inline code that issues a CALL to ‘TIRSYSID’ 
This Gen runtime load module will return the CICS system identifier.

Attachments

GEN inline code.docx get_app