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


  • Subject: don't laff, cde. so far..
  • From: mohammad khan <mohammadakhan@xxxxxxxxx>
  • Date: Tue, 6 Oct 1998 13:04:27 -0700 (PDT)

Hi,

just want to clear a few things up.

an rpg pgm. can call a dspf (w/sev. records) right?

if so, how do you corrollate appropriate indicators (in an rpg pgm) to
the user input fields in the dspf (created under sda) so that a screen
will not go to the next screen unless all the initial fields are input? 

this might be pretty pathetic, but here's what i've done so far. 

don't laff :)

to save space i've edited the code w/comments so that it is readable
in an email.

Fdsppa001  if   e   workstn  //dspf input scrn

C    exfmt     dsppa001      //opn dspf
C    if        *in03=*on     //empty fields = ind *on
C    iter                    //start again
C    call      qcmdexc       
C    read      qtemp    90

Mohammad


_________________________________________________________
DO YOU YAHOO!?
Get your free @yahoo.com address at http://mail.yahoo.com

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


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.