ˇ
TBARCODEFORM0A1TPF0TBarCodeFormBarCodeFormLeft˙Top_Width≥Height|CaptionBarCodeFormFont.CharsetDEFAULT_CHARSET
Font.ColorclWindowTextFont.HeightÛ	Font.NameSystem
Font.StylePositionpoScreenCenterOnCreate
FormCreate
PixelsPerInch`
TextHeightTLabelLabel1Left$TopHWidth,HeightCaptionLabel1TLabelLabel2LeftTop8Width‚HeightCaption!ProgressBar: 1 to 400; 4 bars=10%TButton
PrintLabelBtnLeft$TopWidthëHeight!CaptionDon't Print LabelsTabOrderOnClickPrintLabelBtnClickTButtonFixDespatchLeft(Top$WidthâHeight!CaptionFix YnTypeTotalsTabOrderVisibleOnClickFixDespatchClickTButtonButton1Left$Top\Width}Height!CaptionPrint VB LabelTabOrderVisibleOnClickButton1ClickTBitBtnBitBtn1LeftLTopWidthMHeight!Caption&CloseModalResultTabOrderOnClickBitBtn1Click
Glyph.Data
‚ﬁBMﬁv($hÄÄÄÄÄÄÄÄÄ¿¿¿ÄÄÄˇˇˇˇˇˇˇˇˇˇˇˇ8ààààw˜˜á¯ààààÉ33?DD@àˇÙDDàààààÛ3ˇè33MPˇÙ33ààààà38àè33E’ˇÙ3333èàè38Û?33M]ˇÙ3333àxè38Û?33E’Ô‰3333èáè38Û?33M]ˇÙ3333àxè38Û?33E’Ô‰3333èáè38Û?33M]ˇÙ3333àxè38Û?33E’Ô‰3333èáè38Û?33M]˛Ù3333àxè38Û?33E’Ô‰3333èáè38Û?33M]˛Ù3333àxè38Û?33DDDDD3333èèèˇ¯Û?33333333333ààààà3?333333333?ˇˇÛ3?333
™†333333àààÛ3?333333333èˇ¯Û3?	NumGlyphsTButtonEmployeeLeft(TopÄWidth°Height!CaptionPrint Employee LabelTabOrderOnClick
EmployeeClickTButtonFixIssueDetLeft(Top†WidthôHeightCaptionFix IssueDet ProdRefEnabledTabOrderOnClickFixIssueDetClickTProgressBarProgressBar1LeftTopHWidthêHeightMinMaxdPositionStepTabOrderTButton
DelHeadTxnDetLeftTopWidthëHeightCaptionCreate DelHead TxnsEnabledTabOrderOnClickDelHeadTxnDetClickTButtonIssueDetTxnsLeftTop WidthëHeightCaptionCreate IssueDet TxnsEnabledTabOrderOnClickIssueDetTxnsClickTButtonCreateWIPRcptTxnsLeftTop8WidthëHeightCaptionCreate WIPRcpt TxnsEnabledTabOrder	OnClickCreateWIPRcptTxnsClickTButtonCreateWIPIssueTxnsLeftTopPWidthëHeightCaptionCreate WIPIssue TxnsEnabledTabOrder
OnClickCreateWIPIssueTxnsClickTButtonCreateYarnRcptTxnsLeftTophWidthëHeightCaptionCreate YarnRcpt TxnsEnabledTabOrderOnClickCreateYarnRcptTxnsClickTButtonCreateYarnDespTxnsLeftTopÄWidthëHeightCaptionCreate YarnDesp TxnsEnabledTabOrderOnClickCreateYarnDespTxnsClickTButton
RemoveWIPsBtnLeftxTop‡Width£HeightCaptionRemove WIPsEnabledTabOrder
OnClickRemoveWIPsBtnClickTButton
YnLotNoBtnBtnLeft(Top¿WidthëHeightCaptionUpdate YarnLotNoEnabledTabOrderOnClickYnLotNoBtnBtnClickTApdComPortApdComPort2	ComNumberBaudÄ%
BufferFullBufferResumeô	TraceNameAPD.TRCLogNameAPD.LOGUseEventWordTTableYarnRcptDatabaseNameStock	Exclusive		TableNameYARNRCPTLeft‰Top(
TIntegerField
YarnRcptBOXNO	FieldNameBOXNORequired	TStringFieldYarnRcptYNSTRU	FieldNameYNSTRURequired	SizeTStringFieldYarnRcptYNTWIST	FieldNameYNTWISTRequired	SizeTStringField
YarnRcptYNCOL	FieldNameYNCOLRequired	SizeTFloatField
YarnRcptYNNET	FieldNameYNNETRequired	
TIntegerFieldYarnRcptDESPNO	FieldNameDESPNOTStringFieldYarnRcptYNQLTY	FieldNameYNQLTYSizeTDateTimeFieldYarnRcptDATEMANU	FieldNameDATEMANUTStringFieldYarnRcptRETURNED	FieldNameRETURNEDSizeTDateTimeFieldYarnRcptDATEENT	FieldNameDATEENTTStringFieldYarnRcptUSERENT	FieldNameUSERENTSizeTDateTimeFieldYarnRcptDATEMOD	FieldNameDATEMODTStringFieldYarnRcptUSERMOD	FieldNameUSERMODSizeTTableYarnTypeDatabaseNameStock	Exclusive		TableNameYARNTYPELeft‰TopDTStringFieldYarnTypeYNSTRU	FieldNameYNSTRURequired	SizeTStringField
YarnTypeYNCOL	FieldNameYNCOLRequired	SizeTFloatFieldYarnTypeINSTOCK	FieldNameINSTOCKTTableIssueDetDatabaseNameStock	TableNameISSUEDETLeft‡Top`
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	FieldNameBATREFTTableWIPRcptDatabaseNameStock	TableNameWIPRCPTLeft‡Topx
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	FACTORYNOTTableDelHeadDatabaseNameStock	TableNameDELHEADLeft‡Topê
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	FieldNameUSERMODSizeTStoredProcSPGenTxnDetRefDatabaseNameStockStoredProcNameSPGENTXNDETREFParams.Data
CODELeft`Top(TStoredProcSPGenTxnDetTxnRefDatabaseNameStockStoredProcNameSPGENTXNDETTXNREFParams.Data
CODELeftÄTop(TTableProductDatabaseNameStock	TableNamePRODUCTLeft`TopHTStringFieldProductPRODREF	FieldNamePRODREFRequired	SizeTStringFieldProductEXTPRODREF	FieldName
EXTPRODREFSizeTTableTxnDetDatabaseNameStock	TableNameTXNDETLeftÄTopH
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	FieldNameUSERENTSizeTTableCtrlAcctDatabaseNameStock	TableNameCTRLACCTLeft`TophTStringFieldCtrlAcctACCNAME	FieldNameACCNAMERequired	SizeTStringFieldCtrlAcctEXTACCNAME	FieldName
EXTACCNAMESize	TFloatFieldCtrlAcctQTY	FieldNameQTYTTableDeptDatabaseNameStock	TableNameDEPTLeftÄTophTStringFieldDeptDEPTREF	FieldNameDEPTREFRequired	SizeTStringFieldDeptCTRLACCT	FieldNameCTRLACCTSizeTStringFieldDeptISSUEYARNTO	FieldNameISSUEYARNTOSizeTQueryMyQueryDatabaseNameStockLeft`TopêTQuery
YarnRcptQueryDatabaseNameStockSQL.Strings:select yr.ynstru,yr.yntwist,yr.yncol,yr.datemanu,yr.boxno,@  yr.dateent,yr.userent,yr.returned,yr.ynqlty,yr.ynnet,yt.yntypefrom yarnrcpt yr,yarntype ytwhere yr.ynstru=yt.ynstruand yr.yntwist=yt.yntwistand yr.yncol=yt.yncoland yr.ynqlty='W'order by yr.boxnoLeft`Top∏TStringFieldYarnRcptQueryYNSTRU	FieldNameYNSTRUSizeTStringFieldYarnRcptQueryYNTWIST	FieldNameYNTWISTSizeTStringFieldYarnRcptQueryYNCOL	FieldNameYNCOLSizeTDateTimeFieldYarnRcptQueryDATEMANU	FieldNameDATEMANU
TIntegerFieldYarnRcptQueryBOXNO	FieldNameBOXNOTDateTimeFieldYarnRcptQueryDATEENT	FieldNameDATEENTTStringFieldYarnRcptQueryUSERENT	FieldNameUSERENTSizeTStringFieldYarnRcptQueryYNTYPE	FieldNameYNTYPESize	TStringFieldYarnRcptQueryRETURNED	FieldNameRETURNEDSizeTStringFieldYarnRcptQueryYNQLTY	FieldNameYNQLTYSizeTFloatFieldYarnRcptQueryYNNET	FieldNameYNNETTQueryYarnWBSQueryDatabaseNameStockSQL.Strings*select yw.rmperkg,ca.extaccname,ca.accnamefrom ynstruwbsrm yw,ctrlacct cawhere yw.ctrlacct=ca.accnameand yw.ynstru=:ynstruand yw.yntwist=:yntwistParams.Data
#ynstru0yntwist0LeftxTop∏TFloatFieldYarnWBSQueryRMPERKG	FieldNameRMPERKGTStringFieldYarnWBSQueryEXTACCNAME	FieldName
EXTACCNAMESize	TStringFieldYarnWBSQueryACCNAME	FieldNameACCNAMESizeTQueryYnDespHdrQueryDatabaseNameStockSQL.Strings'select yh.despno,yh.despdate,su.vt1wip,  yh.dateent,yh.userentfrom yndesphdr yh,supplier suwhere yh.custref=su.suprefand yh.despsent='Y'and yh.despno<>753order by yh.despnoLeft`Top‡
TIntegerFieldYnDespHdrQueryDESPNO	FieldNameDESPNOTDateTimeFieldYnDespHdrQueryDESPDATE	FieldNameDESPDATETStringFieldYnDespHdrQueryVT1WIP	FieldNameVT1WIPSizeTDateTimeFieldYnDespHdrQueryDATEENT	FieldNameDATEENTTStringFieldYnDespHdrQueryUSERENT	FieldNameUSERENTSizeTQueryYarnRcptTypeQueryDatabaseNameStockSQL.Strings8select yarntype.yntype,yarnrcpt.ynstru,yarnrcpt.yntwist,.  yarnrcpt.ynqlty,sum(yarnrcpt.ynnet) sumynnetfrom yarnrcpt,yarntypewhere yarnrcpt.despno=:despno#and yarnrcpt.ynstru=yarntype.ynstru%and yarnrcpt.yntwist=yarntype.yntwist!and yarnrcpt.yncol=yarntype.yncol:group by yarntype.yntype,yarnrcpt.ynstru,yarnrcpt.yntwist,  yarnrcpt.ynqltyorder by yarntype.yntypeParams.Data
despnoLeftxTop‡TStringFieldYarnRcptTypeQueryYNTYPE	FieldNameYNTYPESize	TStringFieldYarnRcptTypeQueryYNSTRU	FieldNameYNSTRUSizeTStringFieldYarnRcptTypeQueryYNTWIST	FieldNameYNTWISTSizeTStringFieldYarnRcptTypeQueryYNQLTY	FieldNameYNQLTYSizeTFloatFieldYarnRcptTypeQuerySUMYNNET	FieldNameSUMYNNETTQueryWIPQueryDatabaseNameStockSQL.Stringsselect txndet.reffrom wiprcpt,txndetwhere shift='W'"and (txncode='WI' or txncode='WR')and refno=origtxncodeorder by refnoLeft@Top∏TTable	YarnLotNoDatabaseNameStock	TableName	YARNLOTNOLeftËTop∏
TIntegerFieldYarnLotNoLOTNO1	FieldNameLOTNO1Required	TSmallintFieldYarnLotNoLOTNO2	FieldNameLOTNO2Required	TStringFieldYarnLotNoYNCOL	FieldNameYNCOLRequired	SizeTDateTimeFieldYarnLotNoDATEMANU	FieldNameDATEMANURequired	TDateTimeFieldYarnLotNoDATERCVD	FieldNameDATERCVDRequired	TStringFieldYarnLotNoRCVDBY	FieldNameRCVDBYRequired	SizeTStringFieldYarnLotNoYNSTRU	FieldNameYNSTRURequired	SizeTStringFieldYarnLotNoYNTWIST	FieldNameYNTWISTRequired	Size