Application language interface trace points

Table 55. Language interface trace points
Point ID Module Lvl Type Data
 
AP 1940 DFHAPLI 1 Entry See Table 56
AP 1941 DFHAPLI 1 Exit See Table 56
AP 1942 DFHAPLI Exc Recovery Current parameter list (see note)
AP 1943 DFHAPLI Exc Invalid format
1
DFHAPLI parameter list
AP 1944 DFHAPLI Exc Invalid function
1
DFHAPLI parameter list
AP 1945 DFHAPLI Exc Missing parameter
1
DFHAPLI parameter list
AP 1948 DFHAPLI 1 Language Environment® call See Table 57
AP 1949 DFHAPLI 1 Language Environment return See Table 57
AP 194C DFHAPLI 1 C call See Table 58
AP 194D DFHAPLI 1 C return See Table 58
AP 194E DFHAPLI Exc Determine working storage failed
1
DFHAPLI parameter list
AP 1950 DFHAPLI Exc Language Environment error Language Environment reason code
AP 1952 DFHAPLI Exc C error C reason code
Start of changeAP 1953End of change Start of changeDFHAPLIEnd of change Start of changeExcEnd of change Start of changeCOBOL/2 recoveryEnd of change Start of changeCurrent parameter list (see note)End of change
Start of changeAP 1954End of change Start of changeDFHAPLIEnd of change Start of changeExcEnd of change Start of changeC recoveryEnd of change Start of changeCurrent parameter list (see note)End of change
Start of changeAP 1955End of change Start of changeDFHAPLIEnd of change Start of changeExcEnd of change Start of changeCOBOL recoveryEnd of change Start of changeCurrent parameter list (see note)End of change
Start of changeAP 1956End of change Start of changeDFHAPLIEnd of change Start of changeExcEnd of change Start of changePLI recoveryEnd of change Start of changeCurrent parameter list (see note)End of change
Start of changeAP 1957End of change Start of changeDFHAPLIEnd of change Start of changeExcEnd of change Start of changeDispatcher change mode failedEnd of change Start of change
1
DFHAPLI parameter list
End of change
AP 1960 DFHAPLJ 1 Entry
1
DFHAPLI parameter list
AP 1961 DFHAPLJ 1 Exit
1
DFHAPLI parameter list
AP 1962 DFHAPLJ Exc Recovery
1
DFHAPLI parameter list
AP 1963 DFHAPLJ Exc Invalid format
1
DFHAPLI parameter list
AP 1964 DFHAPLJ Exc Invalid function
1
DFHAPLI parameter list
AP 1965 DFHAPLJ Exc Error occurred within JVM
1
DFHAPLI parameter list
Start of changeAP 1966End of change Start of changeDFHAPLJEnd of change Start of changeExcEnd of change Start of changeInvalid fetch in DFHJVMATEnd of change Start of change
1
DFHAPLI parameter list
End of change
Start of changeAP 1967End of change Start of changeDFHAPLJEnd of change Start of changeExcEnd of change Start of changeError occurred within DFHJVMATEnd of change Start of change
1
DFHAPLI parameter list
End of change
Start of changeAP 1968End of change Start of changeDFHAPLJEnd of change Start of changeExcEnd of change Start of changeJVM system exit issuedEnd of change Start of change
1
DFHAPLI parameter list
End of change
Start of changeAP 1969End of change Start of changeDFHAPLJEnd of change Start of changeExcEnd of change Start of changeDispatcher change mode failedEnd of change Start of change
1
DFHAPLI parameter list
End of change
Note:
The current parameter list relates to the function being performed at the time of failure, and is as shown for AP 1940 in Table 56. For an application problem, the function is usually Start Program.
Table 56. DFHAPLI entry/exit trace data fields
Function Data fields for trace point AP 1940 Data fields for trace point AP 1941
Initialize languages
Terminate languages
Establish language
  1. Program name
  2. Program load point
  3. Program entry point
  4. Program length
  5. Execution key
  6. Data location (above below 16 MB line)
  7. User-defined language
  8. Old language block
  1. Language established by CICS®
  2. New language block
  3. Abend code
Start program
  1. Program name
  2. CEDF status
  3. Execution set (full API or DPL subset)
  4. Environment type
  5. SYNCONRETURN
  6. Language block
  7. Parameter-list address
  8. COMMAREA address and length
  9. Link level
  1. Abend code
  2. Program name
Find program attributes
  1. RSA address
  1. Program entry point
  2. Name at entry point
  3. Working storage address
  4. Static storage address
