Middle user exit for PR12 not working

 1 Replies
 0 Subscribed to this topic
 68 Subscribed to this forum
Sort:
Author
Messages
Arnab Mishra
New Member
Posts: 1
New Member
    My middle user exit does not work.When I debug I see that control never goes to the middle user exit in PR12.1.I compiled the program as well as user exit many a times.But still the issue exist.Can somebody help me with this please?
    Ragu Raghavan
    Veteran Member
    Posts: 476
    Veteran Member
      There was a posting on the topica sysadmin forum on this:

      RE: PR12 User Exit Ragu Raghavan

      Jan 21, 2011 16:34 PST


      I thought so too. But looks like they are right. Below is an extract from
      the generated Cobol code. The MID-UE is checked and called from the
      400-PROCESS-TRAN routine that exists only for PR12.3 and PR12.4.
      Looks like non-standard coding.


      Ragu Raghavan

      011959******************************************************************
      011960 400-PROCESS-TRAN.
      011961******************************************************************
      011962
      011963 IF (WS-MID-UE-FOUND = "Y")
      011964 MOVE CRT-PROGRAM-CODE TO CRT-SV-PROGRAM-CODE
      011965 CALL WS-MID-UE-PGM USING CRT-CONTROL
      011966 CRT-TRANSACTION
      011967 MOVE CRT-SV-PROGRAM-CODE TO CRT-PROGRAM-CODE.
      011968
      011969 IF (PR12F3-FC = "I" OR "-" OR "+" OR "P")
      011970 PERFORM 480-INQUIRE
      011971 THRU 480-END.
      011972
      011973 400-END.


      -----Original Message-----
      From: KJorg-@woodmen.org [mailto:KJorg-@woodmen.org]
      Sent: Friday, January 21, 2011 5:14 PM
      To: Lawson_S-@topica.com
      Subject: RE: [Lawson_SysAdmin] PR12 User Exit

      I think Erika got her posts crossed.
      We are a unix shop.

      The cobol animator is awful and it's never worked right since we went to
      9.0.x. I usually just put in display statements.
      The only command in my UE is a display and it's not working.
      Lawson mentioned something about the base PR12 code would need to do a
      400-PROCESS-TRAN paragraph for a user exit to get called.
      But I thought all online programs check for user exits. (!)

      -Kyle Jorgensen
      Programmer Analyst
      Woodmen of the World

      This communication, along with any attachments, is covered by federal and
      state law governing electronic communications and may contain confidential
      and proprietary information. If the reader of this message is not the
      intended recipient, you are hereby notified that any distribution, use or
      copying of this message is strictly prohibited. If you have received this
      in error, please reply immediately to the sender and delete this message.





      Erika Simpson01 ;
      01/21/2011 03:06 PM
      Please respond to
      Lawson_S-@topica.com


      To
      "'Lawson_S-@topica.com'" ;
      cc

      Subject
      RE: [Lawson_SysAdmin] PR12 User Exit






      We are on Windows.

      -----Original Message-----
      From: Ragu Raghavan [mailto:Ragh-@Inform-alServices.com]
      Sent: Friday, January 21, 2011 4:01 PM
      To: Lawson_S-@topica.com
      Subject: RE: [Lawson_SysAdmin] PR12 User Exit

      Are you on Unix/Windows ? If you use cobanim, you can step thru the code
      to
      see if the UE is called or not.

      Ragu Raghavan

      -----Original Message-----
      From: KJorg-@woodmen.org [mailto:KJorg-@woodmen.org]
      Sent: Friday, January 21, 2011 3:41 PM
      To: Lawson_S-@topica.com
      Subject: [Lawson_SysAdmin] PR12 User Exit

      Is there some type of magic for getting a user exit to work in PR12.
      I'm trying to put a middle-ue in place that will catch a change to the
      default direct deposit account so that I can trigger a flow that will go
      update the employee's vendor record in AP10.
      The UE doesn't even appear to be called when I inquire, add or change on
      PR12.

      Anybody done anything like that?

      TIA,
      Kyle
      Programmer Analyst
      Woodmen of the World