Appendix F:  Obsolete Routines

ACCCOB

This call initializes the HLI environment for COBOL.  ACCCOB is always the first HLI call issued in a COBOL program.  Note:  With the use of ACCINI, the language dependent initialization procedures have become obsolete.

SYNTAX

CALL ACCCOB (error_code [ , options])

error_code

is returned and contains a value that can be tested to see if the call was successful when control returns to the host program.  If a zero is returned, it means that the requested function was successful. Refer to Appendix C for a list of the error codes.

options

specifies options for this call:

HUSH - do not print error and warning messages.

TRACE - print argument values at execution time.

NOTRACE - do not print argument values at execution time.

Example

WORKING-STORAGE SECTION.
   01 ERROR_CODE   PIC S9(9)  USAGE COMP.
PROCEDURE DIVISION.
   CALL 'ACCCOB' USING BY DESCRIPTOR ERROR_CODE.

SEE ALSO:  ACCINI

ACCFOR

This call initializes the HLI environment for a FORTRAN program.  ACCFOR is always the first HLI call issued in a FORTRAN program.  Note:  With the use of ACCINI, the language dependent initialization procedures have become obsolete.

SYNTAX

CALL ACCFOR (error_code [ , options] )

error_code

is returned and contains a value that can be tested to see if the call was successful when control returns to the host program.  If a zero is returned, it means that the requested function was successful. Refer to Appendix C for a list of the error codes.

options

specifies options for this call:

HUSH - do not print error and warning messages.

TRACE - print argument values at execution time.

NOTRACE - do not print argument values at execution time.

Example

INTEGER ERROR_CODE

CALL ACCFOR(%DESCR(ERROR_CODE))

SEE ALSO:  ACCINI

ACCMAC

This call initializes the HLI environment for an assembly language program.  ACCMAC is always the first HLI call issued in an assembly language program.  Note:  With the use of ACCINI, the language dependent initialization subroutines have become obsolete.

SYNTAX

CALL ACCMAC (error_code [ , options])

error_code

is returned and contains a value that can be tested to see if the call was successful when control returns to the host program.  If a zero is returned, it means that the requested function was successful. Refer to Appendix C for a list of the error codes.

options

specifies options for this call:

HUSH - do not print error and warning messages.

TRACE - print argument values at execution time.

NOTRACE - do not print argument values at execution time.

Examples

CALL ACCMAC (err)

SEE ALSO:  ACCINI