Goto
  1. RSA address
  1. Parameter list
  2. RSA address
  3. Language Environment entry point
Table 57. Language Environment call/return trace data fields
Function Data fields for trace point AP 1948 Data fields for trace point AP 1949
Partition initialization
  1. Function
  2. Parameter list
  3. System use
  1. Function
  2. Reason code
  3. Language Environment partition token
  4. Language Environment Interface level
  5. Language Environment thread workarea length
  6. Language availability bits
Partition termination
  1. Function
  2. Parameter list
  1. Function
  2. Reason code
Thread initialization
  1. Function
  2. Parameter list
  3. Program name
  4. PGMINFO1 (see topic Table 59)
  1. Function
  2. Reason code
  3. Program name
  4. Language Environment Thread token
Thread termination
  1. Function
  2. Parameter list
  1. Function
  2. Reason code
Run-Unit Initialization
  1. Function
  2. Parameter list
  3. Program name
  4. PGMINFO1 (see topic Table 59)
  5. RSA address
  6. Storage tuning area (Only if Language Environment dynamic storage tuning is supported)
  1. Function
  2. Reason code
  3. Program name
  4. Language Environment run-unit token
  5. RSA address
Run-Unit Initialization and begin invocation
  1. Function
  2. Parameter list
  3. Program name
  4. PGMINFO1 (see topic Table 59)
  5. RSA address
  6. and-begin
  7. Storage tuning area (Only if Language Environment dynamic storage tuning is supported)
  1. Function
  2. Reason code
  3. Program name
  4. Language Environment run-unit token
  5. RSA address
  6. and-begin
