Functional Description
Purpose
This function edits/defaults/validates F1217 data items and performs the requested action to the
database in a single call. The editing/defaulting/validation of most items are done based on the data
dictionary.
This Master Business Function (MBF) serves as the "file-server" for the F1217 table. The design of
this function is modeled after the Master File MBF model. This implies the following functional
characteristics:
Single call to add/update/delete/inquire from/to F1217. During updates, full
editing/defaults/validation will also be performed on all F1217 data items.
Single data structure, no multiple functions embedded in this source file.
It will also handle Equipment Tag exports to the Interoperability system.
'b7'b7'b7
Setup Notes and Prerequisites
Definitions
1)"Soft" errors are errors that do not cause the function to stop processing further and exit.
Currently, all field validations other than Item Number (NUMB) will cause only "soft" errors.
2)"Fatal" errors are errors that cause the function to stop processing further and exit. Currently,
an invalid Action Code (ACTN) or an invalid/null/zero Item Number (NUMB) will cause "fatal" errors.
3)Any error (Soft or Fatal) will prevent database commits to occur.
Special Logic
When the Action Code is 'A'(Add), the MBF will not perform any editing on all data items other than
the Item Number (NUMB). However, the calling function MUST pass in 0s into all numeric fields and
blanks into all character/string fields. This will allow the addition of a F1217 record with 0s and blanks
in all fields except Item Number (WRNUMB). The calling function must then call this MBF again
immediately with an Action Code of 'C' (Change) and pass in all F1217 parameters for
editing/defaulting/validation. This MBF will edit the F1217 fields and update the entire F1217 record.
'b7'b7'b7
Technical Specification
Processing
1.Set Fatal Error (wf) = '0'
2.Set Soft Error (wf) = '0'
3.Set ReturnErrorMessageID (wf) = " "
4.Set NumberOfErrors (wf) = 0
5.Set MathVariable (wf) = 0
6.//
7.*** Initialize Error Message ID (DTAI) = " " ***
8.//
9.If Action Code (ACTN) is not 'A' and not 'C' and not 'D' and not 'I'
10. Fatal Error (wf) = '1'
11. Set NER Error "0001" on ACTN.
12.End If
13.If Update Master File (EV01) is not '0' and not '1'
14. Default to '0'
15.End If
16.If Process Edits (EV01) is not '0' and not '1'
17. Default to '1'
18.End If
19.If Suppress Error Message (SUPPS) is not '0' and not '1'
20. Default to '0'
21.End If
22.If Calling Program Version (VERS) is blank then
23. Default to "XJDE0001"
24.End IF
25.//
26.*** Edit F1217 Parameters ***
27.//
28.If Fatal Error (wf) = '0'
29. If Action Code (ACTN) = 'C' Or 'A'
30. If Item Number (NUMB) = Null Or Zero
31. Fatal Error (wf) = '1'
32. Set NER Error "4330" on NUMB.
33. Else
34. Fetch Single from F1201 using WRNUMB(= Item Number (NUMB)).
35. If Failed then
36. Fatal Error (wf) = '1'
37. Set NER Error "0626" on NUMB
38. End If
39. End If
40. End If
41. If Action Code (ACTN) = 'C' then
42. If Fatal Error (wf) = '0'
43. If Branch (MMCU) <> " " And <> NULL
44. // Validate MMCU
45. Call F0006 Check Business Unit Existence (B5100003)
46. Branch (MMCU)'e0 Business Unit
47. ReturnCode (wf)'df Found Flag
48. If ReturnCode (wf) <> '1' then
49. Soft Error (wf) = '1'
50. Set NER Error "0052" on Branch (MMCU)
51. End If
52. End If
53. If Order Number (DOCO) <> 0
54. // Validate DOCO
55. Call F4211 Get Sales Detail Row (B4200680)
56. Order Number (DOCO) 'e0 Order number
57. Order Type (DCTO) 'e0 Order Type
58. Order Company (KCOO) 'e0 Key Company
59. Line Number (LNID) 'e0 Line Number
60. ReturnErrorMessageID(wf)'df Error Message
61. If ReturnErrorMessageID(wf) <> " "
62. Soft Error = '1'
63. End If
64. End If
65. If Order Type (DCTO) <> " " And <> NULL
66. If Order Number (DOCO) = 0
67. Soft Error (wf) = '1'
68. Set Error "0003" on Order Number (DOCO)
69. End IF
70. // Validate DCTO
71. Call Data Dictionary Validation (BDDVAL)
72. "DCTO" 'e0 Date Item
73. "2" 'e0 Everest Type
74. Order Type (DCTO)'e0 String
75. End If
76. If Order Company (KCOO) <> " " And <> NULL
77. If Order Number (DOCO) = 0
78. Soft Error (wf) = '1'
79. Set Error "0003" on Order Number (DOCO)
80. End If
81. // Validate KCOO
82. Call Data Dictionary Validation (BDDVAL)
83. "KCOO" 'e0 Date Item
84. "2" 'e0 Everest Type
85. Order Company (KCOO)'e0 String
86. End If
87. // Validate ORDJ
88. Call Data Dictionary Validation (BDDVAL)
89. "ORDJ" 'e0 Date Item
90. "11" 'e0 Everest Type
91. Ordered Date (ORDJ) 'e0 Date
92. // Validate SHPJ
93. Call Data Dictionary Validation (BDDVAL)
94. "SHPJ" 'e0 Date Item
95. "11" 'e0 Everest Type
96. Shipped Date (SHPJ) 'e0 Date
97. // Validate ADDJ
98. Call Data Dictionary Validation (BDDVAL)
99. "ADDJ" 'e0 Date Item
100. "11" 'e0 Everest Type
101. Actual Ship Date (ADDJ)'e0 Date
102. If Address Number Owner (ANOB) <> 0
103. // Validate ANOB
104. Call Data Dictionary Validation (BDDVAL)
105. "ANOB" 'e0 Date Item
106. "9" 'e0 Everest Type
107. Address Number Owner (ANOB)'e0 Numeric
108. End If
109. If Related PO SO WO Number (RORN) <> " " And <> NULL And <> "0"
110. Call Convert String to Numeric (B4000770) to convert Related PO
SO WO Number (RORN)to numeric and save the number in MathVariable(wf).
111. Fetch Single from F4801 using WADOCO(=MathVariable(wf)).
112. If Failed
113. Soft Error (wf) = '1'
114. Set NER Error "0115" on Related PO SO WO Number (RORN).
115. End If
116. End If
117. If Related Order Type (RCTO) <> " " And <> NULL
118. If Related PO SO WO Number (RORN) = " " Or = NULL Or = "0"
119. Soft Error (wf) = '1'
120. Set Error "0003" on Related PO SO WO Number (RORN)
121. End If
122. // Validate RCTO
123. Call Data Dictionary Validation (BDDVAL)
124. "RCTO" 'e0 Date Item
125. "2" 'e0 Everest Type
126. Related Order Type (RCTO)'e0 String
127. End If
128. // Validate STRX
129. Call Data Dictionary Validation (BDDVAL)
130. "STRX" 'e0 Date Item
131. "11" 'e0 Everest Type
132. Completed Date (STRX)'e0 Date
133. If Primary Last Supplier (VEND) <> 0
134. // Validate VEND
135. Call Data Dictionary Validation (BDDVAL)
136. "VEND" 'e0 Date Item
137. "9" 'e0 Everest Type
138. Primary Last Supplier (VEND)'e0 Numeric
139. End If
140. If Original OrderNumber (OORN) <> " " And Original OrderNumber
(OORN) <> NULL And Original OrderNumber (OORN) <> "0"
141. // Validate OORN
142. Call Convert String to Numeric (B4000770) to convert Original
OrderNumber (OORN) to numeric and save the number in MathVariable(wf).
143. Call F4311 Get Purchase Order Detail Row (B4300110)
144. MathVariable(wf) 'e0 Order Number
145. Original Order Type(OCTO)'e0 Order Type
146. Original Order Company(OKCO)'e0 Document Company
147. Original Order Suffix (SFXO) 'e0 Order Suffix
148. Original Line Number (OGNO)'e0 Line Number
149. ReturnErrorMessageID(wf) 'df Error Message
150. If ReturnErrorMessafeID(wf) <> " "
151. Soft Error (wf) = '1'
152. End If
153. End If
154. If Original Order Type (OCTO) <> " " And <> NULL
155. If Original OrderNumber (OORN) = " " Or Original OrderNumber
(OORN) = NULL Or Original OrderNumber (OORN) = "0"
156. Soft Error = '1'
157. Set Error "0003" on Original OrderNumber (OORN)
158. End If
159. // Validate OCTO
160. Call Data Dictionary Validation (BDDVAL)
161. "OCTO" 'e0 Date Item
162. "2" 'e0 Everest Type
163. Original Order Type (OCTO)'e0 String
164. End If
165. If Original Order Company (OKCO) <> " " And <> NULL
166. If Original OrderNumber (OORN) = " " Or Original OrderNumber
(OORN) = NULL OrOriginal OrderNumber (OORN) = "0"
167. Soft Error = '1'
168. Set Error "0003" on Original OrderNumber (OORN)
169. End If
170. // Validate OKCO
171. Call Data Dictionary Validation (BDDVAL)
172. "OKCO" 'e0 Date Item
173. "2" 'e0 Everest Type
174. '1a'1a
D1200090A - F1217 Process Master Data Data Structure
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 | ||||
cUpdateMasterFile | EV01 | char | OPT | NONE |
An option that specifies the type of processing for an event. | ||||
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
| ||||
cProcessEdits | EV01 | char | OPT | NONE |
An option that specifies the type of processing for an event. | ||||
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
| ||||
szCallingProgramVersion | VERS | char | OPT | NONE |
A user-defined set of specifications that control how applications and reports run. You use versions to group and save a set of user-defined
| ||||
szCallingProgramId | 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
| ||||
szProcessModule | VC04A | char | OPT | NONE |
This is a generic field used as a work field in Everest. | ||||
mnItemNumber | NUMB | MATH_NUMERIC | OPT | NONE |
An 8-digit number that uniquely identifies an asset. | ||||
szConfiguredModel | CMOD | char | OPT | NONE |
szBranch | MMCU | char | OPT | NONE |
A code that represents a high-level business unit. Use this code to refer to a branch or plant that might have departments or jobs, which
| ||||
mnOrderNumber | DOCO | MATH_NUMERIC | OPT | NONE |
A number that identifies an original document. This document can be a voucher, a sales order, an invoice, unapplied cash, a journal entry,
| ||||
szOrderType | DCTO | char | OPT | NONE |
A user defined code (00/DT) that identifies the type of document. This code also indicates the origin of the transaction. J.D. Edwards has
| ||||
szOrderCompany | KCOO | char | OPT | NONE |
A number that, along with order number and order type, uniquely identifies an order document (such as a purchase order, a contract, a
| ||||
mnLineNumber | LNID | MATH_NUMERIC | OPT | NONE |
A number that identifies multiple occurrences, such as line numbers on a purchase order or other document. Generally, the system assigns
| ||||
jdOrderedDate | ORDJ | JDEDATE | OPT | NONE |
The date you entered the sales or purchase order into the system. | ||||
jdShippedDate | SHPJ | JDEDATE | OPT | NONE |
The date on which you confirm that a specific order line was shipped. | ||||
jdActualShipDate | ADDJ | JDEDATE | OPT | NONE |
The date on which the shipment to the customer is confirmed as shipped. During shipment confirmation, the system updates the Sales
| ||||
mnAddressNumber_OwnerBilling | ANOB | MATH_NUMERIC | OPT | NONE |
The address number of an alternate location to which the owner wants the invoice (application) sent. | ||||
szRelatedPoSoWoNumber | RORN | char | OPT | NONE |
A number that identifies a secondary purchase order, sales order, or work order that is associated with the original order. This number is for
| ||||
szRelatedPoSoWoOrderType | RCTO | char | OPT | NONE |
A user defined code (system 00, type DT) that indicates the document type of the secondary or related order. For example, a purchase
| ||||
jdCompleted | STRX | JDEDATE | OPT | NONE |
The date that the work order or engineering change order is completed or canceled. | ||||
mnPrimaryLastSupplier | VEND | MATH_NUMERIC | OPT | NONE |
The address book number of the preferred provider of this item. | ||||
szOriginalOrderNumber | OORN | char | OPT | NONE |
The original document number. This can be a voucher, an invoice, unapplied cash, a journal entry number, and so on Matching document
| ||||
szOriginalOrderType | OCTO | char | OPT | NONE |
This code defines the order type. It is verified in user defined codes (40/OT). Reserved document types have been defined for voucher
| ||||
szOriginalOrderCompany | OKCO | char | OPT | NONE |
A number that is used in conjunction with the values in the ODOC and ODCT fields to identify a transaction. | ||||
mnOriginalLineNumber | OGNO | MATH_NUMERIC | OPT | NONE |
A number identifying which line on the original order that the current line matches. | ||||
szInstallKey | SYEM | char | OPT | NONE |
szProductComponent | PRODC | char | OPT | NONE |
The components that make an equipment number or components associated with a customer site. | ||||
szCategoryCodeCustProfile_01 | ZE01 | char | OPT | NONE |
A user defined reporting code for equipment. | ||||
szCategoryCodeCustProfile_02 | ZE02 | char | OPT | NONE |
A user defined reporting code for equipment. | ||||
szCategoryCodeCustProfile_03 | ZE03 | char | OPT | NONE |
A user defined reporting code for equipment. | ||||
szCategoryCodeCustProfile_04 | ZE04 | char | OPT | NONE |
A user defined reporting code for equipment. | ||||
szCategoryCodeCustProfile_05 | ZE05 | char | OPT | NONE |
A user defined reporting code for equipment. | ||||
szCategoryCodeCustProfile_06 | ZE06 | char | OPT | NONE |
A user defined reporting code for equipment. Enter a value from UDC 17/B6. | ||||
szCategoryCodeCustProfile_07 | ZE07 | char | OPT | NONE |
A user defined reporting code for equipment. | ||||
szCategoryCodeCustProfile_08 | ZE08 | char | OPT | NONE |
A user defined reporting code for equipment. | ||||
szCategoryCodeCustProfile_09 | ZE09 | char | OPT | NONE |
A user defined reporting code for equipment. | ||||
szCategoryCodeCustProfile_10 | ZE10 | char | OPT | NONE |
A user defined reporting code for equipment. | ||||
szOriginalOrderSuffix | SFXO | char | OPT | NONE |
In the A/R and A/P systems, a code that corresponds to the pay item. In the Sales Order and Procurement systems, this code identifies
| ||||
szReferenceNumber | REFN | char | OPT | NONE |
A Reference number or identification number as defined for a particular EDI transaction set or as specified by the Reference Number
| ||||
szUserReservedCode | URCD | char | OPT | NONE |
This is a 2 position code that is reserved for the user. JDE does not currently use this field and will not utilize this field in the future. | ||||
szUserReservedReference | URRF | char | OPT | NONE |
A 15-position reference that is reserved for the user. J.D. Edwards does not currently use this field and does not plan to use it in the future. | ||||
mnUserReservedNumber | URAB | MATH_NUMERIC | OPT | NONE |
This is a 8 position code that is reserved for the user. JDE does not currently use this field and will not utilize this field in the future. | ||||
mnUserReservedAmount | URAT | MATH_NUMERIC | OPT | NONE |
This is a 15 position code that is reserved for the user. JDE does not currently use this field and will not utilize this field in the future. | ||||
szProductFamily | PRODF | char | OPT | NONE |
A code that classifies an inventory item into a group for customer service. Some examples include: Laser Printer, Inkjet, or Fax. | ||||
szProductModel | PRODM | char | OPT | NONE |
A code that classifies an inventory item into a model for customer service. Some examples include: Laser Printer, Inkjet or Fax. | ||||
szCountry | CTR | char | OPT | NONE |
A user defined code (00/CN) that identifies a country. The country code has no effect on currency conversion.
The Address Book system
| ||||
cCompanyOwned | COOWN | char | OPT | NONE |
A flag that indicates if an equipment record is company owned. | ||||
mnAddressNumberShipTo | SHAN | MATH_NUMERIC | OPT | NONE |
The address number of the location to which you want to ship this order. The address book provides default values for customer address,
| ||||
mnAddressNumberParent | PA8 | MATH_NUMERIC | OPT | NONE |
The address book number of the parent company. The system uses this number to associate a particular address with a parent company
| ||||
mnSalesperson1 | SLSM | MATH_NUMERIC | OPT | NONE |
The first of two salespeople who have responsibility for or can receive a commission on sales to this customer.
You create this code by
| ||||
szVehicleIdentNumber | VINNU | char | OPT | NONE |
jdUserReservedDate | URDT | JDEDATE | OPT | NONE |
This is a 6 position code that is reserved for the user. JDE does not currently use this field and will not utilize this field in the future. | ||||
szCreatedByUser | CRTU | char | OPT | NONE |
The address book number of the user who created this record. | ||||
szProgramIDForProcOpt | 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
| ||||
szVersionForProcOpt | VERS | char | OPT | NONE |
A user-defined set of specifications that control how applications and reports run. You use versions to group and save a set of user-defined
| ||||
szAssetMasterMBFCacheName | JBNM | char | OPT | NONE |
This is the name of a job in the system. | ||||
szEquipTagMBFCacheName | JBNM | char | OPT | NONE |
This is the name of a job in the system. | ||||
cAutomaticCleanUp | EV01 | char | OPT | NONE |
An option that specifies the type of processing for an event. | ||||
szLot | LOTN | char | OPT | NONE |
A number that identifies a lot or a serial number. A lot is a group of items with similar characteristics. | ||||
szLocation | LOCN | char | OPT | NONE |
The storage location from which goods will be moved. | ||||
mnECONumber_WOD | WOD | MATH_NUMERIC | OPT | NONE |
The order number from the work order. | ||||
szBillRevisionLevel_BREV | BREV | char | OPT | NONE |
A value that indicates the revision level of a bill of material. It is usually used in conjunction with an engineering change notice or
| ||||
jdECOEffectiveDate_EFFF | EFFF | JDEDATE | OPT | NONE |
A date that indicates one of the following:
o When a component part goes into effect on a bill of material
o When a routing step goes into
| ||||
mnDefaultDealer_AN8DL | AN8DL | MATH_NUMERIC | OPT | NONE |
The default Dealer for the Customer. | ||||
mnAssessorNumber_AN8AS | AN8AS | MATH_NUMERIC | OPT | NONE |
The address book number that identifies the assessor. | ||||
cTermsAcceptedFlag_TERMYN | TERMYN | char | OPT | NONE |
A code that specifies whether the owner of the equipment has agreed to the the terms and conditions presented regarding the ownership of
| ||||
jdInServiceDate_INSDTE | INSDTE | JDEDATE | OPT | NONE |
The date that the equipment was placed into service. | ||||
cMeterReadingRequired_MRRYN | MRRYN | char | OPT | NONE |
A code that specifies whether the system requires a value in one of the meter readings fields when you enter a warranty claim against a
| ||||
szRegistrationStatus_REGSTS | REGSTS | char | OPT | NONE |
A code that specifies the current registration status for an equipment record. Enter a value from UDC 17/RS. | ||||
mnDistributor_AN8DR | AN8DR | MATH_NUMERIC | OPT | NONE |
The address book number that identifies the distributor of the equipment. | ||||
szSalesType_SATYP | SATYP | char | OPT | NONE |
A code that specifies the sales type for the equipment. Enter a value from UDC 17/SY. | ||||
mnEquipmentPartsNumber | EQPN | MATH_NUMERIC | OPT | NONE |
szMfgWOBranchPlant_MMCU | MMCU | char | OPT | NONE |
A code that represents a high-level business unit. Use this code to refer to a branch or plant that might have departments or jobs, which
|
None |
None |