I am trying to create a file that contains a super-descriptor made from an A25 that is part of a PE and a D field. The file is defined as shown in Predict:
Ty L Field ID F Cs Length Occ D U DB S All
*- - -------------------------------- *- * -------- ----- * * -- *
PE 1 PRODUCT-GROUP-GROUP 100 AA
2 PRODUCT-GROUP A 25.0 AB N
2 INSIDE-COMMISSION N 3.5 AC N
2 OUTSIDE-COMMISSION N 3.5 AD N
2 NEW-BIZ-COMMISSION N 3.5 AE N
1 EFF-DATE D AH
1 EXP-DATE D AI
SP 1 PRODUCT-GROUP-EFF-DATE A 29.0 D AJ N
Predict creates the super as shown:
SUPER I AJ I 29 I A I NU,PE I AB ( 1 - 25 ) A
I I I I I AH ( 1 - 4 ) P
The DDM is also created by Predict and the super is shown below:
P 1 AJ COMMISSN-PRODUCT-GROUP-EFF-DATE A 29 N S
* -------- SOURCE FIELD(S) -------
* COMMISSN-PRODUCT-GROUP(1-25)
* COMMISSN-EFF-DATE(1-4)
When attempting to use the super, a NAT0106 (Invalid descriptor in READ LOGICAL statement) occurs. If I remove the P from the super-descriptor definition in the DDM, the NAT0106 goes away. Anyone have any ideas on where my error is in Predict? How do I correctly define a multi-value super-descriptor using Predict? Any help would be appreciated.
Thank you.