In the following example, n represents the number for each SQLWA generated by the Preprocessor for Assembler.
SQLWA DSECT
SQLWAEYE DS CL8 .EYE CATCHER
SQLWALEN DS F .BLOCK LENGTH
SQLWACMD DS CL5 .Q COMMAND
SQLWAFLG DS X .FLAGS
SQLWAFIL DS CL2 .UNUSED
SQLWAFNM DS CL8 .ROUTINE NAME
SQLWASTP DS F .STAMP
SQLWASID DS F .STATEMENT ID
SQLWAHDS DS F .ADDR HOST VAR AREA
SQLWAEND DS CL8 .END EYE CATCHER
SQLWADLN EQU *-SQLWA
SQLHAARA DS 0CL8 .HOST VAR AREA
SQLHAHVL DS F .LENGTH OF VARS
SQLHANHV DS H .NBR OF VARS
SQLHAFIL DS CL2 .UNUSED
SQLHAALN EQU *-SQLHAARA .LENGTH OF HOST VAR AREA
SQLHVBGN DS 0C .START OF VARS
SQLWATLN EQU *-SQLWA .LENGTH OF SQLWA & HOST HDR
0 to n VARs depending
on statement
SQLHVTYP DS H .STORAGE TYPE
SQLHVLEN DS H .LENGTH OR PRECISION/SCALE
SQLHVDAT DS F .ADDR OF RECEIVING FIELD
SQLHVIND DS F .ADDR OF INDICATOR FIELD
SQLHVDIR DS CL1 .DIRECTION
SQLHVFIL DS CL3 .UNUSED
SQLHVDLN EQU *-SQLHVAR .LENGTH OF HOST VAR
|
Copyright © 2014 CA.
All rights reserved.
|
|