× 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: Re: Parameters
  • From: "Peter Dow" <pcdow@xxxxxxxxxxxxxxx>
  • Date: Wed, 31 Jan 2001 09:19:40 -0800

You're right, I didn't look closely enough at your RQSDTA. You are actually
building it with quotes around &GQBOOK, so it will always have the same
length regardless of content. Except maybe the occasional embedded
apostrophe<g>.

Regards,
Peter Dow
Dow Software Services, Inc.
909 425-0194 voice
909 425-0196 fax

----- Original Message -----
From: <VWilliamson@glazers.com>
To: <RPG400-L@midrange.com>
Sent: Wednesday, January 31, 2001 8:07 AM
Subject: Re: Parameters


>
> As I said earlier &GQBOOK is an external data structure in the RPG
program.
> All the subfields are different options that the user can enter for what
> type of report they want.  The last position is a 1 byte field for an
> option selection which may or may not be blank.  I looked at the wrong
> external description before also.  This one is actually 80 bytes long.  I
> may be wrong, but everything I have seen on this subject since V1R2 only
> relates to the 32 byte length being a problem when you use the CMD
> parameter on the SBMJOB.  Not the RQSDTA parm.  Looks like my copy/paste
> might not have come through very clearly.  Sorry.
>
> Valene M. Williamson
> Glazers
> Dallas, TX
>
>
> ----- Original Message -----
>
>
>
> What's the value in &GQBOOK? As long as the last character is non-blank
you
> won't have a problem.
>
> Regards,
> Peter Dow
> Dow Software Services, Inc.
> 909 425-0194 voice
> 909 425-0196 fax
>
> ----- Original Message -----
> From: <VWilliamson@glazers.com>
> To: <RPG400-L@midrange.com>
> Sent: Tuesday, January 30, 2001 1:42 PM
> Subject: Re: Parameters
>
>
> >
> > I have seen many questions about passing long parameters with many
> > different answers.  I have never seen anyone give this answer.  The
> > following is a technique which we use that we originally used on the
S38,
> > because the SBMJOB command did not have a CMD parameter (at least not
> > through release 6 the last one I was on).  It may not look pretty, but
it
> > works, and does not have the 32 character parm problem when using the
CMD
> > parameter.  This situation is an online RPGIV program, which calls a
CLP,
> > which submits itself to batch.  GQPARM is an externally defined data
> > structure, which we use to pass data to a lot of programs, online and
> > batch.  It is 201 bytes long with 52 fields.  This particular code was
> > written on V1R2 and it still works.
> >
> > 0548.00 C*
> > 0549.00 C                   Call      'GQ6010CL'
> > 0550.00 C                   Parm                    GQBOOK
> > 0558.00
> >
> C*************************************************************************
> >  Columns . . . :    1 100                                      Browse
> >  SEU==>
> > 0092.00
> > 0093.00              CHGVAR     VAR(&RQSDTA) VALUE('CALL PGM(GQ6010CL)
> PARM
> > (' +
> > 0094.00                           *CAT '''' *CAT &GQBOOK *CAT '''' *CAT
> > ')')
> > 0095.00
> > 0096.00              SBMJOB     JOB(QDBOOKPRNT) JOBQ(QDJOBQ) RQSDTA
> > (&RQSDTA)
> > 0097.00
> > 0098.00              RETURN
> > 0099.00
> >
> +---
>
>
>
> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to RPG400-L@midrange.com.
> | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
david@midrange.com
> +---


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---

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.