ÿ
TVBBARCODEFORM064TPF0TVBBarCodeForm
VBBarCodeFormLeft¼TopmWidth˜HeightkCaption
VBBarCodeFormColor	clBtnFaceFont.CharsetDEFAULT_CHARSET
Font.ColorclWindowTextFont.Heightó	Font.NameSystem
Font.StyleOldCreateOrder	PositionpoScreenCenterOnClose	FormCloseOnCreate
FormCreate
PixelsPerInch`
TextHeightTLabelLabel1LeftTop(WidthâHeightCaption!ProgressBar: 1 to 400; 4 bars=10%TButtonVBTestLabelLeftTop<Width•Height!CaptionUBI VB Test LabelTabOrderVisibleOnClickVBTestLabelClickTBitBtnCloseBitBtnLeftTopdWidthYHeight!CaptionCloseTabOrderOnClickCloseBitBtnClickTButtonButton1LeftàTopWidth©HeightCaption
FixVBYarnRcptEnabledTabOrderOnClickButton1ClickTProgressBarProgressBar1LeftTop@Width�HeightAlignalBottomMinMaxdStepTabOrderTButtonButton2LeftàTop(Width©HeightCaptionDel Head Txn Det UpdateEnabledTabOrderOnClickButton2ClickTButtonButton3LeftàToppWidth©HeightCaptionCreate Issue Det TxnsEnabledTabOrderOnClickButton3ClickTButtonButton4LeftTopÈWidth¡HeightCaptionFix IssueDet ProdRefEnabledTabOrderOnClickButton4ClickTButtonButton5LeftàTop�Width©HeightCaptionCreate WIPRcpt TxnsEnabledTabOrderOnClickButton5ClickTButtonButton6LeftàTop°Width©HeightCaptionCreate WIP Issue TxnsEnabledTabOrderOnClickButton6ClickTButtonButton7LeftÈTopÐWidthÁHeightCaptionCreate Yn Rcpt && Desp TxnsEnabledTabOrder	OnClickButton7ClickTButtonConvertStkMinBtnLeftTopðWidth�HeightCaption
ConvertStkMinEnabledTabOrder
OnClickConvertStkMinBtnClickTButtonButton8LeftèTopWidth¡HeightCaptionFix DespDate in VBRcptTabOrderOnClickButton8ClickTButtonDailybalanceLeftTopWidth‘HeightCaptionInsert BalancesEnabledTabOrderOnClickDailybalanceClickTApdComPortUBIComPort2	ComNumberStopBits
SWFlowOptionsswfBoth
BufferFullBufferResume	TraceNameAPD.TRCLogNameAPD.LOGUseEventWordLeft8TopTTable
VBYarnRcptDatabaseNameVBStock	TableName
VBYARNRCPTLeft¨TopP
TIntegerFieldVBYarnRcptBOXNO	FieldNameBOXNORequired	TSmallintFieldVBYarnRcptLOTNO1	FieldNameLOTNO1Required	TSmallintFieldVBYarnRcptLOTNO2	FieldNameLOTNO2Required	TStringFieldVBYarnRcptYNSTRU	FieldNameYNSTRURequired	SizeTStringFieldVBYarnRcptYNTWIST	FieldNameYNTWISTRequired	SizeTStringFieldVBYarnRcptYNCOL	FieldNameYNCOLRequired	SizeTFloatFieldVBYarnRcptYNNET	FieldNameYNNETRequired	TDateTimeFieldVBYarnRcptDATERCVD	FieldNameDATERCVDRequired	TStringFieldVBYarnRcptINITIALS	FieldNameINITIALSRequired	SizeTStringFieldVBYarnRcptYNQLTY	FieldNameYNQLTYSizeTStringFieldVBYarnRcptRETURNED	FieldNameRETURNEDSize
TIntegerFieldVBYarnRcptSTOCKAREA	FieldName	STOCKAREA
TIntegerFieldVBYarnRcptBATREF	FieldNameBATREFTDateTimeFieldVBYarnRcptDATEENT	FieldNameDATEENTTStringFieldVBYarnRcptUSERENT	FieldNameUSERENTSizeTDateTimeFieldVBYarnRcptDATEMOD	FieldNameDATEMODTStringFieldVBYarnRcptUSERMOD	FieldNameUSERMODSizeTStringFieldVBYarnRcptISSUEDTO	FieldNameISSUEDTORequired	SizeTDateTimeFieldVBYarnRcptISSUEDDATE	FieldName
ISSUEDDATERequired	TStringFieldVBYarnRcptISSUEDBY	FieldNameISSUEDBYSizeTTableVBYarnIssuedDatabaseNameVBStock	TableNameVBYARNISSUEDLeft�TopP
TIntegerFieldVBYarnIssuedBOXNO	FieldNameBOXNORequired	TStringFieldVBYarnIssuedISSUEDTO	FieldNameISSUEDTORequired	SizeTDateTimeFieldVBYarnIssuedISSUEDDATE	FieldName
ISSUEDDATERequired	TStringFieldVBYarnIssuedISSUEDBY	FieldNameISSUEDBYRequired	SizeTFloatFieldVBYarnIssuedISSUEDQTY	FieldName	ISSUEDQTYRequired	
TIntegerFieldVBYarnIssuedBATREF	FieldNameBATREFRequired	TTableDelHeadDatabaseNameVBStock	TableNameDELHEADLeftÐTopP
TIntegerFieldDelHeadDELNO	FieldNameDELNORequired	TDateTimeFieldDelHeadEXPDELDATE	FieldName
EXPDELDATERequired	TStringField
DelHeadSUPREF	FieldNameSUPREFRequired	SizeTStringFieldDelHeadDELNOTENO	FieldName	DELNOTENOSizeTStringFieldDelHeadAGENT	FieldNameAGENTSizeTStringFieldDelHeadSUPORDNO	FieldNameSUPORDNOSizeTStringFieldDelHeadCONTREF	FieldNameCONTREFSizeTDateTimeFieldDelHeadDELNOTEDATE	FieldNameDELNOTEDATERequired	TSmallintFieldDelHeadPALLETSRCVD	FieldNamePALLETSRCVDRequired	TSmallintFieldDelHeadCARTONSRCVD	FieldNameCARTONSRCVDRequired	TFloatFieldDelHeadQTYRCVD	FieldNameQTYRCVDRequired	TDateTimeFieldDelHeadDELDATE	FieldNameDELDATERequired	TStringField
DelHeadRCVDBY	FieldNameRCVDBYRequired	SizeTStringFieldDelHeadNARRATIVE	FieldName	NARRATIVESize<TStringFieldDelHeadPRODREF	FieldNamePRODREFRequired	Size
TIntegerFieldDelHeadVTORDNO	FieldNameVTORDNORequired	TDateTimeFieldDelHeadDATEENT	FieldNameDATEENTTStringFieldDelHeadUSERENT	FieldNameUSERENTSizeTDateTimeFieldDelHeadDATEMOD	FieldNameDATEMODTStringFieldDelHeadUSERMOD	FieldNameUSERMODSizeTTableCtrlAcctDatabaseNameVBStock	TableNameCTRLACCTLeftðTopPTStringFieldCtrlAcctACCNAME	FieldNameACCNAMERequired	SizeTStringFieldCtrlAcctDESCRIPTION	FieldNameDESCRIPTIONSize<TStringFieldCtrlAcctEXTACCNAME	FieldName
EXTACCNAMESize	TFloatFieldCtrlAcctQTY	FieldNameQTYTTableProductDatabaseNameVBStock	TableNamePRODUCTLeftTopPTStringFieldProductPRODREF	FieldNamePRODREFRequired	SizeTStringFieldProductCATEGORY	FieldNameCATEGORYSizeTStringFieldProductDESCR	FieldNameDESCRSize
TIntegerFieldProductREORDER	FieldNameREORDER
TIntegerFieldProductWARNING	FieldNameWARNING
TIntegerFieldProductMERGELEVEL	FieldName
MERGELEVELTSmallintFieldProductUNITWEIGHT	FieldName
UNITWEIGHTTStringFieldProductMEASUNIT	FieldNameMEASUNITSizeTStringFieldProductRCVUNIT	FieldNameRCVUNITSizeTStringFieldProductFIXEDWEIGHT	FieldNameFIXEDWEIGHTSizeTFloatFieldProductONORDER	FieldNameONORDERTFloatFieldProductINSTOCK	FieldNameINSTOCKTStringFieldProductLABELDESCR	FieldName
LABELDESCRSize
TStringFieldProductBSCATEGORY	FieldName
BSCATEGORYRequired	SizeTStringFieldProductPURCHCATEGORY	FieldName
PURCHCATEGORYSizeTStringFieldProductCTRLACCT	FieldNameCTRLACCTRequired	SizeTStringFieldProductEXTPRODREF	FieldName
EXTPRODREFSizeTTableTxnDetDatabaseNameVBStock	TableNameTXNDETLeft0TopP
TIntegerField	TxnDetREF	FieldNameREFRequired	
TIntegerFieldTxnDetTXNNO	FieldNameTXNNOTStringField
TxnDetTXNCODE	FieldNameTXNCODESizeTStringFieldTxnDetPRODTYPE	FieldNamePRODTYPESizeTStringFieldTxnDetEXTPRODREF	FieldName
EXTPRODREFSizeTStringField
TxnDetQLTY	FieldNameQLTYSizeTFloatField	TxnDetQTY	FieldNameQTYTDateTimeField
TxnDetTXNDATE	FieldNameTXNDATE
TIntegerFieldTxnDetORIGTXNCODE	FieldNameORIGTXNCODETDateTimeField
TxnDetDATEENT	FieldNameDATEENTTStringField
TxnDetUSERENT	FieldNameUSERENTSizeTStoredProcSPGenTxnDetRefDatabaseNameVBStockStoredProcNameSPGENTXNDETREFLeftˆTopx	ParamDataDataType	ftIntegerNameCODE	ParamTypeptOutputTStoredProcSPGenTxnDetTxnRefDatabaseNameVBStockStoredProcNameSPGENTXNDETTXNREFLeft¨TopxTTableIssueDetDatabaseNameVBStock	TableNameISSUEDETLeftPTopP
TIntegerFieldIssueDetISSUENO	FieldNameISSUENORequired	
TIntegerField
IssueDetDELNO	FieldNameDELNORequired	TSmallintFieldIssueDetPALLETNO	FieldNamePALLETNORequired	TSmallintField
IssueDetBCBNO	FieldNameBCBNORequired	TDateTimeFieldIssueDetDATEISSUED	FieldName
DATEISSUEDRequired	TStringFieldIssueDetINITIALS	FieldNameINITIALSRequired	SizeTFloatFieldIssueDetQTYISSUED	FieldName	QTYISSUEDRequired	TStringFieldIssueDetISSUETO	FieldNameISSUETORequired	SizeTFloatFieldIssueDetBCBISSUED	FieldName	BCBISSUEDTStringFieldIssueDetPRODREF	FieldNamePRODREFSize
TIntegerFieldIssueDetBATREF	FieldNameBATREFTDateTimeFieldIssueDetDATEENT	FieldNameDATEENTTStringFieldIssueDetUSERENT	FieldNameUSERENTSizeTTableWIPRcptDatabaseNameVBStock	TableNameWIPRCPTLeftpTopP
TIntegerFieldWIPRcptREFNO	FieldNameREFNORequired	TStringFieldWIPRcptPRODREF	FieldNamePRODREFRequired	SizeTDateTimeFieldWIPRcptRCPTDATE	FieldNameRCPTDATERequired	TStringFieldWIPRcptRCPTINITIALS	FieldNameRCPTINITIALSRequired	SizeTFloatFieldWIPRcptNETWEIGHT	FieldName	NETWEIGHTRequired	TSmallintField
WIPRcptLOTNO1	FieldNameLOTNO1TSmallintField
WIPRcptLOTNO2	FieldNameLOTNO2TStringFieldWIPRcptSHIFT	FieldNameSHIFTRequired	SizeTDateTimeFieldWIPRcptDATEMANU	FieldNameDATEMANURequired	TDateTimeFieldWIPRcptDATEISSUED	FieldName
DATEISSUEDTStringFieldWIPRcptISSUEINITIALS	FieldName
ISSUEINITIALSSizeTStringFieldWIPRcptISSUETO	FieldNameISSUETOSizeTFloatFieldWIPRcptVALUERATING	FieldNameVALUERATINGRequired	TDateTimeFieldWIPRcptVALUERATINGDATE	FieldNameVALUERATINGDATERequired	
TIntegerFieldWIPRcptSTOCKAREA	FieldName	STOCKAREA
TIntegerField
WIPRcptBATREF	FieldNameBATREFTDateTimeFieldWIPRcptDATEENT	FieldNameDATEENTTStringFieldWIPRcptUSERENT	FieldNameUSERENTSizeTDateTimeFieldWIPRcptDATEMOD	FieldNameDATEMODTStringFieldWIPRcptUSERMOD	FieldNameUSERMODSize
TIntegerFieldWIPRcptFACTORYNO	FieldName	FACTORYNOTQueryVBYarnRcptQueryDatabaseNameVBStockSQL.Strings:select yr.ynstru,yr.yntwist,yr.yncol,yr.datercvd,yr.boxno,A  yr.dateent,yr.userent,yr.returned,yr.ynqlty,yr.ynnet,yt.yntype,1  yr.issuedto,yr.issuedby,yr.issueddate,yr.batreffrom vbyarnrcpt yr,yarntype ytwhere yr.ynstru=yt.ynstruand yr.yntwist=yt.yntwistand yr.yncol=yt.yncolorder by yr.boxnoLeftàTopèTStringFieldVBYarnRcptQueryYNSTRU	FieldNameYNSTRUSizeTStringFieldVBYarnRcptQueryYNTWIST	FieldNameYNTWISTSizeTStringFieldVBYarnRcptQueryYNCOL	FieldNameYNCOLSizeTDateTimeFieldVBYarnRcptQueryDATERCVD	FieldNameDATERCVD
TIntegerFieldVBYarnRcptQueryBOXNO	FieldNameBOXNOTDateTimeFieldVBYarnRcptQueryDATEENT	FieldNameDATEENTTStringFieldVBYarnRcptQueryUSERENT	FieldNameUSERENTSizeTStringFieldVBYarnRcptQueryRETURNED	FieldNameRETURNEDSizeTStringFieldVBYarnRcptQueryYNQLTY	FieldNameYNQLTYSizeTFloatFieldVBYarnRcptQueryYNNET	FieldNameYNNETTStringFieldVBYarnRcptQueryYNTYPE	FieldNameYNTYPESize	TStringFieldVBYarnRcptQueryISSUEDTO	FieldNameISSUEDTOSizeTDateTimeFieldVBYarnRcptQueryISSUEDDATE	FieldName
ISSUEDDATE
TIntegerFieldVBYarnRcptQueryBATREF	FieldNameBATREFTStringFieldVBYarnRcptQueryISSUEDBY	FieldNameISSUEDBYSizeTTableVBMakeDatabaseNameVBStock	TableNameVBMAKELeftTopøTStringFieldVBMakeVBSTRUDisplayWidth	FieldNameVBSTRURequired	SizeTStringFieldVBMakeVBCOL	FieldNameVBCOLRequired	Size
TIntegerFieldVBMakeMIN127	FieldNameMIN127
TIntegerFieldVBMakeMIN89	FieldNameMIN89
TIntegerField
VBMakeMIN2070	FieldNameMIN2070TFloatFieldVBMakeSALE89	FieldNameSALE89TFloatField
VBMakeSALE127	FieldNameSALE127TFloatFieldVBMakeSALE2070	FieldNameSALE2070TTable
VBStockMinDatabaseNameVBStock	TableName
VBSTOCKMINLeft(TopøTStringFieldVBStockMinVBSTRUDisplayWidth	FieldNameVBSTRURequired	SizeTStringFieldVBStockMinVBCOL	FieldNameVBCOLRequired	SizeTSmallintFieldVBStockMinVBWIDTH	FieldNameVBWIDTHRequired	
TIntegerFieldVBStockMinSTKMIN	FieldNameSTKMINRequired	TQueryMyQueryDatabaseNameVBStockLeftHTopøTTable	VBDespHdrDatabaseNameVBStockFilterDespSent='Y'Filtered		TableName	VBDESPHDRLeftpTopø
TIntegerFieldVBDespHdrDESPNO	FieldNameDESPNORequired	TDateTimeFieldVBDespHdrDESPDATE	FieldNameDESPDATETStringFieldVBDespHdrDESPSENT	FieldNameDESPSENTSizeTQueryMyQuery1DatabaseNameVBStockLeftÐTopTTableVBDailyBalanceDatabaseNameVBStock	TableNameVBDAILYBALANCELeft°TopTStringFieldVBDailyBalanceVBSTRUDisplayWidth	FieldNameVBSTRURequired	SizeTStringFieldVBDailyBalanceVBCOL	FieldNameVBCOLRequired	Size
TIntegerFieldVBDailyBalanceVBWIDTH	FieldNameVBWIDTHRequired	TDateTimeFieldVBDailyBalanceBALANCEDATE	FieldNameBALANCEDATERequired	
TIntegerFieldVBDailyBalanceAVESALES	FieldNameAVESALES
TIntegerFieldVBDailyBalanceNETLENGTH	FieldName	NETLENGTHTStringFieldVBDailyBalanceVBFIN	FieldNameVBFINRequired	SizeTQueryVBDailyAnalyseQueryDatabaseNameVBStockSQL.Strings!select vbstru,vbcol,vbfin,vbwidthfrom vbdailyanalyse#order by vbstru,vbcol,vbfin,vbwidthLeft¨TopøTStringFieldVBDailyAnalyseQueryVBSTRUDisplayWidth	FieldNameVBSTRUSizeTStringFieldVBDailyAnalyseQueryVBCOL	FieldNameVBCOLSizeTStringFieldVBDailyAnalyseQueryVBFIN	FieldNameVBFINSize
TIntegerFieldVBDailyAnalyseQueryVBWIDTH	FieldNameVBWIDTHTApdComPortDMXComPort2	ComNumberBaud€%InSize(
BufferFull(BufferResume	TraceNameAPD.TRCLogNameAPD.LOGUseEventWordLeft\Top 