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.

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