RE: Procedure Question

["Haas, Matt" <Matt.Haas@xxxxxxxxxxx>]

Did you put the export keyword on the procedures from source#2? If you don't 
the procedures defined in the second module are not viewable by the first.

Matt

-----Original Message-----
From: Duane Kehoe [mailto:dkehoe@xxxxxxxxxxxxxx]
Sent: Tuesday, December 09, 2003 3:12 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Procedure Question


   I am trying to learn procedures and have converted an existing process to
   use them and I keep running into a problem on the procedure call.  My
   setup is as follows:

   RPG source#1 is the driving code created as module(using crtrpgmod)
   RPG source#2 is the procedure portion also created as a module
   PGM object was created with CRTPGM listing source#1 and source#2 as
   modules with source#1 being the entry point

   To here everything works, I get compiled modules and a pgm object.  When I
   issue the strdbg command I can see both modules listed and can set
   breakpoints accordingly in both modules, everything is good.  When I call
   the pgm again everything is good I enter the first module and can walk
   through it no problems however when I get to the point of calling the
   procedure I continually get the following error message:

   Message . . . . :   Cannot resolve to object source#2. Type and Subtype
      X'0201' Authority X'0000'.
    Cause . . . . . :   Either a system pointer or a data pointer can not be
      resolved.
        For a system pointer, it can not be resolved to object source#2, type
   and
      subtype X'0201', authorization X'0000', because either the named object
   was
      not in any context referred to or the correct object was located but
   the
      user profile did not have the required authority.
        The object types for common type or subtype codes follow:...

   and do not understand why.  Is there something I am missing during pgm
   creation or something else?  Any help is greatly appreciated, thanks in
   advance.

   --

   Weyco Group -             
                             
       Florsheim, Brass Boot, Nunn Bush, Stacy Adams
   Duane Kehoe                       Phone # 414.908.1814 
   EC / Programmer / Analyst           Fax # 414.908.1601 
                             Email: dkehoe@xxxxxxxxxxxxxx 
_______________________________________________
This is the RPG programming on the AS400 / iSeries (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.