Well, its Sunday noon and time to cry "Uncle"
I'm working on an old (and I do mean old) COBOL program which was
moved to NM a few years ago. Reads what is now a KSAM XL file.
Though I would SWEAR the key is correct, I need to verify the
structure of this file. Under CM, we used KSAMUTIL, VERIFY. I don't
recall, but how do I do this to a KSAM XL file?
As always, any assistance is greatly appreciated.
Joe Howell
HIS Company
Onsite at Intl. Paper - Savannah
BTW, here is the tombstone:
Filename: HCS10
File status is 39
File's fixed attributes differ from program [39] KEY (COBERR 648)
Program file: HCSA10.OBJECT.LDPE
END OF FILE (FSERR 0)
+-F-I-L-E---I-N-F-O-R-M-A-T-I-O-N---D-I-S-P-L-A-Y+
! FILE NAME IS HCS20.GRIFPROD.LDPE !
! FOPTIONS: SYS,ASCII,FORMAL,F,NOCCTL,FEQ,KXL !
! NOLABEL !
! AOPTIONS: INPUT,NOMR,LOCK,SHR,BUF,NOMULTI !
! WAIT,NOCOPY !
! DEVICE TYPE: 3 DEVICE SUBTYPE: 8 !
! LDEV: 2 DRT: 8 UNIT: 0 !
! RECORD SIZE: 14 BLOCK SIZE: 4096 (BYTES) !
! EXTENT SIZE: 110 MAX EXTENTS: 8 !
! RECPTR: 0 RECLIMIT: 3033 !
! LOGCOUNT: 5 PHYSCOUNT: 0 !
! EOF AT: 1 LABEL ADDR: %00000000000 !
! FILE CODE: 0 ULABELS: 0 !
! FILE OWNER: JOE.LDPE !
! PHYSICAL STATUS: ???????????????? !
! ERROR NUMBER: 0 RESIDUE: 0 !
! BLOCK NUMBER: 0 NUMREC: 37 !
+------------------------------------------------+
**** COB_QUIT 648 ****
|