| View previous topic :: View next topic |
| Author |
Message |
jimmy_augustine
Beginner
Joined: 23 Jun 2004
Posts: 32
Topics: 13
|
 Posted: Wed Jul 07, 2004 5:25 am Post subject: Comp-3 in a Filler which defines a group! |
 |
|
Folks,
Just had major confusion. Is it possible to give COMP-3 to a filler which is defining a group level? Pls. see the following data structure. If it is possible, doese this COMP-3 is applicable to that enire group ?
All the way I was thinking that it is not possible, but now I surpriced to see this structure in my production environment.!!
Any help would be greatly appreciated.
03 OP-701-CHG-POL-NO.
04 OP-701-CHG-POL-NO1 PIC XXX.
04 OP-701-CHG-POL-NO2 PIC XXX.
04 OP-701-CHG-POL-NO3 PIC XXX.
03 F USAGE COMP-3.
04 OP-701-CHG-NEW-PREM PIC S9(5)V99.
04 OP-701-MLY-CONV-PREM PIC S9(5)V99.
04 OP-701-CHG-NEW-ALLOT PIC S9(5)V99.
04 OP-701-CHG-MO PIC S999.
04 OP-701-CHG-YR PIC S9(5).
04 OP-701-EC2-MO PIC S999.
04 OP-701-EC2-YR PIC S9(5).
Thanks a million
Jimmy |
|
| Back to top |
|
 |
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12375
Topics: 75
Location: San Jose
|
| Posted: Wed Jul 07, 2004 5:36 am Post subject: |
|
|
Jimmy,
| Quote: |
If it is possible, doese this COMP-3 is applicable to that enire group ?
|
Yes comp-3 declaration is valid for the entire group.
| Code: |
FIELD SIZE/FORMAT
================== ===========
OP-701-CHG-NEW-PREM 4P
OP-701-MLY-CONV-PREM 4P
OP-701-CHG-NEW-ALLOT 4P
OP-701-CHG-MO 2P
OP-701-CHG-YR 3P
OP-701-EC2-MO 2P
OP-701-EC2-YR 3P
|
Hope this helps...
Cheers
Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
jimmy_augustine
Beginner
Joined: 23 Jun 2004
Posts: 32
Topics: 13
|
| Posted: Wed Jul 07, 2004 6:04 am Post subject: |
|
|
Thanks a million Kolusu
Regards
Jimmy |
|
| Back to top |
|
|
|
|
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
