Easytrieve / vsam lrecl question.

smaru · New User Joined: 22 Oct 2008 Posts: 49 Location: India

Hi Frank,

Your 1st post answered my queries regarding VSAM V input and non-vsam VB output.

This is an another scenario,

I am trying to add records into a VSAM V file(max LRECL 69) using easytrive program,

for the same VSAM V file, if I initialize the record and write that new record into VSAM V file, it is showing the length of the record as 73.

Please let me know, if u require more details.

dick scherrer · Posted: Mon Dec 15, 2008 1:19 am

Hello,

This has been split from your topic in the DFSORT part of the forum.

Post the file definition from the Easytrieve program, the code you use to add records, and the jcl for that step. Also, post the IDCAMS DEFINE (and jcl) for the vasam file creation.

smaru · New User Joined: 22 Oct 2008 Posts: 49 Location: India

Hi,

VSAM V File defined as:

DEFINE CLUSTER -
( NAME ( TEST.VSAM.SYSTEM.CONTROL ) -
FREESPACE ( 00 00 ) -
KEYS ( 11 0 ) -
RECORDSIZE ( 52 69 ) -
SHAREOPTIONS ( 2 3 ) SPEED TO ( 2099365 ) -
DATACLASS ( PVSAM000 ) ) -
DATA -
( NAME ( TEST.VSAM.SYSTEM.CONTROL.D ) -
CISZ ( 4096 ) -
RECORDS ( 115200 23040 ) -
VOLUMES ( DATVOL ) ) -
INDEX -
( NAME ( TEST.VSAM.SYSTEM.CONTROL.I ) -
CISZ ( 1536 ) -
VOLUMES ( IDXVOL ) )
IF LASTCC NE 0 THEN SET MAXCC=16

I am adding records in to this VSAM V file using easytrieve code.
In the eastrieve code, I have initialized the record with Spaces and after processing, the record is being added to VSAM V file.

When the file is updated i did not find anything wrong, but when I use this VSAm V file to Sort copy it into a SAM file it failed with

ICE217A 3 73 BYTE VARIABLE RECORD IS LONGER THAN 69 BYTE MAXIMUM FOR SORTOUT

Let me know incase you need any other details.

dick scherrer · Posted: Tue Dec 16, 2008 1:35 am

Hello,

This was "covered" in your other topic in the DFSORT part of the forum. . .

You have to use 73 - not 69 for SORTOUT, if i understand what is happening.