I have a .net application calling a cl program on my as400. I am passing in a variable length field (example M1900-01 or just M1900 ) into a fixed length 10 char dcl in my cl program. The data is indeed trimmed as it leaves the .net application When I do a cpyf
the value in &SUPPLYCDE can not contain any blanks or I get no data returned with the copy. How can I code this to functionally trim the blanks (so I use "M1900-01" instead of the value "M1900-01 " ) ??????
Thanks
gollnick
Code:
DCL VAR(&SUPPLYCDE) TYPE(*CHAR) LEN(10) CPYF FROMFILE(DOBSOJM1/BACKO00001) + TOFILE(BGLIB/BACKO0001A) CRTFILE(*YES) + INCREL((*IF SUPPL00001 *EQ &SUPPLYCDE))
Thanks
gollnick
Comment