View previous topic :: View next topic |
Author |
Message |
pkarthik@email.com Beginner
Joined: 29 Mar 2005 Posts: 34 Topics: 18 Location: Canada
|
Posted: Fri Aug 19, 2005 9:46 am Post subject: How can i do multiple start browse on a single file in cobol |
|
|
How can i do multiple start browse on a single file in cobol??.Please help me because i need to do partial key read on a single file simultaneously. |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12376 Topics: 75 Location: San Jose
|
Posted: Fri Aug 19, 2005 10:08 am Post subject: |
|
|
pkarthik,
What exactly are you trying to do ? If you want to read the file with partial key , why not sort the file on key and look up until it is greater than the look up key ? If post the requirement then may be we can suggest a solution.
Kolusu _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
|
pkarthik@email.com Beginner
Joined: 29 Mar 2005 Posts: 34 Topics: 18 Location: Canada
|
Posted: Fri Aug 19, 2005 10:11 am Post subject: |
|
|
I need to start browse on a file and then read then again start browse the same file consicutively to purge them.
first start browse i am using different start browse key and in secoun start browse different partial key.This my requirement.
Please give me a suggestion. |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12376 Topics: 75 Location: San Jose
|
Posted: Fri Aug 19, 2005 10:16 am Post subject: |
|
|
Pkarthik,
Let us assume that the following is your input file.
Code: |
ABC12345
ABC23456
ABC34567
DEF00000
DEF12345
EFG12345
|
Let us say you want to purge 2 keys ABC and EFG. They are in another file.
Have both the files sorted on the key.
You read the first look up key which is ABC and now you will open file-1 and read until your partial is greater than the lookup key ! so you process all the records of key ABC. Similarly you repeat the process until the end of look up file.
Hope this helps...
Cheers
kolusu _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
|
|
|