In your program, you will match the appropriate working storage
variables with the appropriate API:
FILTER-STRING PIC X(1000) VALUE SPACES
ALPHANUM FILTER-VALUE PIC X(100) VALUE SPACES
NUMERIC-FILTER-VALUE PIC 9(18) VALUE ZEROES
SIGNED0-FILTER-VALUE PIC 9(17) VALUE ZEROES
SIGNED1-FILTER-VALUE PIC 9(16)V9(1) VALUE ZEROES
SIGNED2-FILTER-VALUE PIC 9(15)V9(2) VALUE ZEROES
SIGNED3-FILTER-VALUE PIC 9(14)V9(3) VALUE ZEROES
SIGNED4-FILTER-VALUE PIC 9(14)V9(4) VALUE ZEROES
SIGNED5-FILTER-VALUE PIC 9(14)V9(5) VALUE ZEROES
SIGNED6-FILTER-VALUE PIC 9(14)V9(6) VALUE ZEROES
SIGNED7-FILTER-VALUE PIC 9(14)V9(7) VALUE ZEROES
DATETIME-FILTER-VALUE PIC 9(8) VALUE ZEROES
|