IBM SC33-1683-02 Server User Manual


 
DS OCL4 Standard header
DYRFUNC DS CL1 Function code
DYRCOMP DS CL2 Component code
DYRFILL1 DS CL1 Reserved
DYRERROR DS CL1 Route selection error code
DYROPTER DS CL1 Transaction termination option
DYRQUEUE DS CL1 Queue-the-request indicator
DYRFILL2 DS CL1 Reserved
DYRRETC DS F Return code
DYRSYSID DS CL4 Default/Selected sysid
DYRVER DS H Version of the interface
DYRTYPE DS CL1 Type of routing request
DYRFILL3 DS H Reserved
DYRTRAN DS CL8 Default/Selected remote tranid
DYRCOUNT DS F Number of invocations count
DYRBPNTR DS F Address of input buffer
DYRBLGTH DS F Length of input buffer
DYRRTPRI DS CL1 Pass priority to AOR?
DYRFILL4 DS CL1 Reserved
DYRPRTY DS H Dispatch priority passed to AOR
DYRNETNM DS CL8 Netname matching sysid
DYRLPROG DS CL8 Run this program if routed locally
DYRDTRXN DS CL1 DTRTRAN indicator
DYRDTRRJ DS CL1 DTRTRAN reject?
DYRFILL5 DS CL2 Reserved
DYRSRCTK DS XL4 MVS WLM source token
DYRABNLC DS XL4 Abnormal event code
DYRABCDE DS CL4 Transaction abend code
DYRCABP DS CL1 Continue abend processing?
DYRFILL6 DS CL1 Reserved
DYRFILL7 DS CL2 Reserved
DYRACMAA DS F Address of applications's commarea
DYRACMAL DS F Length of application's commarea
* THE FOLLOWING 7 FIELDS APPLY ONLY TO BTS TRANSACTIONS
DYRCBTS DS 0CL176
DYRPROCN DS CL36 BTS process name
DYRPROCT DS CL8 BTS process-type
DYRACTN DS CL16 BTS activity name
DYRACTID DS CL52 BTS activity ID
DYRPROCID DS CL52 BTS process ID
DYRACTCMP DS CL1 BTS activity completing?
DYRPROCCMP DS CL1 BTS process completing?
DYRFILL8 DS CL2 Reserved
DYRFILL9 DS CL8 Reserved
DYRUAPTR DS F Address of user area
DYRUSER DS CL1024 User area
Figure 45. The communications area passed to a dynamic routing program
parameters passed to DFHDYP
Chapter 16. Writing a dynamic routing program 563