PROBLEMA EN SELECT
Publicado por RICARDO (1 intervención) el 29/04/2009 23:55:02
HOLAS,
EN MI PROGRAMA BATCH (COBOL 390) ESTOY DECLARANDO UN ARCHIVO VSAM TAL COMO LO INDICO. SIN EMBARGO ME MUESTRA DOS ERRORES AL MOMENTO DE COMPILAR, POR FAVOR SI ALGUIEN PUEDE DARME PISTAS PARA SOLUCIONAR ESTE PROBLEMA SE LO AGRADEZCO DE ANTEMANO.
SELECT CV0505O ASSIGN TO CV0505O
ORGANIZATION IS INDEXED
ACCESS MODE IS SEQUENTIAL
RECORD KEY IS O1-KEY
ALTERNATE RECORD KEY IS O1-ALTER-KEY WITH DUPLICATES
FILE STATUS IS STATUS-CV0505O.
LA FD LA HE DEFINIDO ASI:
FD CV0505O.
01 REG-CV0505O.
02 O1-KEY.
03 O1-COD-EMP PIC X(08).
03 O1-COD-VAL PIC X(12).
02 O1-MOD-MOD PIC 9(02).
02 O1-FEC-OPE PIC 9(08).
02 O1-ALTER-KEY.
03 O1-NUM-OPE PIC X(07).
02 O1-CAN-CAN PIC 9(12).
02 O1-INT-COM PIC 9(04).
02 O1-INT-VEN PIC 9(04).
02 O1-TIP-OPE PIC X(06).
02 O1-COD-TIT PIC 9(08).
02 O1-IND-ASC PIC X(02).
02 O1-NOM-TIT PIC X(60).
02 O1-CAN-CAV PIC 9(12).
02 O1-CAN-FIS PIC 9(12).
02 O1-EST-OPE PIC X(06).
PERO RESULTA QUE CUANDO COMPILO ME MUESTRA EL SGTE ERROR:
230 IGYPA3050-S "KEY" data-name "O1-NUM-OPE (ALPHANUMERIC)" was not defined as a "RECORD KEY", "ALTERNATE RECORD K.....
"RELATIVE KEY" for VSAM file "CV0508R". The statement was discarded.
230 IGYPA3026-S "ORGANIZATION" of file "CV0508R" was not VSAM "RELATIVE" or "INDEXED". The "START" statement was
EN MI PROGRAMA BATCH (COBOL 390) ESTOY DECLARANDO UN ARCHIVO VSAM TAL COMO LO INDICO. SIN EMBARGO ME MUESTRA DOS ERRORES AL MOMENTO DE COMPILAR, POR FAVOR SI ALGUIEN PUEDE DARME PISTAS PARA SOLUCIONAR ESTE PROBLEMA SE LO AGRADEZCO DE ANTEMANO.
SELECT CV0505O ASSIGN TO CV0505O
ORGANIZATION IS INDEXED
ACCESS MODE IS SEQUENTIAL
RECORD KEY IS O1-KEY
ALTERNATE RECORD KEY IS O1-ALTER-KEY WITH DUPLICATES
FILE STATUS IS STATUS-CV0505O.
LA FD LA HE DEFINIDO ASI:
FD CV0505O.
01 REG-CV0505O.
02 O1-KEY.
03 O1-COD-EMP PIC X(08).
03 O1-COD-VAL PIC X(12).
02 O1-MOD-MOD PIC 9(02).
02 O1-FEC-OPE PIC 9(08).
02 O1-ALTER-KEY.
03 O1-NUM-OPE PIC X(07).
02 O1-CAN-CAN PIC 9(12).
02 O1-INT-COM PIC 9(04).
02 O1-INT-VEN PIC 9(04).
02 O1-TIP-OPE PIC X(06).
02 O1-COD-TIT PIC 9(08).
02 O1-IND-ASC PIC X(02).
02 O1-NOM-TIT PIC X(60).
02 O1-CAN-CAV PIC 9(12).
02 O1-CAN-FIS PIC 9(12).
02 O1-EST-OPE PIC X(06).
PERO RESULTA QUE CUANDO COMPILO ME MUESTRA EL SGTE ERROR:
230 IGYPA3050-S "KEY" data-name "O1-NUM-OPE (ALPHANUMERIC)" was not defined as a "RECORD KEY", "ALTERNATE RECORD K.....
"RELATIVE KEY" for VSAM file "CV0508R". The statement was discarded.
230 IGYPA3026-S "ORGANIZATION" of file "CV0508R" was not VSAM "RELATIVE" or "INDEXED". The "START" statement was
Valora esta pregunta


0