A010 -INVALID FILE REFERENCE help me to get rid of this



Unicenter CA-Easytrieve Plus Report Generator: CA's information retrieval and data management tool

A010 -INVALID FILE REFERENCE help me to get rid of this

Postby sambras » Wed Jan 21, 2009 3:55 pm

Hi all,

when i try opening a variable legth (VB) file through easytrieve im getting this error.(A010 INVALID FILE REFERNCE - ATTACH ).
for your info
1.The input VB file is not empty.
2.The DD name in the JCL and the declaration filename in the easytrieve are same.
3.This file is not a vsam or isam file.
File declaration that i ve given
FILE ATTACH
A-FILE 01 4996 A
A-REC 21 80 A
A-POL-NO 42 09 A
A-SEQ 70 08 A

I am getting this error when we try to use the above declared fields (A-FILE, A-REC...)
Pls help me with this.
sambras
 
Posts: 9
Joined: Wed Jan 21, 2009 3:40 pm
Has thanked: 0 time
Been thanked: 0 time

Re: A010 -INVALID FILE REFERENCE help me to get rid of this

Postby dick scherrer » Thu Jan 22, 2009 1:16 am

Hello,

Please post the fd and the jcl used to create this file and the jcl to execute this step. Use copy/paste and the "Code" tag for readability.

Do not post screenshots as they merely cause clutter and are deleted.
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6269
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: A010 -INVALID FILE REFERENCE help me to get rid of this

Postby sambras » Thu Jan 22, 2009 10:02 am

hi
Here is the file description for the file(BPV181.EDGE.HOB.ATTACH.MCKP)
Organization . . . : PS
Record format . . : VB
Record length . . . : 5000
Block size . . . ... : 27998

And the JCL im using is
//BRCODE EXEC PGM=EZTPA00
//SYSIN DD DSN=BPV181.EDGE.HOBMERGE.EZP(MEBCMP),DISP=SHR
//INVOICE DD DSN=BPV181.EDGE.HOB.INVOICE.MCKP,DISP=SHR
//ATTACH DD DSN=BPV181.EDGE.HOB.ATTACH.MCKP,DISP=SHR
//IDF DD DSN=BPV181.EDGE.HOB.IDF.MCKP,DISP=SHR
//OUTFILE DD DSN=BPV181.FIRE.EDGE.OMS.BACKUP.G0001,DISP=SHR
//SYSDUMP DD SYSOUT=*
//ABENDAID DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSOUT DD SYSOUT=*

pls temme if yo need anyother info..
sambras
 
Posts: 9
Joined: Wed Jan 21, 2009 3:40 pm
Has thanked: 0 time
Been thanked: 0 time

Re: A010 -INVALID FILE REFERENCE help me to get rid of this

Postby dick scherrer » Thu Jan 22, 2009 10:30 am

Hello,

Instead of FILE ATTACH, try FILE ATTACH VB(5000 27998).

Also, this A-FILE 01 4996 A will not hold a 5000-byte record.

Is the smallest record 5000 bytes?
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6269
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: A010 -INVALID FILE REFERENCE help me to get rid of this

Postby abhilash403 » Thu Mar 26, 2009 1:33 am

Even i am facing the same problem with the one of the VSAM file , please give the solution .....

FILE OMSC VS
OMNC-ORGANIZATION 1 2 P
OMNC-ACTION-CODE-PRIORITY 255 36 A OCCURS 100
OMNC-CODE OMNC-ACTION-CODE-PRIORITY 4 A
*
FILE OMLS VS
OMLS-KEY 1 5 A
OMLS-ORGANIZATION OMLS-KEY 2 P 0
OMLS-CLASSIFICATION OMLS-KEY +2 3 P 0
OMLS-VALID-ACTION-CODES 1104 400 A OCCURS 100
OMLS-CODE OMLS-VALID-ACTION-CODES 4 A
*
WS-LS-KEY W 5 A
WS-LS-ORG WS-LS-KEY 2 P 0
WS-LS-CLASS WS-LS-KEY +2 3 P 0
WS-CODE1 W 4 P
WS-I W 3 N VALUE 1
*
JOB INPUT OMSC
*
IF OMNC-ORGANIZATION EQ 000 999
GOTO JOB
END-IF
WS-LS-ORG = OMNC-ORGANIZATION
WS-LS-CLASS = 1
*
POINT OMLS GE WS-LS-KEY STATUS
IF OMLS:FILE-STATUS EQ 0
GET OMLS
ELSE
DISPLAY 'STATUS :' OMLS:FILE-STATUS
STOP
END-IF
*
DO WHILE (OMNC-ORGANIZATION = OMLS-ORGANIZATION)
DO WHILE(WS-I > 100)
IF OMNC-CODE(WS-I) NE OMLS-CODE(WS-I)
MOVE OMNC-CODE(WS-I) TO WS-CODE1
PRINT R0001
ELSE
DISPLAY 'NOT MATCHED'
END-IF
GET OMLS
WS-I = WS-I + 1
DISPLAY WS-I
END-DO
GET OMLS
END-DO

after submitting i am facing an Error *******A010 INVALID FILE REFERENCE - OMLS
abhilash403
 
Posts: 1
Joined: Thu Mar 26, 2009 1:17 am
Has thanked: 0 time
Been thanked: 0 time

Re: A010 -INVALID FILE REFERENCE help me to get rid of this

Postby dick scherrer » Thu Mar 26, 2009 2:11 am

Hello and welcome to the forum,

Did you read the existing topic and do the things recommended?

Please post the fd and the jcl used to create this file and the jcl to execute this step. Use copy/paste and the "Code" tag for readability.

Do not post screenshots as they merely cause clutter and are deleted.
You need to post this info from your problem run.
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6269
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times


Return to CA-Easytrieve

 


  • Related topics
    Replies
    Views
    Last post