MEDIUM LAYOUT

The medium contains the following files. The notation nnn represents the version, release and SM level.

File Format Contents Space Requirements
SQLnnn.LIBR RECFM =U
BLKSIZE =16632
 z/VSE BACKUP for Adabas Native SQL approx. 30 blocks
SQLnnn.ERRN RECFM =VB
BLKSIZE =4628
LRECL =4624
 The Adabas Native SQL preprocessor error messages. It was created using the utility program ERRLODUS. approx. 280 blocks

The library contains the following phases:

Name Description
ADASQLA.PHASE The executable Adabas Native SQL preprocessor (load module) that generates Ada code.
ADASQLC.PHASE The executable Adabas Native SQL preprocessor (load module) that generates COBOL code.
ADASQLF.PHASE The executable Adabas Native SQL preprocessor (load module) that generates FORTRAN code.
ADASQLP.PHASE The executable Adabas Native SQL preprocessor (load module) that generates PL/I code.

The library contains the following obj's:

Name Description
APPEX1DA.OBJ An Adabas Native SQL module (Ada).
APPEX1DC.OBJ An Adabas Native SQL module (COBOL).
APPEX1DF.OBJ An Adabas Native SQL module (FORTRAN).
APPEX1DP.OBJ An Adabas Native SQL module (PL/I).
APPEX2S.OBJ An Adabas Native SQL module.
APPEX3S.OBJ An Adabas Native SQL module.
APPMSG.OBJ An Adabas Native SQL module.
APPTIME.OBJ An Adabas Native SQL module.
ASQL1A.OBJ An Adabas Native SQL module (Ada).
ASQL1C.OBJ An Adabas Native SQL module (COBOL).
ASQL1F.OBJ An Adabas Native SQL module (FORTRAN).
ASQL1P.OBJ An Adabas Native SQL module (PL/I).
CMDIX.OBJ Module that generates the names of the record buffer.
FGFID.OBJ Module that generates a global format ID.
FJOBNAME.OBJ Module that gets the job name.
PRPABEND.OBJ This module is used to abend an application program if an error occurred.
PRTRACE.OBJ Module that traces the record buffers and format buffers during the execution of the application program if MODE TRACE is set (object module, COBOL).
RESPINT.OBJ The response code interpretation routine (object module, COBOL).
SQFRDATE.OBJ Routine which converts format D number to numeric date.
SQFRTIME.OBJ Routine which converts format T number to numeric date and numeric time.
SQTODATE.OBJ Routine which converts numeric date to format D number.
SQTOTIME.OBJ Routine which converts numeric date and numeric time to format T number.

The library contains the following sources:

Name Description
AEX1.A....AEX3.A Ada examples using various Adabas Native SQL statements.
TYPESADA.A Data definitions for use in Ada programs. This file must be compiled before using the Adabas Native SQL preprocessor with Ada source programs.
CEX1.C...CEX3.C COBOL examples using various Adabas Native SQL statements.
CEXC.C A COBOL example using Adabas Native SQL under CICS.
PRTFLOW.C The source code of the routine that prints a flow-trace of all executed Adabas Native SQL statements during the execution of the program if MODE FLOW is set (COBOL).
PRTRACE.C The source code of the routine that traces the record buffers and format buffers during the execution of the application program if MODE TRACE is set (COBOL).
PRTRCICS.C The source code of the routine that traces the record buffers and format buffers during the execution of the application program if MODE TRACE is set (COBOL; for use in CICS programs).
RESPCICS.C The source code of the response code interpretation routine (COBOL; for use in CICS programs).
RESPINT.C The source code of the response code interpretation routine (COBOL).
SQFRDATE.C Routine which converts format D number to numeric date.
SQFRTIME.C Routine which converts format T number to numeric date and numeric time.
SQTODATE.C Routine which converts numeric date to format D number.
SQTOTIME.C Routine which converts numeric date and numeric time to format T number.
FEX1.F...FEX3.F.F FORTRAN examples using various Adabas Native SQL statements.
PRTFLO.F The source code of the routine that prints a flow-trace of all executed Adabas Native SQL statements during the execution of the program if MODE FLOW is set (FORTRAN).
PRTRAC.F The source code of the routine that traces the record buffers and format buffers during the execution of the application program if MODE TRACE is set (FORTRAN).
RESPF.F The source code of the response code interpretation routine (FORTRAN).
PEX1.P...PEX3.P PL/I examples using various Adabas Native SQL statements.
PRTFLOP.P The source code of the routine that prints a flow-trace of all executed Adabas Native SQL statements during the execution of the program if MODE FLOW is set (PL/I).
PRTRACP.P The source code of the routine that traces the record buffers and format buffers during the execution of the application program if MODE TRACE is set (PL/I).
RESPPL1.P The source code of the response code interpretation routine (PL/I).

If necessary, the source modules may be edited to accommodate installation-specific requirements. The original source modules should be retained for future reference.

The members ADASQL.J and SQLJCL.J contain the following procedures with parameterized data. The parameters are documented.

Name Procedures
ADASQL.J

A sample JCL procedure to link Adabas Native SQL.

A sample procedure to generate the procedure SQLLIBS with the utility MAINT.

SQLJCL.J

A sample JCL procedure to preprocess, compile, link and execute an Ada program.

A sample JCL procedure to preprocess, compile, link and execute a COBOL program.

A sample JCL procedure to preprocess, compile, link and execute a FORTRAN program.

A sample JCL procedure to preprocess, compile, link and execute a PL/I program.

A sample JCL procedure to preprocess an Ada, COBOL, FORTRAN or PL/I program. The sub-procedure ASQL must be called with one of the following parameters as appropriate : "SQL='ADASQLA.PHASE'" (Ada) "SQL='ADASQLC.PHASE'" (COBOL) "SQL='ADASQLF.PHASE'" (FORTRAN) "SQL='ADASQLP.PHASE'" (PL/I) Also, the global parameter LANG must be set to the correct value.