×
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.
Thanks Folks, this works;
RUNSQL SQL('DELETE from qtemp/t1817pf where joentt = ''CA'' and jojob = ''QZLSFILET'' and jopgm = ''QLESPI'' ') COMMIT(*NONE)
-----Original Message-----
From: CRPence <CRPbottle@xxxxxxxxx>
To: midrange-l <midrange-l@xxxxxxxxxxxx>
Sent: Tue, Mar 12, 2013 1:17 pm
Subject: Re: RUNSQL syntax
On 12 Mar 2013 09:51, fbocch2595@xxxxxxx wrote:
I read Rob’s great article
http://www.itjungle.com/fhg/fhg053012-story01.html
and was able to use RUNSQL like this:
RUNSQL SQL('DELETE FROM QTEMP/FILEA WHERE JOJOB = ''TJOBC''')
COMMIT(*NONE)
Now, I’m using this select statement:
select *
from t18pf
where joentt = 'CA'
and jojob = 'QZLSFILET'
and jopgm = 'QLESPI'
What’s the syntax of the RUNSQL that would delete based on that
select, if possible?
RUNSQL SQL('DELETE from t18pf where joentt = ''CA'' and jojob =
'QZLSFILET'' and jopgm = ''QLESPI'' ') ) COMMIT(*NONE)
or perhaps:
RUNSQL SQL('create view qtemp/dlt_from as ( select * from t18pf
here joentt = ''CA'' and jojob = ''QZLSFILET'' and jopgm = ''QLESPI''
) ) COMMIT(*NONE)
RUNQRY *N ((QTEMP/DLT_FROM)) /* optionally verify result of SELECT */
RUNSQL SQL('delete from qtemp/dlt_from') COMMIT(*NONE)
midrange.com
