Re: Subfile field Conditioning for Non-display

[Dave Mahadevan <mahadevan@xxxxxxxx>]

Raja:

Make sure to set the condition of the indicator (on or off) before you write the
record to the subfile.  Most of the time people set the indicator outside the 
loop
in which the records are written.  In that case, all the records take the 
indicator
value as it was before the loop started.  In your case, compare the date to zero
before the write to the subfile inside the loop writing the subfile records.  
Also,
another way to avoid the zero date is to use the editword '  /  /   ' instead of
editcode Y.  Also, investigate program to system fields.  This way you can avoid
indicators altogether.

Raja Asthana wrote:

> Hi,
>
> I have a subfile with some fields. One field is conditioned to be
> non-displayable by setting an indicator.
> When I initialize the subfile, and set on the conditioning indicator, the 
>field
> is still displaying with initialized value.
> The same is the case for a Text field.
>
> Following is DDS:
>
> A                                      DSPSIZ(27 132 *DS4                 -
> A                                             24 80 *DS3)
> A                                      PRINT
> A          R TSKDAT                                   SFL
>
> ................................
> A              $TSKDT         6Y 0O  6 14     EDTCDE(Y)
>
> A  71                                                            DSPATR(ND)
>
> A                                                                  COLOR(PNK)
>
> A                                                                  DSPATR(UL)
>
> A                                                           6  4'Date ...:'
>
> A  71                                                           DSPATR(ND)
>
> A                                                                 DSPATR(HI)
>
> .................................
>
> The blank Subfile is :
>
>  .................................................
>
>
>
>
>
>    Date ...:  0/00/00
>
>
>  Time        Task Description
>
>
>
>
>
>
>              User            Ext.    Task No.   Status   Turn No.     Dt.inPrd
> Remarks               Department
>                                                                        0/00/00
>
>    Date ...:  0/00/00
>
>
>  Time        Task Description
>
>
>
>
>
>
>              User            Ext.    Task No.   Status   Turn No.     Dt.inPrd
> Remarks               Department
>                                                                        0/00/00
>                                                     +
>
> .................................................
>
> As you can see that "Date ...:  0/00/00 " is showing despite the fact that I
> already set the *IN71 ON.
>
> What's the solution.
>

--
Thank You.

Regards

Dave Mahadevan.. mailto:mahadevan@fuse.net


* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *