Re: Debugging code in /COPY member

John

What is the /COPYBOOK statement? I've never seen that in RPG. There are /COPY and /INCLUDE, so far as I know.

I am not sure about expand things - when I have /copy and /include in my source, in debug, with F15, I get these options -

..............................................................................
: Select View :
: :
: Current View . . . : DB2/400 SQL Root Source View :
: :
: Type option, press Enter. :
: 1=Select :
: :
: Opt View :
: DB2/400 SQL Root Source View :
: DB2/400 SQL Include View :
: DB2/400 SQL Output View :
: ILE RPG Listing View :
: ILE RPG Copy View :
: :
: :
: :
: Bottom :
: F12=Cancel :
: :
:............................................................................:

The options available depend on the options you set at compile time of the module or program, right?

I'm doing this on the system where the source lives. Root source view doesn't expand anything - as here

/Copy RJSCOMMON,RJSLIBLH
/include qrpglesrc,docutilh
/include qrpglesrc,docsqlselh

The SQL Include view - interesting - doesn't expand "includes" - EGAD! Talk about confusion of terminology - see this from the same source -

/include qrpglesrc,docutilh
/include qrpglesrc,docsqlselh

In the above, the /copy WAS expanded. Now this is SQL, not standard RPG. SQL Output View also does not expand the /includes.

The RPG Listing view DOES expand everything that I specified - I use *ALL for DBGVIEW all the time.

411 410 /include qrpglesrc,docutilh
412 411+ /if not defined(C_DOCUTILH)
413 412+ /define C_DOCUTILH
414 413+ /else
415 414+ /endif
416 415+ //*********************************************
417 416+ // Module: DOCUTILH
418 417+ // PURPOSE: Utility routines for WebDocs
419 418+ // DATE: 11/09/07

The RPG Copy view DID expand everything, including /include - it does not have the /copy or /include directives, so it is the complete result of putting in the include members.

D QCmdCmd S 512 INZ
D QCmdLength S 15 5 INZ(%size(QCmdCmd))
v314 /if not defined(C_DOCUTILH)
v314 /define C_DOCUTILH
v314 /else
v314 /eof
v314 /endif
//**********************************************************
// Module: DOCUTILH
// PURPOSE: Utility routines for WebDocs

Everything is there - notice that the /include is not.

All or any of these should also be available in the RD* debugger, again, depending on compile options.

HTH
Vern

On 10/27/2010 7:49 AM, John McKay wrote:

Are you using /COPY or /COPYBOOK ?

The debugger will not expand /COPYBOOK statements.


Regards,
John McKay mba

----- Original Message -----
From: "Scott Klement"<rpg400-l@xxxxxxxxxxxxxxxx>
To: "RPG programming on the IBM i / System i"<rpg400-l@xxxxxxxxxxxx>
Sent: Friday, October 22, 2010 11:42 PM
Subject: Re: Debugging code in /COPY member

Hi Aaron,

On 10/22/2010 4:46 PM, Aaron Bartell wrote:

I am using DBGVIEW(*ALL) and it is still not expanding them out.

When you use DBGVIEW(*ALL), you create more than one debugging view.
you create both *SOURCE and *LIST -- and you let the debugger decide
which of these views to show you. I'm guessing that it's showing you
the *SOURCE view, so you're not seeing the copy books.

If you are in the green screen debugger (STRDBG) you can select the view
by pressing F15.

But, knowing you, I'm going to assume you're debugging with RDp.
Unfortunately, I don't have RDp handy, but I do have WDSC (7.0) so I'll
assume they're the same -- when you're in the debugger, right-click the
source code, and on the popup menu there should be an option "Switch
View". Expand that option, and you should be able to choose between
*listing, *source and *statement. If you select *LISTING, it should
show the copy books.

Unless of course you compiled with *NOSHOWCPY -- in which case, it won't
show the copy books no matter what you do :)
--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing
list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.