User Exit

 2 Replies
 0 Subscribed to this topic
 1 Subscribed to this forum
Sort:
Author
Messages
nlmoran
Veteran Member
Posts: 53
Veteran Member
    I am having trouble with a user exit in rq10 for detail lines.
    I seem to be missing something ??
    The user exit will work on the LID for up to 4 entries (Max allowed on screen) But when using on SEA (one max line per screen entry)
    after 4 entries got Index error.
    When i place my code directly in program it
    works fine on both LID and SEA
    Thats not what i want to do.
    John Henley
    Posts: 3353
      What are you trying to do with the user exit? How are you accessing the line items in your code--are you looping thru them or are you hard-coding the subscripts to the lines? The user exit operates across the form--not the item--so the user exit is only called when a form submit action is performed. So, you need to have code to loop thru each line item. What do you mean by "index error" ... do you mean a database error, or a subscript?
      Thanks for using the LawsonGuru.com forums!
      John
      nlmoran
      Veteran Member
      Posts: 53
      Veteran Member
        Good News! Changed the Perform and it works fine for LID and Requistions
        Thanks
        Norm
        IF (RQ10F1-FC = "A" OR "C")
        PERFORM 670-EDI-CODE VARYING I1 FROM 1 BY 1
        UNTIL (I1 > 5)
        OR (RQ10F1-RLN-VENDOR (I1) = SPACES)
        END-IF.