RE: [SYS21] Enbedded SQL in a CL program

[avrylb@xxxxxxxxxxxxxxxxxxxxx]

Thank you for your replies...
We had left the Commit(*none) statement out

> -----Original Message-----
> From: Heffner, Art [SMTP:aheffner@pts-tools.com]
> Sent: Monday, October 14, 2002 5:39 PM
> To:   jbausers-l@midrange.com
> Subject:      RE: [SYS21]   Enbedded SQL in a CL program
>
> Here is a sample of CLLE:
>
>         *************** Beginning of data
> **************************************************************************
> **
> ***********
> 0001.00              PGM
>
> 0002.00              RUNSQLSTM  SRCFILE(HEFFNER/QCLSRC) SRCMBR(DRP75SQL) +
>
> 0002.01                           COMMIT(*NONE)
>
> 0003.00              ENDPGM
>
>         ****************** End of data
> **************************************************************************
> **
> **************
> Here is the source record:
> DRP75SQL
>  *************** Beginning of data
> **************************************************************************
> **
> ***********
>  DELETE FROM PKTD1F3/DRP75 WHERE CONO75 = '01' AND FQTY75 = 0
>
>  ****************** End of data
> **************************************************************************
> **
> **************
> Art Heffner PTS
>
> -----Original Message-----
> From: Nuno Carriço [mailto:ncarrico@mail.gsi.pt]
> Sent: Monday, October 14, 2002 7:59 AM
> To: jbausers-l@midrange.com
> Subject: RE: [SYS21] Enbedded SQL in a CL program
>
>
> use the command RUNSQLSTM
>
> -----Original Message-----
> From: jbausers-l-admin@midrange.com
> [mailto:jbausers-l-admin@midrange.com]On Behalf Of Avryl Baldwin
> Sent: sexta-feira, 11 de Outubro de 2002 9:28
> To: 'jbausers-l@midrange.com'
> Subject: [SYS21] Enbedded SQL in a CL program
>
>
> Hi
> Does someone know....
> SQL statements can be embedded in a RPG program., but can they be embedded
> in a CL program?
> _______________________________________________
> This is the GEAC/JBA System 21 Users (JBAUSERS-L) mailing list
> To post a message email: JBAUSERS-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/jbausers-l
> or email: JBAUSERS-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/jbausers-l.
>
>
> _______________________________________________
> This is the GEAC/JBA System 21 Users (JBAUSERS-L) mailing list
> To post a message email: JBAUSERS-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/jbausers-l
> or email: JBAUSERS-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/jbausers-l.
> --------------------------------------------------------------------------
> -----------------------------------
> Notice: All email sent to or from the Production Tool Supply corporate
> email system may be retained, monitored and/or reviewed by PTS personnel.
> The views expressed in this email may not necessarily reflect the views of
> Production Tool Supply.
> _______________________________________________
> This is the GEAC/JBA System 21 Users (JBAUSERS-L) mailing list
> To post a message email: JBAUSERS-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/jbausers-l
> or email: JBAUSERS-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/jbausers-l.