RE: String value with an apostrophe ( ' )

["Mike Haston ** Data" <MJH@xxxxxxx>]

I finally went to the dark side and declared a constant for something like 
quote when I got sick of getting lost in OPNQRYF statements or parameter 
strings:


d QUOTE           c                   '"'        


cmd = 'SBMJOB CMD(CALL PGM(FCSHSTEDI) PARM(###PARMS###))';         
                                                                   
parms = QUOTE + %char( fromDate ) + QUOTE + SPACE                  
      + QUOTE + %char( jobDate ) + QUOTE + SPACE                   
      + QUOTE + Y + QUOTE + SPACE                                  
      + QUOTE + Y + QUOTE;                                         
                                                                   
// replace 'tags' in the parameter string with parms               
cmd = %replace(parms : cmd : %scan('###PARMS###' : cmd) : 11 );    
                                                                   
@qcmdexc( cmd );                                                   




-----Original Message-----
From: Gary Thornton [mailto:gthornton2003@yahoo.com]
Sent: Thursday, January 09, 2003 3:49 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: String value with an apostrophe ( ' )


So, to carry that logic forward, using two single apostrophes will be
"preserved" to a non-EBCDIC CCSID, as in this example:
      Eval PrintTime = Hour + ' o''clock'

(Personally, I never define a constant for a single apostrophe.  I
know by heart that 'o''clock' will generate o'clock.  But that's a
personal preference, and not intended to start a mini-holy war.)