Re: Subfile field Selection

You can, have two subfile formats and show two different views and solve
your problem that way.

You could also consider SFLFOLD and have the second line of the subfile be
your comment.  That works well and is easy to implement.  
 
I am curious what would happen though if you made DATE a valid value when
*in73 is off.  Even if you don't use it, you could have a valid date.  Would
that solve your problem perhaps?

---------------------------------
Booth Martin
http://www.martinvt.com
---------------------------------
-------Original Message-------
 
From: RPG programming on the AS400 / iSeries
Date: 11/04/05 12:46:59
To: RPG programming on the AS400 / iSeries
Subject: Re: Subfile field Selection
 
Thanks Larry, but this does not solve my problem.
My DDS code looks like following:
***************************************************************
        R SFLS1                  SFL
***************************************************************
 
TEXT             20   B  6  2
TEXT1             8   B    +1                                        
ATTRIBUT         20   B   +1
 
N73    ATTIME          8   B    +1
N73    VALUE1        11   B    +1
N73    VALUE2        11   B    +1
N73    ACTION1        1    B    +1
N73    ACTION2        1    B    +1
N73    DATE              L    B    +1DATFMT(*USA)
N73    PLACE1           1    B    +1
 
Field I want to add
  73     COMENT        70    B   6  53
          RRN              3 0    H
-----------------------------------------------------------------------------
----------------
 
I am doing a CHAIN on subfile SFLS1 by RRN. When *IN73 is set on the display
file give errors on DATE field as Invalid Date format.
 
If I convert DATE to TEXT 8 then I face following problem:
I have created a DS for Subfile fields and DS for file fields, when my *IN73
is set on I move Subfile DS to
File DS and do validation on field since fields ATTIME  to PLACE1 were not
populated because of field selection
my validation fails.
 
Please let me know your thoughts
 
 
 
 
 
 
 
 
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
 
.