Re: Question on api QlnDumpCobol

Thomas,
You can either supply the "PROCESS" statement within the COBOL source, or you can specify OPTION(*NOMONOPRC) on the CRTBNDCBL command, or CRTCBLMOD, etc.
See the ILE COBOL manual for details of the PROCESS statement.
Mark
On Tuesday, October 18, 2022 at 09:53:46 PM EDT, Thomas Burrows <thomas.burrows.1957@xxxxxxxxx> wrote:

Bruce is correct - the problem is the uppercase name.  This procedure
requires a mixed case name.  That means that your program needs to specify
NOMONOPROC either as a compile option or (better idea) as a PROCESS option
since the program will always require it.  This particular option tells the
compiler not to convert all CALL names to upper case.


Jon:

Where is the PROCESS option on the cobol ile compile?





On Tue, Oct 18, 2022 at 8:42 PM Mark Waterbury <
mark.s.waterbury@xxxxxxxxxxxxx> wrote:

  Thomas,
See also:    https://archive.midrange.com/cobol400-l/200107/msg00013.html

Mark

    > On Tuesday, October 18, 2022 at 09:38:29 PM EDT, Thomas Burrows <
thomas.burrows.1957@xxxxxxxxx> wrote:

  For Mark.  I pulled that exact code to put this option into the program.

There was no ERROR on a WRITE command.

Wanted to auto dump the program and normally shutdown.

On Tue, Oct 18, 2022 at 8:36 PM Thomas Burrows <
thomas.burrows.1957@xxxxxxxxx> wrote:

770WDS V7R4M0  190419 LN  IBM ILE COBOL
TBURROWS/DGCCLMSTSR

                                    M e s s a g e
s


    STMT

*  2142  MSGID: LNC0047  SEVERITY: 20  SEQNBR:
055700

          Message . . . . :  Program-name '"QlnDumpCobol"' is not
valid.

            Accepted as
'"QLNDUMPCOBOL"'.

                                          Message
Summary

Message
totals:



Job log



        Statement . . . . . . . . . :
34

        To module . . . . . . . . . :
QBNBSYMR

                    Job Log                            MCIG3    10/18/22
21:

  :  DGCCLMSTSR      User  . . . . . . :  TBURROWS    Number . . . . . .
.

  :  QBATCH          Library . . . . . :
QGPL

      SEV  DATE      TIME            FROM PGM    LIBRARY    INST    TO
PGM

        To procedure  . . . . . . . :
QBNBSYMR__SignalUnresolvedReferences

        Statement . . . . . . . . . :
8

        Message . . . . :  Definition not found for symbol
'QLNDUMPCOBOL'.

        Cause . . . . . :  No definition was found for reference
QLNDUMPCOBOL

          *MODULE object DGCCLMSTSR in library QTEMP. The definition

either

do

          exist or is not of the same data or procedure type as the
reference.

          Recovery  . . . :  Try the Create Program (CRTPGM) command
again, s

          an object that contains a definition for symbol
QLNDUMPCOBOL.

      40  10/18/22  21:33:19.025711  QBNBIND      QSYS        *STMT
QLNMAI

        From module . . . . . . . . :
QBNBIND
Disclaimer: This communication and any files transmitted with it may
contain information that is privileged, confidential and/or exempt from
disclosure under applicable law. If you are not the intended recipient,

you

are hereby notified that any disclosure, copying, distribution, or use of
the information contained herein (including any reliance thereon) is
strictly prohibited. If you received this communication in error, please
immediately contact the sender and destroy the material in its entirety,
whether in electronic or hard copy format. Thank you.
ReplyForward


On Tue, Oct 18, 2022 at 8:34 PM Mark Waterbury <
mark.s.waterbury@xxxxxxxxxxxxx> wrote:

  Thomas,
See:
Initiating Deliberate Dumps


for an example.
HTH,
Mark S. Waterbury

    > On Tuesday, October 18, 2022 at 09:03:17 PM EDT, Thomas Burrows <
thomas.burrows.1957@xxxxxxxxx> wrote:

  In the joblog that is created when the program does not compile I get

the

message that QlnDumpCobol is not found.

Obviously I am missing a copy book command.

I have the following copybook commands.

copy qusec of qsysinc-qlblsrc

copy qszcrtpd of qsysinc-qlblsrc

copy qszcrtpl of qsysinc-qlblsrc

copy qszpkgpd of qsysinc-qlblsrc

What am I missing?

Thomas in Texas


--
This is the COBOL Programming on the IBM i (AS/400 and iSeries)
(COBOL400-L) mailing list
To post a message email: COBOL400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/cobol400-l
or email: COBOL400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/cobol400-l.

--
This is the COBOL Programming on the IBM i (AS/400 and iSeries)
(COBOL400-L) mailing list
To post a message email: COBOL400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/cobol400-l
or email: COBOL400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/cobol400-l.



|
|
|  |
Initiating Deliberate Dumps


  |

  |

  |




--
This is the COBOL Programming on the IBM i (AS/400 and iSeries)
(COBOL400-L) mailing list
To post a message email: COBOL400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/cobol400-l
or email: COBOL400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/cobol400-l.