ÿ
TGREIGERCPTFORM0Ê:TPF0TGreigeRcptFormGreigeRcptFormLeftTop@WidthvHeight�
ActiveControlPanel1Caption*Woven Fabric (Greige) & Finish MaintenanceFont.CharsetDEFAULT_CHARSET
Font.ColorclBlackFont.Heightõ	Font.Name
MS Sans Serif
Font.StylePositionpoScreenCenterShowHint	OnClose	FormCloseOnShowFormShow
PixelsPerInch`
TextHeight
TPanelPanel1LeftTopWidthnHeight)AlignalTopTabOrderTLabel
ModeIndicatorLeftĞTopWidth Height
Caption[mode]TDBNavigatorDBNavigatorLeftTopWidth¨Height
DataSourceActiveSourceVisibleButtonsnbFirstnbPriornbNextnbLastnbEditnbPostnbCancel	nbRefreshCtl3DParentCtl3DTabOrderBeforeActionDBNavigatorBeforeActionTBitBtnCloseBitBtnLeftPTopWidthAHeightCaption&CloseModalResultTabOrderOnClickCloseBitBtnClick
Glyph.Data
ÒÎBMÎ6($˜ş¿¿¿¿¿¿ÿÿÿ¿¿¿ÿÿÿ¿¿¿¿¿¿ÿÿÿÿÿÿşÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿşÿÿ¿¿¿ÿÿÿÿÿÿÿÿÿÿÿÿşÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿşÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ¿¿¿ÿÿÿÿÿÿÿÿÿşÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ¿¿¿ÿÿÿÿÿÿÿÿÿşÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ¿¿¿ÿÿÿÿÿÿÿÿÿşÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ¿¿¿ÿÿÿÿÿÿÿÿÿşÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ¿¿¿ÿÿÿÿÿÿÿÿÿşÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ¿¿¿ÿÿÿÿÿÿÿÿÿşÿÿÿÿÿÿÿÿÿÿÿÿÿÿ¿¿¿ÿÿÿÿÿÿÿÿÿşÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ¿¿¿ÿÿÿÿÿÿÿÿÿşÿÿÿÿÿÿÿÿÿÿÿÿÿÿ¿¿¿ÿÿÿÿÿÿÿÿÿşÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿşÿÿÿşÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿşÿÿÿÿÿÿÿÿÿÿşÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ	NumGlyphsTPanelPanel2LeftTop)WidthnHeightJAlignalClient
BevelInner	bvLoweredBorderWidthCaptionPanel2TabOrder
TScrollBox	ScrollBoxLeftTopWidthbHeight>HorzScrollBar.MarginHorzScrollBar.Range'VertScrollBar.MarginVertScrollBar.Range2AlignalClient
AutoScrollBorderStylebsNoneTabOrderTLabelLabel1Left*TopWidthHeight
CaptionNoFocusControl
EditWARPNOTLabelLabel2Left2TopWidth!Height
CaptionLengthFocusControlEditWARPLENGTHTLabelLabel4Left^TopWidthHeight
CaptionTypeFocusControlEditWARPTYPETLabelLabel5LeftzTopWidthHeight
CaptionColourFocusControlEditWARPCOLTLabelLabel6Left®TopWidth/Height
Caption
Lot No (1)FocusControl
EditWARPLOTNOTLabelLabel7LeftâTopWidth/Height
Caption
Lot No (2)FocusControlEditWARPLOTNO2TLabelLabel8LeftTopWidthHeight
CaptionSMFocusControlEditWARPSINGLEMULTIPLETLabelLabel3LeftTopWidthHeight
CaptionWarpTSpeedButtonWarpSearchSpdBtnLeftTopWidthHeightHintWarp Search
Glyph.Data
FBBMBv(Ì¿¿¿¿¿¿¿¿¿ÀÀÀ€€€ÿÿÿÿÿÿÿÿÿÿÿÿ333?¿ÿÿÿğ3333û¿ÿûğ333?¿ÿûÿş333?¿ÿûûö3333û¿ÿÿ÷3334Dûÿûö333DƒO¿ÿñ334„„¿ÿö334HO„û¿°334�tH?óö33Dÿ÷C3303D�„D33304H÷C333304�w3333304÷t33333?4DC333330333333337OnClickWarpSearchSpdBtnClickTSpeedButtonVBTypeSearchSpdBtnLeft\TopìWidthMHeightCaptionVB TypesEnabled
Glyph.Data
FBBMBv(Ì¿¿¿¿¿¿¿¿¿ÀÀÀ€€€ÿÿÿÿÿÿÿÿÿÿÿÿ333?¿ÿÿÿğ3333û¿ÿûğ333?¿ÿûÿş333?¿ÿûûö3333û¿ÿÿ÷3334Dûÿûö333DƒO¿ÿñ334„„¿ÿö334HO„û¿°334�tH?óö33Dÿ÷C3303D�„D33304H÷C333304�w3333304÷t33333?4DC333330333333337OnClickVBTypeSearchSpdBtnClickTSpeedButtonWeftSearchSpdBtnLeft¬TopìWidthYHeightCaptionWeft Lot NoEnabled
Glyph.Data
FBBMBv(Ì¿¿¿¿¿¿¿¿¿ÀÀÀ€€€ÿÿÿÿÿÿÿÿÿÿÿÿ333?¿ÿÿÿğ3333û¿ÿûğ333?¿ÿûÿş333?¿ÿûûö3333û¿ÿÿ÷3334Dûÿûö333DƒO¿ÿñ334„„¿ÿö334HO„û¿°334�tH?óö33Dÿ÷C3303D�„D33304H÷C333304�w3333304÷t33333?4DC333330333333337OnClickWeftSearchSpdBtnClickTSpeedButton
LoomRefSpdBtnLeftTopìWidthUHeightCaptionLoom RefEnabled
Glyph.Data
FBBMBv(Ì¿¿¿¿¿¿¿¿¿ÀÀÀ€€€ÿÿÿÿÿÿÿÿÿÿÿÿ333?¿ÿÿÿğ3333û¿ÿûğ333?¿ÿûÿş333?¿ÿûûö3333û¿ÿÿ÷3334Dûÿûö333DƒO¿ÿñ334„„¿ÿö334HO„û¿°334�tH?óö33Dÿ÷C3303D�„D33304H÷C333304�w3333304÷t33333?4DC333330333333337OnClickLoomRefSpdBtnClickTLabelLabel10Left0Top"WidthIHeight
CaptionWarp CommentTLabelLabel11LefthTopWidthHeight
CaptionTotalsTLabelLabel12LeftˆTopWidth#Height
CaptionWovenTLabelLabel13Left´TopWidth'Height
CaptionFinishedTLabelLabel9LeftæTopWidthHeight
CaptionSlitTLabelLabel14LeftøTopWidth/Height
Caption
Gross (fw)TLabelLabel15Left(TopWidth%Height
CaptionNet (fw)TLabelLabel16LeftTopòWidthwHeight
CaptionWarp Weaving CompleteTLabelLabel17LeftˆTop
WidthQHeight
CaptionSlit Len of GreigeTLabelLabel18LeftàTopøWidthHeight
CaptionGrossTLabelLabel19LeftTopøWidthHeight
CaptionNetTLabelLabel20LeftTopWidthtHeight
CaptionEstimated Greige LengthTDBEdit
EditWARPNOLeft*TopWidth2HeightColorclSilver	DataFieldWARPNO
DataSourceWarpRcptSourceReadOnly	TabOrderTDBEditEditWARPLENGTHLeft2TopWidth2HeightColorclSilver	DataField
WARPLENGTH
DataSourceWarpRcptSourceReadOnly	TabOrderTDBEditEditWARPTYPELeftbTopWidthHeightColorclSilver	DataFieldWARPTYPE
DataSourceWarpRcptSourceReadOnly	TabOrderTDBEditEditWARPCOLLeftzTopWidth2HeightColorclSilver	DataFieldWARPCOL
DataSourceWarpRcptSourceReadOnly	TabOrderTDBEdit
EditWARPLOTNOLeft®TopWidth2HeightColorclSilver	DataField
WARPLOTNO1
DataSourceWarpRcptSourceReadOnly	TabOrderTDBEditEditWARPLOTNO2LeftâTopWidth2HeightColorclSilver	DataField
WARPLOTNO2
DataSourceWarpRcptSourceReadOnly	TabOrderTDBEditEditWARPSINGLEMULTIPLELeftTopWidthHeightColorclSilver	DataFieldWARPSINGLEMULTIPLE
DataSourceWarpRcptSourceReadOnly	TabOrderTDBGrid
GreigeGridLeftTop4WidthaHeightµ
DataSourceGreigeRcptSourceTabOrderTitleFont.CharsetDEFAULT_CHARSETTitleFont.ColorclBlackTitleFont.HeightõTitleFont.Name
MS Sans SerifTitleFont.StyleOnEnterGreigeGridEnterOnExitGreigeGridExitTDBEditEditWarpCommentLeft€Top WidtháHeightTabStopColorclSilver	DataFieldCOMMENT
DataSourceWarpRcptSourceReadOnly	TabOrderTDBEditEditSumGreigeLengthLeftˆTopWidth(HeightTabStopColorclSilver	DataFieldGREIGELENGTH
DataSourceSumGreigeQuerySourceReadOnly	TabOrder	TDBEditEditSumFinLengthLeft´TopWidth(HeightTabStopColorclSilver	DataField	FINLENGTH
DataSourceSumGreigeQuerySourceReadOnly	TabOrder
TDBEditEditFWGrossSLitLeftøTopWidth(HeightTabStopColorclSilver	DataFieldFWGROSSSLIT
DataSourceSumSlitQuerySourceReadOnly	TabOrderTDBEdit
EditFWNetSlitLeft(TopWidth(HeightTabStopColorclSilver	DataField	FWNETSLIT
DataSourceSumSlitQuerySourceReadOnly	TabOrderTDBComboBoxEditWarpCompleteLeft�TopğWidth2HeightStylecsDropDownList	DataFieldCOMPLETE
DataSourceWarpRcptSource
ItemHeight

Items.StringsYNTabOrder
TDBEditEditGreigeSlitLengthGrossLeftàTopWidth2HeightTabStopColorclSilver	DataFieldFWGROSSSLIT
DataSourceGreigeSlitQuerySourceReadOnly	TabOrderTDBEditEditGreigeSlitLengthNetLeftTopWidth2HeightTabStopColorclSilver	DataField	FWNETSLIT
DataSourceGreigeSlitQuerySourceReadOnly	TabOrderTDBEditShowEstGreigeLenLeft€TopWidth2HeightColorclSilver	DataFieldESTGREIGELEN
DataSourceWarpRcptSourceReadOnly	TabOrderTDataSourceWarpRcptSourceDataSetWarpRcptLeft#TopTQueryMaxGreigeQueryDatabaseNameVBStockSQL.Stringsselect max(greigeno)from greigercptwhere warpno=:warpnoParams.Data
warpnoLeftœTop»TSmallintFieldMaxGreigeQueryMAX	FieldNameMAXTDataSourceActiveSourceDataSetWarpRcptLeftTopTDataSourceGreigeRcptSourceDataSet
GreigeRcpt
OnStateChangeGreigeRcptSourceStateChangeLeft¸TopŸTQueryFabricLotNoQueryDatabaseNameVBStockLeft¸Top»TTableWarpRcptDatabaseNameVBStock	TableNameWARPRCPTLeft
Top
TIntegerFieldWarpRcptWARPNO	FieldNameWARPNORequired	
TIntegerFieldWarpRcptWARPLENGTH	FieldName
WARPLENGTHRequired	TSmallintFieldWarpRcptNOOFBREAKS	FieldName
NOOFBREAKSRequired	TStringFieldWarpRcptWARPTYPE	FieldNameWARPTYPERequired	SizeTStringFieldWarpRcptWARPCOL	FieldNameWARPCOLRequired	Size
TIntegerFieldWarpRcptWARPLOTNO1	FieldName
WARPLOTNO1Required	TSmallintFieldWarpRcptWARPLOTNO2	FieldName
WARPLOTNO2Required	TStringFieldWarpRcptWARPSINGLEMULTIPLE	FieldNameWARPSINGLEMULTIPLERequired	SizeTDateTimeFieldWarpRcptDATEMANU	FieldNameDATEMANURequired	TDateTimeFieldWarpRcptDATERCVD	FieldNameDATERCVDRequired	TStringFieldWarpRcptRCVDBY	FieldNameRCVDBYRequired	SizeTStringFieldWarpRcptCOMMENT	FieldNameCOMMENTSize<TStringFieldWarpRcptCOMPLETE	FieldNameCOMPLETEEditMask>L;0;_SizeTFloatFieldWarpRcptESTGREIGELEN	FieldNameESTGREIGELEN
DisplayFormat0TTable
GreigeRcptBeforeInsertGreigeRcptBeforeInsert
BeforeEditGreigeRcptBeforeEdit	AfterPostGreigeRcptAfterPostAfterCancelGreigeRcptAfterCancelBeforeDeleteGreigeRcptBeforeDeleteAfterDeleteGreigeRcptAfterDelete
OnDeleteErrorGreigeRcptDeleteErrorOnNewRecordGreigeRcptNewRecordDatabaseNameVBStockIndexFieldNamesWARPNOMasterFieldsWARPNOMasterSourceWarpRcptSource	TableName
GREIGERCPTLeft�TopŸ
TIntegerFieldGreigeRcptWARPNO	FieldNameWARPNORequired	VisibleTSmallintFieldGreigeRcptGREIGENODisplayLabelGrDisplayWidth	FieldNameGREIGENORequired	TStringFieldGreigeRcptLOOMREFDisplayLabelLoomDisplayWidth	FieldNameLOOMREFRequired	SizeTStringFieldGreigeRcptVBSTRUDisplayLabelStruDisplayWidth	FieldNameVBSTRURequired	SizeTStringFieldGreigeRcptVBCOLDisplayLabelColDisplayWidth	FieldNameVBCOLRequired	Size
TIntegerFieldGreigeRcptWEFTLOTNO1DisplayLabelWt Lot 1DisplayWidth	FieldName
WEFTLOTNO1Required	TSmallintFieldGreigeRcptWEFTLOTNO2DisplayLabel2DisplayWidth	FieldName
WEFTLOTNO2Required	TStringFieldGreigeRcptWEFTSINGLEMULTIPLEDisplayLabelSM	FieldNameWEFTSINGLEMULTIPLERequired	Size
TIntegerFieldGreigeRcptFABRICLOTNODisplayLabelFab LotDisplayWidth	FieldNameFABRICLOTNORequired	TDateTimeFieldGreigeRcptWEAVEDATEDisplayLabelWeave	FieldName	WEAVEDATE
DisplayFormat
dd/mm/yyyy
TIntegerFieldGreigeRcptWEAVELENGTHDisplayLabelLenDisplayWidth	FieldNameWEAVELENGTHTDateTimeFieldGreigeRcptGREIGEDATEDisplayLabelWoven	FieldName
GREIGEDATE
DisplayFormat
dd/mm/yyyy
TIntegerFieldGreigeRcptGREIGELENGTHDisplayLabelLenDisplayWidth	FieldNameGREIGELENGTHTDateTimeFieldGreigeRcptFINDATEDisplayLabelDate Fin	FieldNameFINDATE
DisplayFormat
dd/mm/yyyy
TIntegerFieldGreigeRcptFINLENGTHDisplayLabelLenDisplayWidth	FieldName	FINLENGTH
TIntegerFieldGreigeRcptWARPLOTNO1	FieldName
WARPLOTNO1Required	VisibleTSmallintFieldGreigeRcptWARPLOTNO2	FieldName
WARPLOTNO2Required	VisibleTStringFieldGreigeRcptWARPSINGLEMULTIPLE	FieldNameWARPSINGLEMULTIPLERequired	VisibleSizeTStringFieldGreigeRcptSTATUSDisplayLabelStDisplayWidth	FieldNameSTATUSOnChangeGreigeRcptSTATUSChangeEditMask>L;0;_SizeTStringFieldGreigeRcptCOMMENTDisplayLabelComment	FieldNameCOMMENTSize<TQuerySumGreigeQueryDatabaseNameVBStock
DataSourceWarpRcptSourceSQL.Strings>select sum(greigelength) greigelength,sum(finlength) finlengthfrom greigercptwhere warpno=:warpnoParams.Data
WARPNOLeftÖTop
TIntegerFieldSumGreigeQueryGREIGELENGTH	FieldNameGREIGELENGTH
DisplayFormat0
TIntegerFieldSumGreigeQueryFINLENGTH	FieldName	FINLENGTH
DisplayFormat0TDataSourceSumGreigeQuerySourceDataSetSumGreigeQueryLeftîTopTQuerySumSlitQueryDatabaseNameVBStock
DataSourceWarpRcptSourceSQL.Strings1select sum(vr.grosslength/vw.strips) fwgrossslit,'  sum(vr.netlength/vw.strips) fwnetslitGfrom vbrcpt vr left join vbdesphdr vh on vr.despno=vh.despno,vbwidth vwwhere vr.warpno=:warpno!and vr.metricwidth=vw.metricwidthand vr.returned='N'1and ((vh.custref<>'ADJUST') or (custref is null))Params.Data
warpnoLeftTopTFloatFieldSumSlitQueryFWGROSSSLIT	FieldNameFWGROSSSLIT
DisplayFormat0TFloatFieldSumSlitQueryFWNETSLIT	FieldName	FWNETSLIT
DisplayFormat0TDataSourceSumSlitQuerySourceDataSetSumSlitQueryLeft0TopTQueryGreigeSlitQueryDatabaseNameVBStock
DataSourceGreigeRcptSourceSQL.Strings1select sum(vr.grosslength/vw.strips) fwgrossslit,'  sum(vr.netlength/vw.strips) fwnetslitGfrom vbrcpt vr left join vbdesphdr vh on vr.despno=vh.despno,vbwidth vwwhere vr.warpno=:warpnoand vr.greigeno=:greigeno!and vr.metricwidth=vw.metricwidthand vr.returned='N'1and ((vh.custref<>'ADJUST') or (custref is null))Params.Data
&warpnogreigenoLeftæTopGTFloatFieldGreigeSlitQueryFWGROSSSLIT	FieldNameFWGROSSSLIT
DisplayFormat0TFloatFieldGreigeSlitQueryFWNETSLIT	FieldName	FWNETSLIT
DisplayFormat0TDataSourceGreigeSlitQuerySourceDataSetGreigeSlitQueryLeftşTopG