View previous topic :: View next topic
|
Author |
Message |
srini_igsi Currently Banned New User
Joined: 09 Dec 2005 Posts: 30 Location: Pune
|
|
|
|
Hi
1. Can we Redefine FILLER..?
2. Can we apply Ref. Modification on FILLER...?
My requirement is that i have a FILLER with the PIC clause X(200), One of the incomming field is overwriting the FILLER from the position 70 to 80, so how can i trap these 10 chars..?
One way is i can simply replace the FILLER with another field on which i can apply the Ref. Modification.
Other than this is there any other technique to trap those 10 chars thru prog logic with out disturbing the CopyBook..? |
|
Back to top |
|
|
umeshkmrsh
New User
Joined: 21 Sep 2005 Posts: 79 Location: India
|
|
|
|
No we cannot redefine a FILLER nor can use reference modification for it.
But you can retrive the desired char using reference modification at the group level under which your filler is defined.
For example:
01 A.
05 B PIC X(10).
05 FILLER PIC X(200).
05 C PIC X(10).
Now you can use A(80:10) in order to refer 10 chars from 70-to-80. |
|
Back to top |
|
|
srini_igsi Currently Banned New User
Joined: 09 Dec 2005 Posts: 30 Location: Pune
|
|
|
|
OK THX |
|
Back to top |
|
|
mmwife
Super Moderator
Joined: 30 May 2003 Posts: 1592
|
|
|
|
Hi Reddy,
Remember, FILLER is not a unique name. |
|
Back to top |
|
|
haiardhan
New User
Joined: 26 Jul 2008 Posts: 7 Location: india
|
|
|
|
IDENTIFICATION DIVISION.
PROGRAM-ID. REDIFINE.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 FILLER PIC X(6) VALUE IS 'JAANU'.
01 WS-OUTNAME REDEFINES FILLER.
05 FIRSTNAME PIC X(14) .
05 LASTNAME PIC X(15).
PROCEDURE DIVISION.
MOVE 'JANARDHAN' TO FIRSTNAME.
MOVE 'MANCHIKANTI' TO LASTNAME.
DISPLAY WS-OUTNAME.
STOP RUN.
It will asks for a variable insted of filler at o1 level
givs error like
User-name required at filler
COBCH0029S Not a data name :for ws-out name |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8696 Location: Dubuque, Iowa, USA
|
|
|
|
Any particular reason you're posting to a topic that was last updated more than 3 years ago? |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10872 Location: italy
|
|
|
|
Hi Robert!
did You look at the other posts from the same guy?!
"cold cases squad" syndrome |
|
Back to top |
|
|
|