× 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.



After your READC, move blanks and UPDATE.

Regards,

Guy




Adam West
<adamster@xxxxxxxx To: RPG400-l@xxxxxxxxxxxx
m> cc:
Sent by: Subject: Subfile question
rpg400-l-bounces@m
idrange.com


07/29/2008 12:40
PM
Please respond to
RPG programming on
the AS400 /
iSeries





HI
In the sample below, I am displaying a subfile that are all OUTPUT only
except for 2 fields where you can put an 'X" and it will then display more
info in a new screen. When I come back from that screen, I want any X's
that were entered prior to become blanks. I am using the READC to check for
the X.. It will of course disregard the prior X and only look at a new X
but I am thinking it looks bad and wanted to clear but when I do a SFLCLR
and SFLBLD again I get a blank screen. I was wondering how the clear can be
accomplished that is, the entire subfile should be checked. is this an
update function perhaps?
I PO#         ORD                                         INV       ACT
EDI               DATE  STAT ORD#     ACCT  STR#      INV#    DATE
SHPDT
X 11          040601 090 000008  99967            99994  040603
000000       11          021202 060  000013  99932            99999
021204    021204       11          021205 060 000055   99932
999995  021209    021209       11          070516 090 0058308  99950
0001   999994  070518    000000     



--
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 ...

Replies:

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.