Customizing Gen User Exit TIRELOGX and the availability of Data in TIRERR
search cancel

Customizing Gen User Exit TIRELOGX and the availability of Data in TIRERR

book

Article ID: 250117

calendar_today

Updated On:

Products

Gen

Issue/Introduction

How to customize the TIRELOGX user exit to perform the same functionality or call the same routines that are currently being inserted into dialog manager code.

The custom code is using the following items

PSMGR-USER-ID          (Available in Globdata)                     
CURR-PSTEP-NAME                   
CUR-AB-ID                  (Available in Globdata)  
CUR-AB-NAM               (Available in Globdata) 
PSMGR-IEF-TRANCODE (Available in Globdata)

The routine is using the CURR-PSTEP-NAME from the PSTEP-TBL. 

Does GLOBDATA  PSTEP-TBL-PTR contain the memory location of the PSTEP-TBL as defined in the dialog manager generated code?   

Additionally, if the custom code will call a CICS SYNCPOINT ROLLBACK before returning to the code out of the way and will then MOVE SPACES TO ERROR-ENCOUNTERED-SW and VIEW-OVERFLOW-SW,  effectively resetting the need to call another rollback. 

Where are the Rollback/Commit actions called in a normal Dialog Manager flow?

 

 

Environment

Release : 8.6

Component : Gen Host Encyclopedia, Gen Runtime

Resolution

Does GLOBDATA  PSTEP-TBL-PTR contain the memory location of the PSTEP-TBL as defined in the dialog manager generated code?   

Yes, the PSTEP-TBL-PTR in the GLOBDATA is populated with the address of the PSTEP-TBL by the TIRSETA call in the B0000-IETCNTL paragraph of the generated Server Manager code.

 

Where are the Rollback/Commit actions called in a normal Dialog Manager flow?

As long as the FAIL-TYPE variable in the FAIL-CMCB is not set to NO-FAILURE (SPACES), then TIRERR will perform an EXEC CICS SYNCPOINT ROLLBACK command. This command will be executed before TIRERR calls the TIRELOGX user exit.