TAEEMASTER FILE

 4 Replies
 0 Subscribed to this topic
 17 Subscribed to this forum
Sort:
Author
Messages
Chesca
Veteran Member Send Private Message
Posts: 490
Veteran Member
How to perform a DB call to get a single record off the TAAMATER FILE? I am not sure how to populate the index key and use the 840-FIND-TEMSET1 or the 850-NLT-NEXT? Thanks
Ragu Raghavan
Veteran Member Send Private Message
Posts: 477
Veteran Member
DO you have access to the Lawson support site ? There is a document "Application Program Interfaces" that has examples.
Chesca
Veteran Member Send Private Message
Posts: 490
Veteran Member
Yes I do, I downloaded the API doc and I am able to find/retrieve recods.I am able to retrieve the records now. How do I verify I am using the correct API (840/850) Though? :
MOVE LPMST-TEM-EMPLOYEE       TO DB-EMPLOYEE.
           MOVE 10                       TO DB-COMPANY.
           MOVE LPMST-TEM-EMPLOYEE-GROUP TO DB-EMPLOYEE-GROUP.
           PERFORM 840-FIND-TEMSET1.
           IF (TAEEMASTER-FOUND)
               DISPLAY "TEM-EMPLOYEE " TEM-EMPLOYEE
               DISPLAY " AVAIL HRS:  " TEM-AVAIL-HRS-BAL
               DISPLAY " MASTR ENTRY " TEM-MASTR-ENTRY
           ELSE
              DISPLAY "NOT FOUND"
              GO TO 400-LPVAC-HRI-TRANSACTION-END.
Woozy
Veteran Member Send Private Message
Posts: 709
Veteran Member
It just depends what type of fetch you are wanting to do. 

If you know all the index keys and are looking for a single record that matches that key then you use 840-FIND-{Index}

If you have a partial key and you want to move up/down through the records starting with that key, then you would use 850-FIND-NLT-{Index} and 860-FIND-NEXT-{Index} and/or 870-FIND-PREV-{Index}.

I hope this helps.

Kelly
Kelly Meade
J. R. Simplot Company
Boise, ID
Chesca
Veteran Member Send Private Message
Posts: 490
Veteran Member
Thank you all.