Comments on: CPYF selecting a record by a variable

By: tomliotta

tomliotta — Sun, 25 Apr 2010 07:57:26 +0000

…you need to clear (CLRPFM) the DLTOLDSPLF/REC_SFT file before you do the RUNQRY, unless you intend to ADD records to those already in that file.

RUNQRY allows OUTFILE( … *RPLMBR) to replace records in a member. This eliminates a need to code a CLRPFM command.

And note that MOVSPLFBRM is only available for sites that have BRMS installed.

Tom

sloopy — Wed, 11 Jun 2008 14:42:31 +0000

Thanks! Martin and I will be over for a drink later….

silvarb — Tue, 10 Jun 2008 14:30:11 +0000

Sloopy

Thanks for Your patiente and cooperation, You and Gilly400 are my best friends !!!

Regards,
Roberto

gilly400 — Fri, 06 Jun 2008 12:11:15 +0000

Hi,

This should do what you want :-

CPYF FROMFILE(Yourfile) TOFILE(Newfile) CRTFILE(*YES) INCREL((*IF SPLDAT *EQ &SYSDATE))

Regards,

Martin Gilbert.

silvarb — Thu, 05 Jun 2008 21:13:58 +0000

have a Physical file and this phisical have this field:
&SPLDAT *CHAR 6 SUBSTR(WRKSPLF,89,2)|| SUBSTR(WRKSPLF,86

I need read this file and compare if the field &SPLDAT is equal the variable Sysdate, if this information is equal, only copy this records.

Thanks for Your help