IBM Mainframe Forum

When I complie the easytrieve, always got the error below and I am using the EZTPA00:

OPTIONS FOR THIS RUN - ABEXIT SNAP DEBUG (STATE FLDCHK NOXREF) LIST (PARM FILE
SORT (DEVICE SYSDA ALTSEQ NO MSG DEFAULT MEMORY MAX WORK 3) VFM ( 64)
*******A067 CA COMMON SVCS EASYTRIEVE USAGE ERROR - USAGE NOT ALLOWED
*******A014 PREMATURE TERMINATION DUE TO PREVIOUS ERROR(S)

Hello and welcome to the forum,

Please post where in the manual you found this syntax. . .

Did you read the information about the A067 error?

Which release of Easytrieve is being used?

If will probably help if you post some of the source before and after the problem line. . .

Thanks for your help. and the release is, and run on OS390
CA-EASYTRIEVE PLUS-6.4 0311
Computer Associates - Common Services Installation

What I noticed is that this is more like a enviroment related issue. Even I used an existing job with the instream easytrieve , I still got this error.

And the only difference is a steplib inside. In that old JCL, it gave a specific load lib for the EZTPA00 (but what I understand is that the system lib could find it also).
Since I am not able to use this load lib alrady, I just removed it and seems I can invoke the EZTPA00 from a system level lib.

BTW, nowhere can found the error of A067.

000019 //STEP1 EXEC PGM=EZTPA00
000020 //*STEPLIB DD DSN=XXXXXX
000021 //* DISP=SHR
000022 //SYSPRINT DD SYSOUT=*
000023 //SYSOUT DD SYSOUT=*
000024 //EZTVFM DD SPACE=(8192,(50,50)),
000025 // UNIT=SYSDA
000026 //FILEA DD DSN=XXXXX
000027 //FILEB DD DSN=XXXXX

This kind of error is not a coding error I believe.

Hello,

This kind of error is not a coding error I believe.

Well, maybe not directly. . .
To repeat:

If will probably help if you post some of the source before and after the problem line. . .

and

Please post where in the manual you found this syntax. . .

It may be that the library not used contains a different release/level of Easytrieve.

I'm not where my Easytrieve collecton is avaliable - possibly tomorrow.

Thanks D.sch.

If will probably help if you post some of the source before and after the problem line. . .

For the code I am using an existing version that was run in the production before. And due to the compliance reason I am not able to post my code.



Those syntax can be found in the JCL log , after run with the EZTPA00, it appears in the log after the source code for example:

67 END-IF
68 END-IF
69 IF NWSFX = '26010', '26030', '33010'
70 WO = 'Y'
71 END-IF
72 *
73 LABEL
74 PUT FILEB FROM FILEA
OPTIONS FOR THIS RUN - ABEXIT SNAP DEBUG (STATE FLDCHK NOXREF) LIST (PARM FILE) PRESIZE 512
SORT (DEVICE SYSDA ALTSEQ NO MSG DEFAULT MEMORY MAX WORK 3) VFM ( 64)
*******A067 CA COMMON SVCS EASYTRIEVE USAGE ERROR - USAGE NOT ALLOWED
*******A014 PREMATURE TERMINATION DUE TO PREVIOUS ERROR(S)

Hello,

It may be that the library not used contains a different release/level of Easytrieve.

And the only difference is a steplib inside.

You need to use the same library as the run that works. . . It is quite possible that these point to 2 different releases. . .

Show the top part of an output from a "production" job that works and the top part of this job that fails.

Somewhere (i expect) is a diagnostic that tells the problem statement number.

I found a possible reason the current release of easytrieve is CA-EASYTRIEVE PLUS-6.4 0311, but the complie module EZTPA00 is using RMODE = 24, AMODE = 31.

I saw the FAQ below is that for the CA plus 6.4 is distributed with AMODE=31, RMODE=ANY ??
http://www.ncdhhs.gov/dirm/team51/easytrv.htm

Inside the FAQ it mentioned a ALL31=YES option, where can we put such kind of option?

Hello,

Suggest you open an issue with CA Support. They can help resolve your situation.

Hello,

Found this on the CA Support web site:
http://supportconnectw.ca.com/public/ap ... s_faqs.asp

Suggest you talk with whoever installed/supports the Easytrieve product. You need to look at and possibly change the Options.

Before making any changes, i'd make sure that you and/or the installer understand "the rules" as relate to Panaudit.