RE: QM/400 Question Further explained

One thing I should have been a little clearer about is that the dates are
all character variables.  

> -----Original Message-----
> From: Joel Fritz [mailto:JFritz@sharperimage.com]
> Sent: Tuesday, May 08, 2001 2:31 PM
> To: 'MIDRANGE-L@midrange.com'
> Subject: RE: QM/400 Question Further explained
> 
> 
> Here's an example from a CL I've just been working on.  
> 
> I think Buck covered the possibilities pretty well.  The 
> other option, which
> I use here, is substitution variables in the query source.  
> It's only a
> variation on building the entire string.  You need four 
> quotes in a row to
> put on each side of a character variable.  I define a variable that I
> concatenate with the other components as others have suggested.
> 
> Here's a sample:
> 
> 0008.00              DCL        VAR(&FOURQUOTE) TYPE(*CHAR) 
> VALUE('''')
> 
> 
> 0024.00              CHGVAR     VAR(&DATECOND) VALUE('BETWEEN' *BCAT +
> 
> 0025.00                           &FOURQUOTE *CAT &BEGDAT 
> *CAT &FOURQUOTE +
> 
> 0026.00                           *BCAT 'AND' *BCAT 
> &FOURQUOTE *CAT &ENDDAT
> +     
> 0027.00                           *CAT &FOURQUOTE)
> 
> 0028.00
> 
> 
> &datecond is a string that I use as a setvar in the 
> invocation of the query.
> Here's the line from the query source which actually has a little more
> complex where clause.  The ampersand just means it's a variable:
> WHERE
> DIGITS(ORDYR)||DIGITS(ORDMD) &DATECOND 
> 
> &datecond in the CL is substituted for &datecond in the query.
> 
> I don't have a good simple answer to *ALL.
> 
> > -----Original Message-----
> > From: Dennis Munro [mailto:DMunro@badgerminingcorp.com]
> > Sent: Tuesday, May 08, 2001 1:37 PM
> > To: 'MIDRANGE-L@midrange.com'
> > Subject: RE: QM/400 Question Further explained
> > 
> > 
> > What I should further clarify is that the two variables I am 
> > working with
> > are Alpha & I am not sure of the dreaded quotes & how many?
> > 
> > I also said the variable goes on both sides of the BETWEEN & 
> > that obviously
> > is not correct.
> > 
> > Here are the actual statements from my query that I wish to 
> > substitute with
> > variables from a prompt screen.
> > 
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---