Page 1 of 1

invalid file reference

PostPosted: Fri Feb 26, 2010 8:16 pm
by niceville
this is the job...
//INPUT01 DD DSN=PC.DWPS.LIST10.CROSSREF,
// DISP=SHR
//INPUT02 DD DSN=PC.UXPO.INPUT(EXVSAM),
// DISP=SHR
//OUTPUT01 DD DSN=SG.DWPS.LIST11.CROSSREF,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,100,RLSE),
// DCB=(PRODGDG,RECFM=FB,LRECL=80,BLKSIZE=0,DSORG=PS)
//SORTWK01 DD UNIT=WORK,SPACE=(CYL,(25,5),RLSE)
//EZTVFM DD UNIT=WORK,SPACE=(CYL,(25,5),RLSE)
//SYSIN DD *
*
FILE INPUT01
DATASET-NAME 1 41 A
FILE INPUT02
EXCLUDE-NAME 1 41 A
FILE OUTPUT01
O-REC 1 80 A

*
*
JOB INPUT (INPUT01 KEY DATASET-NAME INPUT02 KEY EXCLUDE-NAME)
*
*---------------------------------------4-------------------------
* WHEN A FILE NAME FROM THE EXCLUDE LIST MATCHES A FILE NAME OF
* ONE OF THE ELIGIBLE FILES, THAT FILE NAME WILL BE EXCLUDED.
*-----------------------------------------------------------------
IF MATCHED
GO TO JOB
END-IF
MOVE DATASET-NAME TO O-REC
DISPLAY 'DATASET-NAME ' DATASET-NAME
PUT OUTPUT01
GO TO JOB

*
here are the files...
Data Set Name . . . . : SG.DWPS.LIST11.CROSSREF
Organization . . . : PS Used cylinders . . : 1
Record format . . . : FB Used extents . . . : 1
Record length . . . : 80
Block size . . . . : 27920

Data Set Name . . . . : PC.DWPS.LIST10.CROSSREF
Organization . . . : PS Used cylinders . . : 1
Record format . . . : FB Used extents . . . : 1
Record length . . . : 80
Block size . . . . : 27920

PC.UXPO.INPUT(EXVSAM) 80 byte record

error message i am getting..
SORT (DEVICE SYSDA ALTSEQ NO MSG DEFAULT MEMORY 1024 WORK 3) VFM ( 64)
19 *******A010 INVALID FILE REFERENCE - INPUT01
02/26/10 9.45.30 CA-EASYTRIEVE PLUS-6.4 0202
AMERICAN FAMILY LIFE ASSURANCE COMPANY
PROGRAMS AND ALL SUPPORTING MATERIALS COPYRIGHT (C) 1982, 1996 BY COMPUTER ASSOC
FILE STATISTICS - CA-EASYTRIEVE PLUS 6.4 0202-02/26/10- 9.45-JSN00010
INPUT01 630 INPUT SAM FIX BLK 80 2
INPUT02 19 INPUT SAM FIX BLK 80
OUTPUT01 612 OUTPUT SAM FIX BLK 80 2

thanks in advance for your help
atp

Re: invalid file reference

PostPosted: Sat Feb 27, 2010 12:32 am
by dick scherrer
Hello and welcome to the forum,

Untested, but i suspect the problem is due to wrong length records. . .

The files are lrecl 80, but the file definition is 41?