|
I am assuming fxc is a variable of some kind if this is the case code it as follows also, change the callp to use %size C Eval Qcmd = 'CPYTOIMPF FROMFILE('+ c FXC + C ')TOSTMF(''qdls/forcastx/fxc.t'+ C 'xt'') MBROPT(*REPLACE) STMFCO'+ C 'DPAG(*PCASCII) CDDLM(*OPT(*RE'+ C 'PLACE) STMFCODPAG(*PCASCII) C'+ C 'DDLM(*CR) DTAFMT(*DLM) STRDLM'+ C '(*NONE) FLDDLM(X''05'')' * C CallP Qcmdexc(Qcmd:%SIZE(Qcmd)) Here is an example from my system also worked on v5r1 C EVAL CmdText= 'OVRPRTF FILE('+ FORM +' ) + C FORMTYPE('+ Frm_typ +') + C HOLD('+ Hold +') SAVE('+ SAVE +') + C USRDTA('+ USRDTA +') OUTQ('+ OUTQ +') + C duplex(' + DUPLEX +')' C callp qcmdexc(CmdText : %size(CmdText)) J. Scott Carter Programmer/Analyst e-mail: Mailto:scarter@xxxxxxxxxxx Phone: 214.583.0348 It's not the destination that counts in life it's the journey. The journey with the people we love is all that really matters. Such a simple truth so easily forgotten.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.