BARUCH,
Do you still have the utility program you wrote about in a previous thread?
Thanks,
Rick
C O B O L I N D E X F I L E T O S E Q U E N T I A L F I L E
================================================================
(ESC-EXIT)
1. INPUT INDEX
FILE PATH+NAME: '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~'
NUBER OF RECORDS:~~~~~~~~~~~~~~~~~~~
FIX/VAR: ~ (F-FIX , V-VAR)
RECORD LENGTH: FROM: ~~~~ TO: ~~~~
KEY INFORMATION: ALTERNATE-KEYS:'~' (0-NO,1-YES)
! KEY ! STARTING ! KEY ! DUPLICATES !
! NUMBER ! POSITION ! LENGTH ! PERMITTED !
! ------ ! -------- ! ------ ! ---------- !
! XXXXX ! 'ZZZZ' ! 'ZZZZ' ! 'X' !
2. OUTPUT SEQUENTIAL
FILE PATH+NAME: '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~'
OUTPUT FILE EXIST OVERIDE?:'~' (Y-YES ' N-NO)
FUNCTION: '~' (1-2 , Y-OK , @,ESC-EXIT)
Do you still have the utility program you wrote about in a previous thread?
Thanks,
Rick
C O B O L I N D E X F I L E T O S E Q U E N T I A L F I L E
================================================================
(ESC-EXIT)
1. INPUT INDEX
FILE PATH+NAME: '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~'
NUBER OF RECORDS:~~~~~~~~~~~~~~~~~~~
FIX/VAR: ~ (F-FIX , V-VAR)
RECORD LENGTH: FROM: ~~~~ TO: ~~~~
KEY INFORMATION: ALTERNATE-KEYS:'~' (0-NO,1-YES)
! KEY ! STARTING ! KEY ! DUPLICATES !
! NUMBER ! POSITION ! LENGTH ! PERMITTED !
! ------ ! -------- ! ------ ! ---------- !
! XXXXX ! 'ZZZZ' ! 'ZZZZ' ! 'X' !
2. OUTPUT SEQUENTIAL
FILE PATH+NAME: '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~'
OUTPUT FILE EXIST OVERIDE?:'~' (Y-YES ' N-NO)
FUNCTION: '~' (1-2 , Y-OK , @,ESC-EXIT)