01 SQLDA-NAME.
< rest of sqlda declaration >
01 ITEM-NUMBER PIC S9(9) COMP.
01 DATA-BUFFER < picture >.
01 PICTURE-TYPE PIC S9(9) COMP.
01 M PIC S9(9) COMP.
01 N PIC S9(9) COMP.
01 USAGE-TYPE PIC S9(9) COMP.
01 SIGN-TYPE PIC S9(9) COMP
CALL “SYBSETSQLDA” USING SQLDA-NAME ITEM-NUMBER
DATA-BUFFER PICTURE-TYPE M N USAGE-TYPE SIGN-TYPE
where:
SQLDA-NAME is the SQLDA to set the information in.
ITEM-NUMBER is the item to set the information for.
DATA-BUFFER is the host variable with data.
PICTURE-TYPE is the kind of picture clause the data has. See Table 7-2 for possible values.
M is the value of “m” in the picture clause, as described in the table, or 0 if no picture.
N is the value of “n” in the picture clause as described above, or 0 if no picture.
SIGN-TYPE is the sign clause used to define the data. SeeTable 7-2 for possible values.
USAGE-TYPE is the usage clause used to define the data. See Table 7-2 for possible values.
Argument |
Value |
Meaning |
---|---|---|
USAGE-TYPE |
SYB-BINARY-USAGE |
USAGE IS BINARY |
USAGE-TYPE |
SYB-COMP-USAGE |
USAGE IS COMP |
USAGE-TYPE |
SYB-COMP1-USAGE |
USAGE IS COMP-1 |
USAGE-TYPE |
SYB-COMP2-USAGE |
USAGE IS COMP-2 |
USAGE-TYPE |
SYB-COMP3-USAGE |
USAGE IS COMP-3 |
USAGE-TYPE |
SYB-COMP4-USAGE |
USAGE IS COMP-4 |
USAGE-TYPE |
SYB-COMP5-USAGE |
USAGE IS COMP-5 |
USAGE-TYPE |
SYB-COMP6-USAGE |
USAGE IS COMP-6 |
USAGE-TYPE |
SYB-COMPX-USAGE |
USAGE IS COMP-X |
USAGE-TYPE |
SYB-DISPLAY-USAGE |
USAGE IS DISPLAY |
USAGE-TYPE |
SYB-POINTER-USAGE |
USAGE IS POINTER |
USAGE-TYPE |
SYB-INDEX-USAGE |
USAGE IS INDEX |
USAGE-TYPE |
SYB-MONEY-USAGE |
USAGE IS CS-MONEY |
USAGE-TYPE |
SYB-MONEY4-USAGE |
USAGE IS CS-MONEY4 |
USAGE-TYPE |
SYB-DATE-USAGE |
USAGE IS CS-DATE |
USAGE-TYPE |
SYB-TIME-USAGE |
USAGE IS CS-TIME |
USAGE-TYPE |
SYB-DATETIME-USAGE |
USAGE IS CS-DATETIME |
USAGE-TYPE |
SYB-DATETIME4-USAGE |
USAGE IS CS-DATETIME4 |
USAGE-TYPE |
SYB-NO-USAGE |
No usage clause |
PICTURE-TYPE |
SYB-NO-PIC |
No picture clause |
PICTURE-TYPE |
SYB-SNINES-PIC |
PIC S9(m) |
PICTURE-TYPE |
SYB-NINES-PIC |
PIC 9(m) |
PICTURE-TYPE |
SYB-SVNINES-PIC |
PIC S9(m)V9(n) or SV9(n) |
PICTURE-TYPE |
SYB-VNINES-PIC |
PIC 9(m)V9(n) or V9(n) |
PICTURE-TYPE |
SYB-X-PIC |
PIC X(m) |
SIGN-TYPE |
SYB-NO-SIGN |
No sign clause (not an unsigned PIC clause) |
SIGN-TYPE |
SYB-LEADING-SEPARATE-SIGN |
SIGN LEADING SEPARATE |
SIGN-TYPE |
SYB-TRAILING-SEPARATE-SIGN |
SIGN TRAILING SEPARATE |
SIGN-TYPE |
SYB-LEADING-SIGN |
SIGN LEADING |
SIGN-TYPE |
SYB-TRAILING-SIGN |
SIGN TRAILING |