×

Good News Everybody!

The new search engine is LIVE!

Please report any problems to david (at) midrange.com.





Thanks Paul. Any idea how to get details of how many records were deleted when using RUNSQL in batch in a CLP? That would be nice. What I usually do is dspfd b4 and aftet the RUNSQL.
Frank



-----Original Message-----
From: Paul Therrien <ptherrien@xxxxxxxxxxxxxxx>
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Sent: Tue, Mar 12, 2013 2:21 pm
Subject: RE: RUNSQL syntax


RUNSQL SQL('DELETE from t18pf where joentt = ''CA'' and jojob = 'QZLSFILET'' and
opgm = ''QLESPI'' ') ) COMMIT(*NONE)
Remove the extraneous ')'
RUNSQL SQL('DELETE from t18pf where joentt = ''CA'' and jojob = 'QZLSFILET'' and
opgm = ''QLESPI'' ' ) COMMIT(*NONE)
Paul

----Original Message-----
rom: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx]
n Behalf Of fbocch2595@xxxxxxx
ent: Tuesday, March 12, 2013 12:55 PM
o: midrange-l@xxxxxxxxxxxx
ubject: Re: RUNSQL syntax

get A matching parenthesis not found...has anyone ever used RUNSQL like the
ay I want I'm asking?


----Original Message-----
rom: CRPence <CRPbottle@xxxxxxxxx>
o: midrange-l <midrange-l@xxxxxxxxxxxx>
ent: Tue, Mar 12, 2013 1:17 pm
ubject: Re: RUNSQL syntax

n 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
ossible?
RUNSQL SQL('DELETE from t18pf where joentt = ''CA'' and jojob = 'QZLSFILET''
nd 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)
-
gards, Chuck

is is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list o
ost a message email: MIDRANGE-L@xxxxxxxxxxxx o subscribe, unsubscribe, or
hange list options,
sit: http://lists.midrange.com/mailman/listinfo/midrange-l
email: MIDRANGE-L-request@xxxxxxxxxxxx efore posting, please take a moment to
eview the archives t http://archive.midrange.com/midrange-l.

-
his is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To
ost a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or
hange list options,
isit: http://lists.midrange.com/mailman/listinfo/midrange-l
r email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment
o review the archives at http://archive.midrange.com/midrange-l.

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2026 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.