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


  • Subject: Re: Embedded SQL + Closing an ODP
  • From: "@udemk @jm" <jmdemko@xxxxxxxxxxx>
  • Date: Tue, 13 Feb 2001 19:17:53 -0000



Dave,

Humor me for a minute. Just a stab.

look at : Close SQL cursor  . . . . . . . . . . . . . . . . . . :   *ENDMOD   parameter

What are the additional (if any) values to specify on closing SQL cursor?

It seems as if the module is active, OPD will remain.

Also check File Desc for SHARE(*YES), need this for OPNQRYF .

>From: "David Keck"
>Reply-To: MIDRANGE-L@midrange.com
>To: "Midrange-L"
>Subject: Embedded SQL + Closing an ODP
>Date: Sun, 11 Feb 2001 00:28:44 -0800
>MIME-Version: 1.0
>Received: from [192.160.127.90] by hotmail.com (3.2) with ESMTP id MHotMailBC50398B005A40043115C0A07F5A12B50; Sun Feb 11 11:57:02 2001
>Received: (from uucp@localhost)by uucphost.mcs.net (8.11.1/8.11.1) with UUCP id f1BJvc534449;Sun, 11 Feb 2001 13:57:38 -0600 (CST)(envelope-from midrange-l-owner@midrange.com)
>Received: from localhost (mail@localhost)by linux.midrange.com (8.9.3/8.8.7) with SMTP id OAA04742;Sun, 11 Feb 2001 14:40:15 -0600
>Received: by linux.midrange.com (bulk_mailer v1.13); Sun, 11 Feb 2001 14:40:12 -0600
>Received: (from majordom@localhost)by linux.midrange.com (8.9.3/8.8.7) id OAA04670for midrange-l-outgoing; Sun, 11 Feb 2001 14:40:09 -0600
>Received: (from uucp@localhost)by linux.midrange.com (8.9.3/8.8.7) with UUCP id OAA04661for midrange-l@midrange.com; Sun, 11 Feb 2001 14:40:08 -0600
>Received: from u2.farm.idt.net (root@u2.farm.idt.net [169.132.8.11])by uucphost.mcs.net (8.11.1/8.11.1) with ESMTP id f1BJUPn31903for ; Sun, 11 Feb 2001 13:30:26 -0600 (CST)(envelope-from dkeck@idt.net)
>Received: from DavidEileenKeck (ppp-6.ts-2-bay.nyc.idt.net [169.132.216.54])by u2.farm.idt.net (8.9.3/8.9.3) with SMTP id OAA18619for ; Sun, 11 Feb 2001 14:30:24 -0500 (EST)
>From midrange-l-owner@midrange.com Sun Feb 11 11:57:50 2001
>Message-ID: <000001c09479$42909860$c65fbc18@DavidEileenKeck>
>X-Priority: 3
>X-MSMail-Priority: Normal
>X-Mailer: Microsoft Outlook Express 5.50.4522.1200
>X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4522.1200
>Sender: owner-midrange-l@midrange.com
>X-List-Name: Midrange Systems Mailing List (MIDRANGE-L@midrange.com)
>
>I have an ILE RPG program comprised in part of an SQLRPGLE module, compiled
>with
>
>Commitment control . . . . . . . . . . . . . . . . . : *NONE
>Relational database . . . . . . . . . . . . . . . . . : *LOCAL
>Naming convention . . . . . . . . . . . . . . . . . . : *SYS
>Allow copy of data . . . . . . . . . . . . . . . . . : *OPTIMIZE
>Allow blocking . . . . . . . . . . . . . . . . . . . : *ALLREAD
>Delay PREPARE . . . . . . . . . . . . . . . . . . . . : *NO
>Close SQL cursor . . . . . . . . . . . . . . . . . . : *ENDMOD
>
>After ...
>
>C/EXEC SQL open @Cursor
>C/END-EXEC
>
>an ODP is created as can be seen via WRKJOB 14. Later, immediately after
>....
>
>C/EXEC SQL close @Cursor
>C/END-EXEC
>
>the file is still open, which I find perplexing and vexing. With the file
>open the program maintains a member lock which interferes with other
>elements of the system.
>How can I close the ODP and release related locks without ending the program
>containing the embedded SQL ? A solution which works at V3R2 would be
>ideal.
>
>Thanks - Dave K.
>
>
>+---
>| This is the Midrange System Mailing List!
>| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
>| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
>| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
>| Questions should be directed to the list owner/operator: david@midrange.com
>+---


Get your FREE download of MSN Explorer at http://explorer.msn.com

+--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---

As an Amazon Associate we earn from qualifying purchases.

This thread ...


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.