|
Hi list! I have this: START: PGM PARM(&TASK) DCL VAR(&TASK) TYPE(*CHAR) LEN(10) IF COND(&TASK *NE '*ALL') THEN(DO) DLTF FILE(QTEMP/YAAVREP) MONMSG MSGID(CPF0000) CPYF FROMFILE(YAAVREP) TOFILE(QTEMP/YAAVREP) + CRTFILE(*YES) INCREL((*IF AVAQCD *EQ &TASK)) ENDDO END: ENDPGM If the value for &TASK is "ABC", then the file being builded end up with four records as follows: 1) ABC 2) ABCPRIME 3) ABCDIDS 4) ABC3 Why? I just want the "ABC" record to be created in QTEMP? What I am doing wrong? TIA, Peter Vidal PALL Corporation / IT Development Group 10540 Ridge Rd., Ste 203 New Port Richey, FL 34654-5111 http://www.pall.com "Knowledge is power." -- Francis Bacon (1561 - 1626)
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 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.