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



Hi all,

I'm having a problem with RUNSQL along with apostrophes in my CL program.

I have a CL source member with one record containing PUT. I want to
replace it with PUT followed by the file name surrounded by appostrophes.

OVRDBF FILE(QCLSRC) TOFILE(GLENNLIB/QCLSRC) MBR(FTPSRCMBR) OVRSCOPE(*JOB)

The following will work in a STRSQL session:

update qclsrc
set srcdta = 'PUT ''long file name 2016-02-03 11.40.02.csv'''
where upper(left(srcdta,3)) = 'PUT'

In the CL program, I can get it to work with quotes. It's hard to see but
I have a quote " before long and after csv. All others are apostrophes '.

RUNSQL SQL('update qclsrc set srcdta = ''PUT "long file name 2016-02-03
11.40.02.csv"''
where upper(left(srcdta,3)) = ''PUT''')
COMMIT(*NC)
NAMING(*SYS)

I can't get it to work in a CL program replacing the quotes with
apostrophes.

Yours truly,

Glenn Gundermann
Email: glenn.gundermann@xxxxxxxxx
Work: (416) 675-9200 ext. 89224
Cell: (416) 317-3144

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

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.