Class BM_Production_bus

Inherits

BM_CommonEntry, CI_ItemConstant, CI_TierCostCalc

Properties

LOCAL cMainTable$="BM_ProductionHeader"  
LOCAL cIsSysDB=isFALSE  
LOCAL cProgressBarTitle$="Production Entry"  
LOCAL cBatchModule$="B/M"  
LOCAL cBatchTotalVars$=$$  
LOCAL cBatchType$  
PROPERTY QtyMask$   * Read Only *
PROPERTY QuantityToProduce   * Read Only *
PROPERTY TrackLotSerialExpiration   * Read Only *

[boolean] Flag to indicate that current Bill is tracking lot/serial expiration dates

PROPERTY RequireExpirationDate   * Read Only *

[boolean] Flag to indicate that the lot/serial expiration date is required

Methods

FUNCTION Delete(Key$)  
FUNCTION GetNextProductionNo(tmpProductionNo$)  
FUNCTION IsExpDateCalculated()  

Function returns whether the current production bill is an item where the expiration date is being calculated or not

Returns [boolean]
ValueDescription
isTRUE if bill number is a lot/serial item which is tracking lot/serial expiration dates and that date is a calculated date
isFALSE if bill is not lot/serial or not using lot/serial expiration dates and not calculated the lot/serial expiration date
FUNCTION RecalcExpDate(newDate$)  

Recalculates the lot/serial expiration date if applicable for the current bill

ParameterDescription
newDate$ [input, date] date to base the calculation on
Returns Always returns retSUCCESS(1)
FUNCTION ResetExpDate(resetDate$)  

Function to reset the expiration date to a specific value. This will not redo the validation for the field.

ParameterDescription
resetDate$ [input, date] date to reset the expiration date to
Returns returns [boolean]
ValueDescription
retSUCCESS(1) if valid date or blank
retFAILURE(0) if invalid date

Methods inherited from: CI_TierCostCalc

CalcCost(), ClearCCByBatch(), ClearCCByDeKey(), ClearCCByJournal(), ClearCCWorkFile(), PERFORM ClearCommits(), PERFORM PostTableReadCI_TierCostCalc(), PERFORM PreNextRecordCI_TierCostCalc(), PERFORM PreTableWriteCI_TierCostCalc(), PERFORM ProcessTierDistribution()