In your program, you will match the appropriate working storage
variables with the appropriate API:
D E@FLT DS INZ EXPORT FILTER-WS
D E@FLTHANDLE * FILTER-HANDLE
D E@FLTSTRING 1000 FILTER-STRING
D E@FLTVALPHANUM 100 .PHANUM-FILTER-VALUE
D E@FLTVNUMERIC 18S 0 NUMERIC-FILTER-VALUE
D E@FLTVSIGNED0 18S 0 SIGNED0-FILTER-VALUE
D E@FLTVSIGNED1 18S 1 SIGNED1-FILTER-VALUE
D E@FLTVSIGNED2 18S 2 SIGNED2-FILTER-VALUE
D E@FLTVSIGNED3 18S 3 SIGNED3-FILTER-VALUE
D E@FLTVSIGNED4 18S 4 SIGNED4-FILTER-VALUE
D E@FLTVSIGNED5 18S 5 SIGNED5-FILTER-VALUE
D E@FLTVSIGNED6 18S 6 SIGNED6-FILTER-VALUE
D E@FLTVSIGNED7 18S 7 SIGNED7-FILTER-VALUE
D E@FLTVSIGNED8 18S 8 SIGNED8-FILTER-VALUE
D E@FLTVSIGNED9 18S 9 SIGNED9-FILTER-VALUE
D E@FLTVDATETIME 8S 0 .TETIME-FILTER-VALUE
|