Functional Description
Purpose
This business function inserts Unedited Equipment Tag Transactions to the F1201Z1 table for
Interoperability. These records are the transactions that occurred in the F1217 Equipment Tag MBF (N1200090).
Setup Notes and Prerequisites
This function should only be used by the Equipment Tag MBF (N1200090).
Special Logic
Technical Specification
1.Init Error Message ID = " "
2.Init Error Code = '0'
3.If Action Code (ACTN) = 'A' / 'C' / 'D'
4. If Action Code (ACTN) = 'A'
5. Fetch from Equipment Tag MBF Cache using NUMB=Asset Item Number(NUMB) and Modified
Flag='O' using B1200280.
6. Map All F1217 Parameters from B1200280's Data Structure to F1217Z2.
7. Line Number (EDLN) = 2
8. Call B9800100 to retrieve Audit Information, Wk User Id, Wk WorkstationID, Wk
TimeUpdated, Wk DateUpdated.
9. Map the following into F1217Z2 and Insert.
10.
EDI User ID (EDUS) = User ID(EDUS)
EDI Batch Number (EDBT) = Batch Number (EDBT)
EDI Transaction Number (EDTN) = Transaction Number(EDTN)
TypeTransaction (TYTN) = Input Transaction Type
EDI_Translation Format (EDFT) = " "
EDI - Transmission Date (EDDT) = 0
Direction Indicator (DRIN) = '2'
EDI Line Number (EDLN) = Line Number(EDLN)
Number of Detail Lines (EDDL) = EDI Detail Lines(EDDL)
Process Result Flag (EDSP) = " "
Trading Partner ID (PNID) = " "
Action Code (TNAC) = "02"
Transaction Originator (TORG) = Wk User Id
User ID (USER) = Wk User Id
Program ID (PID) = Input Program ID
Work Station ID (JOBN) = Wk WorkstationID
Date Updated (UPMJ) = Wk DateUpdated
Time Of Day (TDAY) = Wk TimeUpdated
11.
12. End If
13. If Action Code = 'C'
14. Fetch from Equipment Tag MBF Cache using NUMB=Asset Item Number(NUMB) and
Modified Flag='O' using B1200280.
15. Map All F1201 Parameters from B1200280's Data Structure to F1217Z2.
16. Call B9800100 to retrieve Audit Information, Wk User ID, Wk
WorkstationID, Wk TimeUpdated, Wk DateUpdated.
17. Map the following into F1217Z2 and Insert
18.
EDI User ID (EDUS) = User ID(EDUS)
EDI Batch Number (EDBT) = Batch Number (EDBT)
EDI Transaction Number (EDTN) = Transaction Number(EDTN)
TypeTransaction (TYTN) = Input Transaction Type
EDI_Translation Format (EDFT) = " "
EDI - Transmission Date (EDDT) = 0
Direction Indicator (DRIN) = '2'
EDI Line Number (EDLN) = Line Number(EDLN)
Number of Detail Lines (EDDL) = EDI Detail Lines(EDDL)
Process Result Flag (EDSP) = " "
Trading Partner ID (PNID) = " "
Action Code (TNAC) = "UB"
Transaction Originator (TORG) = Wk User Id
User ID (USER) = Wk User Id
Program ID (PID) = Input Program ID
Work Station ID (JOBN) = Wk WorkstationID
Date Updated (UPMJ) = Wk DateUpdated
Time Of Day (TDAY) = Wk TimeUpdated
19.
20. Fetch from Equipment Tag MBF Cache using NUMB=Asset Item Number(NUMB) and
Modified Flag='N' using B1200280.
21. Map All F1217 Parameters from B1200280's Data Structure to F1217Z2.
22. Line Number (EDLN) = 2
23. Map the following into F1217Z2 and Insert
24.
EDI User ID (EDUS) = User ID(EDUS)
EDI Batch Number (EDBT) = Batch Number (EDBT)
EDI Transaction Number (EDTN) = Transaction Number(EDTN)
TypeTransaction (TYTN) = Input Transaction Type
EDI_Translation Format (EDFT) = " "
EDI - Transmission Date (EDDT) = 0
Direction Indicator (DRIN) = '2'
EDI Line Number (EDLN) = Line Number(EDLN)
Number of Detail Lines (EDDL) = EDI Detail Lines(EDDL)
Process Result Flag (EDSP) = " "
Trading Partner ID (PNID) = " "
Action Code (TNAC) = "UA"
Transaction Originator (TORG) = Wk User Id
User ID (USER) = Wk User Id
Program ID (PID) = Input Program ID
Work Station ID (JOBN) = Wk WorkstationID
Date Updated (UPMJ) = Wk DateUpdated
Time Of Day (TDAY) = Wk TimeUpdated
25.
26. End If
27. If Action Code (ACTN) = 'D'
28. Fetch from Equipment Tag MBF Cache using NUMB=Asset Item Number(NUMB) and
Modified Flag='O' using B1200280.
29. Map All F1217 Parameters from B1200280's Data Structure to F1217Z2.
30. Line Number (EDLN) = 2
31. Call B9800100 to retrieve Audit Information, Wk User ID, Wk
WorkstationID, Wk TimeUpdated, Wk DateUpdated.
32. Map the following into F1217Z2 and Insert.
33.
EDI User ID (EDUS) = User ID(EDUS)
EDI Batch Number (EDBT) = Batch Number (EDBT)
EDI Transaction Number (EDTN) = Transaction Number(EDTN)
TypeTransaction (TYTN) = Input Transaction Type
EDI_Translation Format (EDFT) = " "
EDI - Transmission Date (EDDT) = 0
Direction Indicator (DRIN) = '2'
EDI Line Number (EDLN) = Line Number(EDLN)
Number of Detail Lines (EDDL) = EDI Detail Lines(EDDL)
Process Result Flag (EDSP) = " "
Trading Partner ID (PNID) = " "
Action Code (TNAC) = "03"
Transaction Originator (TORG) = Wk User Id
User ID (USER) = Wk User Id
Program ID (PID) = Input Program ID
Work Station ID (JOBN) = Wk WorkstationID
Date Updated (UPMJ) = Wk DateUpdated
Time Of Day (TDAY) = Wk TimeUpdated
34.
35. End If
36.
37.Else
38. Set Error Message ID "0002"
39.End If
D1200300 - F1217Z2 Insert Unedited Equipmet Tag Transactions
Parameter Name | Data Item | Data Type | Req/Opt | I/O/Both |
---|---|---|---|---|
cActionCode | ACTN | char | OPT | NONE |
A code that specifies the action that is performed. Valid values are: A Add C Change | ||||
szTypeTransaction | TYTN | char | OPT | NONE |
The qualifier used to identify a specific type of transaction. | ||||
szEquipTagCacheName | JBNM | char | OPT | NONE |
This is the name of a job in the system. | ||||
mnAssetItemNumber | NUMB | MATH_NUMERIC | OPT | NONE |
An 8-digit number that uniquely identifies an asset. | ||||
mnEdiDetailLinesProcess | EDDL | MATH_NUMERIC | OPT | NONE |
The number of detail lines transmitted in an EDI transaction. This is the total number of lines on a per order basis, number of lines included
| ||||
szProgramId | PID | char | OPT | NONE |
The number that identifies the batch or interactive program (batch or interactive object). For example, the number of the Sales Order Entry
| ||||
cErrorCode | ERRC | char | OPT | NONE |
This error code indicates if any errors occurred during the creation of the Trip Document Detail (F4914) records by the Delivery Document
| ||||
cSuppressErrorMessage | SUPPS | char | OPT | NONE |
A flag indicating whether or not runtime error messaging will occur when an error message is issued from a business function.
0 = allow
| ||||
szErrorMessageID | DTAI | char | OPT | NONE |
A code that identifies and defines a unit of information. It is an alphanumeric code up to 8 characters long that does not allow blanks or
| ||||
szEdiUserId | EDUS | char | OPT | NONE |
The source of the transaction. This can be a user ID, a workstation, the address of an external system, a node on a network, and so on. This
| ||||
szEdiBatchNumber | EDBT | char | OPT | NONE |
The number that the transmitter assigns to the batch. During batch processing, the system assigns a new batch number to the PeopleSoft
| ||||
szEdiTransactNumber | EDTN | char | OPT | NONE |
The number that an Electronic Data Interchange (EDI) transmitter assigns to a transaction. In a non-EDI environment, you can assign any
| ||||
mnEdiLineNumber | EDLN | MATH_NUMERIC | OPT | NONE |
This is the line number you assign when originating an EDI transaction. This number can represent an order line number (applicable for any
|
B0000175 Get Next Transaction Number | ||||
B0000176 Add Transaction To Subsystem Queue | ||||
B1200280 Cache Process Equipment Tag MBF | ||||
B9800100 Get Audit Information |
F1217Z1 Unedited Equipment Tag Transactions |