Run-unit termination
  1. Function
  2. Parameter list
  3. Program name
  4. RSA address
  1. Function
  2. Reason code
  3. Program name
  4. RSA address
  5. PGMINFO2 (see topic (Only if Language Environment dynamic storage tuning is supported)
  6. Storage tuning area (Only if Language Environment dynamic storage tuning is supported)
Run-unit begin invocation
  1. Function
  2. Parameter list
  3. Program name
  4. RSA address
  1. Function
  2. Reason code
  3. Program name
Run-unit end invocation
  1. Function
  2. Parameter list
  3. Program name
  4. System use
  5. RSA address
  1. Function
  2. Reason code
  3. Program name
  4. Contcode
  5. RSA address
Establish ownership type
  1. Function
  2. Parameter list
  3. Program name
  4. PGMINFO1 (see topic Table 59)
  1. Function
  2. Reason code
  3. Program name
  4. PGMINFO2 (see topic Table 60)
  5. Storage tuning area (Only if Language Environment dynamic storage tuning is supported)
Determine working storage
  1. Function
  2. Parameter list
  3. Program name
  1. Function
  2. Reason code
  3. Program name
  4. Working storage address
  5. Working storage length
  6. Static storage address
  7. Static storage length
Perform Goto
  1. Function
  2. Parameter list
  3. Program name
  1. Function
  2. Reason code
  3. Program name
  4. Out-of-block flag
Program check recovery
  1. Function
  2. Parameter list
  3. Program name
  4. Celinfo
  1. Function
  2. Return code
  3. Program name
  4. Reason code
  5. Contcode
Note:
Language Environment parameter lists are described starting in topic Language Environment parameter lists
Table 58. C call/return trace data fields
Function Data fields for trace point AP 194C Data fields for trace point AP 194D
Partition initialization
  1. Function
  2. Parameter list
  1. Function
  2. Reason code
  3. C partition token
  4. C Interface level
Partition termination
  1. Function
  2. Parameter list
  1. Function
  2. Reason code
Thread initialization
  1. Function
  2. Parameter list
  3. Program name
  1. Function
  2. Reason code
  3. Program name
  4. C Thread token
Thread termination
  1. Function
  2. Parameter list
  1. Function
  2. Reason code
Run-Unit Initialization
  1. Function
  2. Parameter list
  3. Program name
  1. Function
  2. Reason code
  3. Program name
  4. C run-unit token
Run-unit termination
  1. Function
  2. Parameter list
  3. Program name
  4. Celinfo
  5. Registers at abend
  1. Function
  2. Reason code
  3. Program name
  4. Contcode
Determine program type
  1. Function
  2. Parameter list
  3. Program name
  1. Function
  2. Reason code
  3. Program name
  4. Program flags
Working storage locate
  1. Function
  2. Parameter list
  3. Program name
  1. Function
  2. Reason code
  3. Program name
  4. W/S address
  5. W/S length
Note:
C parameter lists are described starting in topic C parameter lists
Table 59. PGMINFO1 structure This structure, used for communication between CICS and Language Environment, is referred to in figures Table 56 and Table 57. The structure consists of 11 fullwords.
Displacement (hex) Fullword contents
00 Length of the structure
04 The language of the run unit (main program) as known to CICS. One of the first 6 bits is set on with the following meaning:
  1. Assembler
  2. C
  3. Cobol/2
  4. PL/I
  5. RPG (not supported by CICS)
  6. Not known or Language Environment
08 Address of the run unit program
0C Length of the run unit program
10 Entry point address of the run unit; bit zero of this field is set on in the case of programs running in 31-bit addressing mode.
14 Modified entry address
18 Address of the run unit work area preallocated above 16 megabytes
1A Address of the run unit work area preallocated below 16 megabytes
20 Address of the application program argument list, which is a 2-fullword structure containing the addresses of the user EIB and COMMAREA
24 Address of the run time options string passed by CICS to Language Environment.
28 Length of the run time options string
Table 60. PGMINFO2 structure This structure, used for communication between CICS and Language Environment, is referred to in Table 57. Some fields are used when the language is not Language Environment. The structure consists of 7 fullwords.
Displacement (hex) Fullword contents
00 Length of the structure
04 Size of the work area required to run the program. This is used by Language Environment for storage above the 16-megabyte line, and by C for all storage. For C only, the first bit of this fullword is set on to indicate storage above the 16-megabyte line.
08 Size of the work area, below the 16-megabyte line, that is required to run the program (Language Environment only).
0C The first ten bits are binary flags. The meaning of an on setting for each bit is as follows:
  1. The program can run under Language Environment.
  2. Language Environment knows the language of the program (Language Environment only).
  3. More than one language is used in the program (Language Environment only).
  4. The program can run under Language Environment, but is not compiled by an Language Environment compiler. Language Environment must run the program in compatibility mode (Language Environment only).
  5. The program is executable under Language Environment.
  6. The program language is Assembler.
  7. The program language is C.
  8. The program language is COBOL 2.
  9. Start of changeThe program language is OS/VS COBOL. (OS/VS COBOL programs cannot run under CICS Transaction Server for z/OS® Version 3.)End of change
  10. The program language is PL/I.
10 Language ID number of the first executable CSECT in the program (Language Environment only)
14 Address of CEECOPT (Global Language Environment runtime options)
18 Address of CEEVOPT (Specific Language Environment runtime options)
1C Address of dynamic storage tuning area

Language Environment parameter lists

The parameter list passed to Language Environment varies with the function as follows.

Partition initialization

  1. Function (partition initialization)
  2. Address of reason code
  3. Address of system EIB
  4. Address of 240-byte work-area for use by Language Environment
  5. Address of a double-word into which Language Environment saves its partition token
  6. Address of a fullword containing the length of the EIB
  7. Address of a fullword into which Language Environment saves the length of the thread work-area required for Language Environment programs
  8. Address of a fullword into which Language Environment saves the Language Environment Interface Level number
  9. Address of a pointer to the CICS Get CAA module DFHGCAA
  10. Address of a pointer to the CICS Set CAA module DFHSCAA
  11. Address of the LANGDEF area
  12. Address of the ‘language availability’ area set by Language Environment. Flags set by Language Environment in this area that are of interest to CICS are:
         x . . .  . . . .    ASMINIT - Language Environment supports Assembler
         . x . .  . . . .    CINIT   - Language Environment supports C
         . . x .  . . . .    COBINIT - Language Environment supports COBOL2
         . . . x  . . . .    PLIINIT - Language Environment supports PL/I
  13. Address of the service routine vector table.

Partition termination

  1. Function (partition termination)
  2. Address of reason code
  3. Address of system EIB
  4. Address of 240-byte work-area for use by Language Environment
  5. Address of Language Environment partition token.

Thread initialization

  1. Function (thread initialization)
  2. Address of reason code
  3. Address of system EIB
  4. Address of 240-byte work-area for use by Language Environment
  5. Address of Language Environment partition token
  6. Address of a double-word into which Language Environment saves its thread token
  7. Address of Language Environment Thread Work-area
  8. Address of pgminfo1
  9. Address of pgminfo2
  10. Address flagword.

Thread termination

  1. Function (thread termination)
  2. Address of reason code
  3. Address of system EIB
  4. Address of 240-byte work-area for use by Language Environment
  5. Address of Language Environment partition token
  6. address of Language Environment thread token.

Run-unit initialization/Run-unit initialization and begin invocation

  1. Function (run-unit initialization)
  2. Address of reason code
  3. Address of system EIB
  4. Address of 240-byte work-area for use by Language Environment
  5. Address of Language Environment partition token
  6. Address of Language Environment thread token
  7. Address of Language Environment run-unit token
  8. Address of pgminfo1
  9. Address of pgminfo2.
  10. Address of ioinfo.
  11. Address of runinfo. Runinfo is a fullword containing bits:
    bit 0 - off
    Indicates rununit initialization only
    bit 0 - on
    Indicates combined rununit initialization and begin invocation
    bit 1 - on
    Indicates CICSTS passing a reusable RUWA (allows Language Environment optimization)

Run-unit begin invocation

  1. Function (run-unit begin invocation)
  2. Address of reason code
  3. Address of system EIB
  4. Address of 240-byte work-area for use by Language Environment
  5. Address of Language Environment partition token
  6. Address of Language Environment thread token
  7. Address of Language Environment run-unit token
  8. Address of pgminfo1
  9. Address of pgminfo2
  10. Address of ioinfo

Run-unit end invocation

  1. Function (run-unit end invocation)
  2. Address of reason code
  3. Address of system EIB
  4. Address of 240-byte work-area for use by Language Environment
  5. Address of Language Environment partition token
  6. Address of Language Environment thread token
  7. Address of Language Environment run-unit token
  8. Address of pgminfo1
  9. Address of pgminfo2
  10. Address of celinfo.

Program check recovery

  1. Function (program check recovery)
  2. Address of reason code
  3. Address of celinfo
  4. Address of 240-byte work-area for use by Language Environment

Run-unit termination

  1. Function (run-unit termination)
  2. Address of reason code
  3. Address of system EIB
  4. Address of 240-byte work-area for use by Language Environment
  5. Address of Language Environment partition token
  6. Address of Language Environment thread token
  7. Address of Language Environment run-unit token.

Establish ownership type

  1. Function (establish ownership type)
  2. Address of reason code
  3. Address of system EIB
  4. Address of 240-byte work-area for use by Language Environment
  5. Address of Language Environment partition token
  6. Reserved
  7. Reserved
  8. Address of pgminfo1
  9. Address of pgminfo2.

Determine working storage

  1. Function (determine working storage)
  2. Address of reason code
  3. Address of system EIB
  4. Address of 240-byte work-area for use by Language Environment
  5. Address of Language Environment partition token
  6. Address of Language Environment thread token for the user transaction
  7. Address of Language Environment run-unit token for the user transaction
  8. Address of the Language Definition bits
  9. Address of the user program’s register save area
  10. Address of a fullword into which Language Environment saves the address of the user program’s working storage
  11. Address of a fullword into which Language Environment saves the length of the user program’s working storage
  12. Address of a fullword into which Language Environment saves the address of the user program’s static storage
  13. Address of a fullword into which Language Environment saves the length of the user program’s static storage
  14. Address of a fullword into which Language Environment saves the entry point of the program
  15. Address of a fullword into which Language Environment saves the address of a character string, preceded by a length halfword, giving the internal name of the program (currently not supported by CICS).

Perform Goto

  1. Function (perform Goto)
  2. Address of reason code
  3. Address of system EIB
  4. Address of 240-byte work-area for use by Language Environment
  5. Address of Language Environment partition token
  6. Address of Language Environment thread token for the user transaction
  7. Address of Language Environment run-unit token for the user transaction
  8. Address of the Language Definition bits
  9. Address of the label argument of the Handle command
  10. Address of the user’s RSA reflecting the registers at the last EXEC CICS command
  11. Address of a fullword into which Language Environment may set the Cross-Call error flag
  12. Address of a field holding the abend code from the TACB
  13. Address of a field holding the value of Register 13 at the time of the abend.

COBOL2 parameter lists

The parameter list passed to COBOL2 varies with the function as follows.

Partition initialization

  1. Function (partition initialization)
  2. Address of system EIB
  3. Address of take-token entry point (DFHEIPTT)
  4. Address of GETMAIN entry point (DFHEIPGM)
  5. Address of FREEMAIN entry point (DFHEIPFM)
  6. Address of a 2-byte area ‘system_flags’ containing:
  7. Address of a fullword containing the CICS interface-level number (always set to 1)
  8. Address of a double-word into which COBOL2 saves its partition token
  9. Address of a fullword into which COBOL2 saves its interface-level number.

Partition termination

This function is not supported for COBOL2.

Thread initialization

  1. Function (thread initialization)
  2. Address of COBOL2 partition token
  3. Address of user EIB
  4. Address of CICS thread token (i.e. the TCA)
  5. Address of a double-word into which COBOL2 saves its thread token.

Thread termination

  1. Function (thread termination)
  2. Address of COBOL2 partition token
  3. Address of COBOL2 thread token.

Run-unit initialization

  1. Function (run-unit initialization)
  2. Address of COBOL2 partition token
  3. Address of COBOL2 thread token
  4. Address of module entry point
  5. Address of EIB and COMMAREA address vector.

Run-unit begin invocation

This function is not supported for COBOL2.

Run-unit end invocation

This function is not supported for COBOL2.

Run-unit termination

  1. Function (run-unit termination)
  2. Address of COBOL2 partition token
  3. Address of COBOL2 thread token
  4. Address of COBOL2 run-unit token
  5. Address of terminfo.

Determine program type

  1. Function (determine program type)
  2. Address of COBOL2 partition token
  3. Reserved
  4. Address of token-holding program load point
  5. Address of token-holding program entry point
  6. Address of fullword containing program flags to be set by COBOL2
  7. Program flags fullword.

Working storage locate

  1. Function (working storage locate)
  2. Address of COBOL2 partition token
  3. Address of COBOL2 thread token for the transaction
  4. Address of COBOL2 run-unit token for the transaction
  5. Address of a fullword into which COBOL2 saves the address of the user program’s working storage
  6. Address of a fullword into which COBOL2 saves the length of the user program’s working storage.

Perform Goto

This function is not supported for COBOL2.

C parameter lists

The parameter list passed to C varies with the function as follows.

Partition initialization

  1. Function (partition initialization)
  2. Address of reason code
  3. Address of system EIB
  4. Address of 240-byte work-area for use by Language Environment
  5. Address of a double-word into which C saves its partition token
  6. Reserved
  7. Address of a fullword containing the length of the EIB
  8. Address of a fullword into which C saves the length of the thread work-area required for C programs
  9. Address of a fullword into which C saves its interface-level number.

Partition termination

  1. Function (partition termination)
  2. Address of reason code
  3. Address of user EIB
  4. Address of 240-byte work-area for use by C
  5. Address of C partition token.

Thread initialization

  1. Function (thread initialization)
  2. Address of reason code
  3. Address of user EIB
  4. Address of 240-byte work-area for use by C
  5. Address of C partition token
  6. Address of a double-word into which C saves its thread token
  7. Address of C thread Work-area.

Thread termination

  1. Function (thread termination)
  2. Address of reason code
  3. Address of user EIB
  4. Address of 240-byte work-area for use by C
  5. Address of C partition token
  6. Address of C thread token.

Run-unit initialization

  1. Function (run-unit initialization)
  2. Address of reason code
  3. Address of user EIB
  4. Address of 240-byte work-area for use by C
  5. Address of C partition token
  6. Address of C thread token
  7. Address of C run-unit token
  8. Address of C run-unit work area
  9. Address of token-holding module entry point
  10. Address of EIB and COMMAREA address vector
  11. Address of ioinfo.

Run-unit begin invocation

This function is not supported for C.

Run-unit end invocation

This function is not supported for C.

Run-unit termination

  1. Function (run-unit termination)
  2. Address of reason code
  3. Address of user EIB
  4. Address of 240-byte work-area for use by C
  5. Address of C partition token
  6. Address of C thread token
  7. Address of C run-unit token
  8. Address of celinfo.

Determine program type

  1. Function (determine program type)
  2. Address of reason code
  3. Address of user EIB
  4. Address of 240-byte work-area for use by C
  5. Address of C partition token
  6. Address of C thread token
  7. Address of token-holding program load point
  8. Address of token-holding program entry point
  9. Address of fullword containing program flags to be set by C
  10. Address of fullword to receive the length of the required run-unit work-area
  11. Program flags fullword.

Working storage locate

  1. Function (working storage locate)
  2. Address of reason code
  3. Address of user EIB
  4. Address of 240-byte work-area for use by C
  5. Address of C partition token
  6. Address of C thread token for the user transaction
  7. Address of the user program’s register save area
  8. Address of a fullword into which C saves the address of the user program’s working storage
  9. Address of a fullword into which C saves the length of the user program’s working storage.

Perform Goto

This function is not supported for C.

Start of changeEnd of change [[ Contents Previous Page | Next Page Index ]]