Re: Question on api QlnDumpCobol

[Mark Waterbury <mark.s.waterbury@xxxxxxxxxxxxx>]

 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.