× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



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

error 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 filed since fields ATTIME  to PLACE1 were not 
populated because of field selection

my validation fails.

 

Please let me know your thoughts  


On Fri, 04 Nov 2005 Larry Ducie wrote :
>Hi Sumit,
>
><snip>
>As per my understanding field selection(alongwith SFLSIZ = SFLPAG) can only be 
>used for output capable fields in subfile. Field selection does not solve the 
>problem for input or both capable fields.
></snip>
>
>No, you can have output/both fields on a field selection subfile. If you 
>couldn't then what would be ther point of them? The idea of field selection 
>subfiles is to create a dynamically built panel screen - where many different 
>types of input-capable fields can be displayed without the use of several 
>indicators and a lot of wasteful code.
>
>If field selection subfile can only display output fields then they would 
>never be used - you'd simply create a standard subfile with a 80a output field 
>and eval your int/char/zoned/packed/date/time data into it - it would just 
>need the appropriate editing first.
>
>We have many field selection subfiles which are input capable.
>
>Examples are:
>1) Report selection screens which dynamically build the fields based on the 
>command used to run the report. The user then enters the selection criteria 
>and runs the report. The screen can be tailored for each report - but it's all 
>the same subfile program.
>2) Program parameter validation program. This program is called prior to all 
>Enquiry System programs to validate the data passed (allows us to put all 
>business logic in a single place) and if any incompatible data is passed the 
>validation program displays all of the program's parameter data and an error 
>message - the user is then required to amend the data or F12 back to the 
>caller. Again, the screen looks different, depending upon the parameters 
>passed.
>
>In both cases, for invalid data you can position cursor and reverse image the 
>fields - all standard stuff.
>
>So it can be done, and it is very nice - much better than screens with big 
>gaps where fields are switched off - the fields always fill from the top down 
>because that's how subfiles are written.
>
>Cheers
>
>Larry Ducie
>
>
>-- 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.
>

As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.