Functional Description
Purpose
This function loads the appropriate fields to write an Inventory Cardex record (F4111) from the Lot
Master and Lot Availability programs.
Setup Notes and Prerequisites
The pointer to the Item Master record (F4101) is a required input parameter. If calling from Lot
Master, pass '4108' in the Program Id parameter. If calling from Lot Availability, pass '41280' in the
Program Id parameter.
Special Logic
Technical Specification
This function loads parameters into the Write Cardex Record (B4100040) business function. The
document number written is '4108' and the As of Posted code = 'X'. The Lot Master Cardex field (LMCX) =
'Y'. You could possibly call the Write Cardex Record function three times.
If the lot status is not equal to the original lot status QuantityOnHand =
TransactionQuantity
If lot status is not equal to blank
And original lot status is equal to blank
OR lot status is not equal to blank
And original lot status is not equal to blanks
Multiply the Transaction Quantity by negative 1
end
If Program Id = '4108'
Explanation = 'Lot Status Change'
end
ReasonCode=Status Change Reason
DocumentType='IZ'
Call Write Cardex Record
end
If the grade is not equal to the original grade and Program Id = '4108'
TransactionQuantity = Quantity on Hand
Explanation = 'Grade Change'
Reason Code = Grade Change Reason
DocumentType = Grade Change Type
Call WriteCardexRecord
end
If the potency is not equal to the original potency and Program Id = '4108'
TransactionQuantity = Quantity on Hand
Explanation = 'Potency Change'
Reason Code = Potency Change Reason
DocumentType = Potency Change Type
Call WriteCardexRecord
end
^
D4100090 - Lot Master Cardex Shell
Parameters:
Data Item Data Structure DescriptionI/ORequired
ItemMasterRecordGENLNGIY
ShortIemNumberITMIY
SecondItemNumberLITMIN
ThirdItemNumberAITMIN
BranchPlantMCUIY
KeyCompanyKCOIN
LotNumberLOTNIN
G/LClassGLPTIN
OriginalLotStatusLOTSIY
OriginalGradeStatusLOTGIY
OriginalPotencyStatusLOTPIY
LotStatusLOTSIY
LotGradeLOTGIY
LotPotencyLOTPIY
QuantityOnHandPQOHIN
StatusChangeReasonSTRCDIN
GradeChangeReasonGRRCDIN
PotencyChangeReasonPTRCDIN
GradeChangeTypeDCTIN
PotencyChangeTypeDCTIN
LocationLOCNIN
ProgramIDDOCOIY
^
Parameter Name | Data Item | Data Type | Req/Opt | I/O/Both |
---|---|---|---|---|
idItemMasterRecord | GENLNG | ID | NONE | NONE |
General purpose ID variable. | ||||
mnShortItemNumber | ITM | MATH_NUMERIC | NONE | NONE |
An inventory item number. The system provides three separate item numbers plus an extensive cross-reference capability to other item
| ||||
szSecondItemNumber | LITM | char | NONE | NONE |
A number that identifies the item. The system provides three separate item numbers plus an extensive cross-reference capability to
| ||||
szThirdItemNumber | AITM | char | NONE | NONE |
The system provides three separate item numbers plus an extensive cross-reference capability to alternate item numbers. These item
| ||||
szBranchPlant | MCU | char | NONE | NONE |
An alphanumeric code that identifies a separate entity within a business for which you want to track costs. For example, a business unit
| ||||
szKeyCompany | KCO | char | NONE | NONE |
A number that, with the document number, document type and G/L date, uniquely identifies an original document, such as invoice, voucher,
| ||||
szLotNumber | LOTN | char | NONE | NONE |
A number that identifies a lot or a serial number. A lot is a group of items with similar characteristics. | ||||
szGLClass | GLPT | char | NONE | NONE |
A user defined code (41/9) that identifies the G/L offset that system uses when it searches for the account to which it posts the transaction. If
| ||||
cLotStatus | LOTS | char | NONE | NONE |
A user defined code (41/L) that indicates the status of the lot. If you leave this field blank, it indicates that the lot is approved. All other codes
| ||||
szLotGrade | LOTG | char | NONE | NONE |
A code that indicates the grade of a lot. The grade is used to indicate the quality of the lot. Examples include the following:
A1 Premium
| ||||
mnLotPotency | LOTP | MATH_NUMERIC | NONE | NONE |
A code that indicates the potency of the lot expressed as a percentage of active or useful material (for example, the percentage of alcohol
| ||||
mnQuantityOnHand | PQOH | MATH_NUMERIC | NONE | NONE |
The number of units that are physically in stock. The system displays the quantity on-hand in the primary unit of measure. | ||||
cOriginalLotStatus | LOTS | char | NONE | NONE |
A user defined code (41/L) that indicates the status of the lot. If you leave this field blank, it indicates that the lot is approved. All other codes
| ||||
szOriginalGradeStatus | LOTG | char | NONE | NONE |
A code that indicates the grade of a lot. The grade is used to indicate the quality of the lot. Examples include the following:
A1 Premium
| ||||
mnOriginalPotencyStatus | LOTP | MATH_NUMERIC | NONE | NONE |
A code that indicates the potency of the lot expressed as a percentage of active or useful material (for example, the percentage of alcohol
| ||||
szStatusChangeReason | STRCD | char | NONE | NONE |
szGradeChangeReason | GRRCD | char | NONE | NONE |
szPotencyChangeReason | PTRCD | char | NONE | NONE |
szGradeChangeType | DCT | char | NONE | NONE |
A user defined code (00/DT) that identifies the origin and purpose of the transaction. PeopleSoft reserves several prefixes for document
| ||||
szPotencyChangeType | DCT | char | NONE | NONE |
A user defined code (00/DT) that identifies the origin and purpose of the transaction. PeopleSoft reserves several prefixes for document
| ||||
szLocation | LOCN | char | NONE | NONE |
The storage location from which goods will be moved. | ||||
mnProgramID | DOCO | MATH_NUMERIC | NONE | NONE |
A number that identifies an original document. This document can be a voucher, a sales order, an invoice, unapplied cash, a journal entry,
| ||||
mnAddressNumber | AN8 | MATH_NUMERIC | OPT | NONE |
A number that identifies an entry in the Address Book system, such as employee, applicant, participant, customer, supplier, tenant, or
| ||||
szVendorLotNumber | RLOT | char | OPT | NONE |
The supplier's lot number for the item. |
B4100040 Write Cardex Record | ||||
B9800100 Get Audit Information |
F4101 Item Master |