Joined: 22 Apr 2006 Posts: 6258 Location: Mumbai, India
Since afternoon (IST) I was thinking how to reply this question -
- thought to suggest to look into some similar program at your shop
- then wanted to ask decide on - what do you want ? Do you want to drive your program or progrm should drive you..phew..then I give up didn't post anything.
However Dbz beats me anyway..
May be posting your question in rather structured manner would give me one more chance to compete dbzTHEdinosauer..
Joined: 23 Nov 2006 Posts: 19270 Location: Inside the Matrix
If these copybooks define a "record" you need to tell more about the record(s). Is this file fixed or variable? Why are there 6? Why do you believe you need 6? Why the level numbers used? What does the data look like (show a few example data records)?
i have to declare its structre but i am bit confuse can anyone please help...
You are likely less confused than we are. . .
Once some clear information is posted about what you want to do , someone should be able to help.
COPY MAIN REPLACING ==(P)== BY ==PKS==.
10 9T12-RT-DATA PIC X(420) REDEFINES PKS-DATA.
COPY ONE REPLACING ==(P)== BY ==PKS==.
COPY TWO REPLACING ==(P)== BY ==PKS==.
COPY THREE REPLACING ==(P)== BY ==PS==.
10 9T12-W-HEADER REDEFINES PKS-DATA.
COPY FOUR REPLACING ==(P)== BY ==PKS==.
COPY FIVE REPLACING ==(P)== BY ==PKS==.
could anyone help...
it is showing the following compilation error
REDEFINES" object "PKS-DATA" was not the immediately preceding level
Clause was discarded.