System API QlnDumpCobol

[bmorris@xxxxxxxxxx]

>Date: Fri, 20 Jul 2001 10:50:07 -0400
>From: "Weatherly, Howard" <hweatherly@dlis.dla.mil>
>
>Does anyone have a clue what object has become invisible to the compiler
>that is causing this to be not found?
>
>If I CRTBNDCBL it works, When I use CRTSQLCBLI it does not work! I am so
>confused!!
>
>Message . . . . :   Definition not found for symbol 'QLNDUMPCOBOL'.

Howard, Your SQL COBOL program is trying to call 'QLNDUMPCOBOL'.  Your
regular COBOL program would be correctly trying to call 'QlnDumpCobol'.
(Calls are case-sensitive.)

You're probably specifying OPTION(*NOMONOPRC) on your CRTBNDCBL.  Since
you can't specify that on the CRTSQLCBLI command, maybe you could
specify it on your PROCESS statement within your SQL source.

Here's the help for option *(NO)MONOPRC:

*MONOPRC (the default)
    The program-name (literal or word) found in the PROGRAM-ID
    paragraph, the CALL, CANCEL, or SET ENTRY statements, and the END
    PROGRAM header is converted to all upper-case characters
    (monocasing) and the rules for program-name formation are enforced.

*NOMONOPRC
    The program-name (literal or word) found in the PROGRAM-ID
    paragraph, the CALL, CANCEL, or SET ENTRY statements, and the END
    PROGRAM header is not converted to all upper-case characters (no
    monocasing) and the rules for program-name formation are not
    enforced.  This option allows special characters not allowed for
    standard COBOL to be used in the CALL target.

Barbara Morris

+---
| 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
+---