Re: Procedure Question

[Duane Kehoe <dkehoe@xxxxxxxxxxxxxx>]

   Do I need an import tag on the procedure prototype in source#1?

   Duane Kehoe wrote:

    Matt,

    Yes, I have the export tag on the procedure's beginning spec in source#2.
    I may be wrong but the message leads me to think authority is somehow
    involved with my problem however I really don't see how I would not be
    authorized to objects in my own library.  Thanks anyway.

    Haas, Matt wrote:

  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.


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


  

    --

    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.


  

   --

   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