Re: Calling QSH with variables from CL

[Vernon Hamberg <vhamberg@xxxxxxxxxxxxxxx>]

QShell may also use full quotes, instead of an apostrophe - full quotes 
do not need to be escaped.

On 8/18/2020 11:19 PM, Evan Harris wrote:
> Hi Patrik
>
> I am going on memory but I've been doing a bit of this lately, so....
> in CL if you want to insert a ' into a string then you need to double it
> up. two '' get reduced to one ' (basically a quote is escaping a quote is
> how I see it)
> To produce a string echo 'thing' your input string would look like CHGVAR
> VAR(&STR) VALUE('echo ''thing''') <- those are all single quotes!
> Sometimes I use a variable &qt to make it easier so DCLVAR VAR(&QT)
> VALUE('''') <- Thats 4 single quotes again! Two to denote a string and then
> a quote escaped by a quote
> Your example would look something like: CHGVAR VAR(&QSHDOIT) VALUE('echo'
> *BCAT '''' *TCAT &MYSTR *TCAT '''' *TCAT '; echo $?') <- these are all
> single quotes!
> Or using my &QT example..   CHGVAR VAR(&QSHDOIT) VALUE('echo' *BCAT &QT
> *TCAT &MYSTR *TCAT &QT *BCAT 'echo $?') - a lot more verbose but easier on
> the eyes sometimes
> Both of these should produce a string like: echo 'Hello'; echo $?
> I think the earlier one would have produced this: echo Hello; echo$? (which
> may work while you have a one word string)
> I tend to build up my strings line by line rather than all in one go as CL
> is a bit of a pain for building strings.
> If you do a DMPCLPGM you can get a good look at your string.
>
>
>
>
> On Wed, Aug 19, 2020 at 12:30 PM Patrik Schindler <poc@xxxxxxxxxx> wrote:
>
> > Hello,
> >
> > I'm trying to dynamically assemble a string to be forwarded to QSH for
> > execution, but I'm most likely falling over the multiple apostrophes.
> >
> > Actual CL program:
> >
> > PGM
> > DCL VAR(&MYSTR) TYPE(*CHAR) LEN(5) VALUE('Hello')
> > DCL VAR(&QSHDOIT) TYPE(*CHAR) LEN(80)
> > CHGVAR VAR(&QSHDOIT) VALUE('echo'' *BCAT &MYSTR *CAT ''; echo $?')
> > QSH CMD(&QSHDOIT)
> > ENDPGM
> >
> > Expected content of &QSHDOIT:
> > echo Hello; echo $?
> >
> > Expected console output of qsh:
> > Hello
> > 0
> >
> > Instead, I get an error message stating, that there's no such command echo
> > *BCAT &MYSTR *CAT.
> >
> > What am I doing wrong here? I remember there was a discussion about a
> > similar topic not too long ago, but I can't find it.
> >
> > I hope, my mail client doesn't mess with the formatting.
> >
> > Thanks!
> >
> > :wq! PoC
> >
> > PGP-Key: DDD3 4ABF 6413 38DE - https://www.pocnet.net/poc-key.asc
> >
> >
> > --
> > This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> > To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: https://lists.midrange.com/mailman/listinfo/midrange-l
> > or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at https://archive.midrange.com/midrange-l.
> >
> > Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
> > questions.
> >
> > Help support midrange.com by shopping at amazon.com with our affiliate
> > link: https://amazon.midrange.com