ˇ
TFRMRESLIT08TPF0
TfrmReslit	frmReslitLeftïTopiWidthàHeight√CaptionReslit InformationColor	clBtnFaceFont.CharsetDEFAULT_CHARSET
Font.ColorclWindowTextFont.Heightı	Font.Name
MS Sans Serif
Font.StyleOldCreateOrder	PositionpoScreenCenterOnClose	FormCloseOnShowFormShow
PixelsPerInch`
TextHeight
TLabelLabel1LeftTopWidth?Height
CaptionFW AvailableTLabelLabel2LeftTopêWidthfHeight
CaptionJreSlit already (Converted to FW so that you can compare with FW Available)TLabelLabel3LeftTop0WidthtHeight
CaptionFW Already DespatchedTDBGridDBGrid1LeftTopWidthqHeighty
DataSource
datFWAvailTabOrderTitleFont.CharsetDEFAULT_CHARSETTitleFont.ColorclWindowTextTitleFont.HeightıTitleFont.Name
MS Sans SerifTitleFont.StyleTDBGridDBGrid2LeftTop†WidthqHeightâ
DataSourcedatSlitTabOrderTitleFont.CharsetDEFAULT_CHARSETTitleFont.ColorclWindowTextTitleFont.HeightıTitleFont.Name
MS Sans SerifTitleFont.StyleTBitBtnbtnCloseLeft(TopãWidthKHeightTabOrderOnClick
btnCloseClickKindbkCloseTDBGridDBGrid3LeftTop@WidthqHeightI
DataSource
datDespatchedTabOrderTitleFont.CharsetDEFAULT_CHARSETTitleFont.ColorclWindowTextTitleFont.HeightıTitleFont.Name
MS Sans SerifTitleFont.StyleTQuery
qryFWAvailDatabaseNameVBStockSQL.Strings=select vr.warpno,vr.greigeno,vr.pieceno,vr.finno,vr.returned,-  vr.vbstru,vr.vbcol,vr.vbfin,vr.metricwidth,$  sum(vr.grosslength / vw.strips) fwfrom vbrcpt vr, vbwidth vwwhere warpno=:warpnoand greigeno=:greigenoand finno=:finnoand vr.metricwidth=2070!and vr.metricwidth=vw.metricwidth?group by vr.warpno,vr.greigeno,vr.finno,vr.pieceno,vr.returned,,  vr.vbstru,vr.vbcol,vr.vbfin,vr.metricwidth=order by vr.warpno,vr.greigeno,vr.finno,vr.pieceno,vr.stripnoLeft8TopP	ParamDataDataType	ftIntegerNamewarpno	ParamType	ptUnknownValueôDataType	ftIntegerNamegreigeno	ParamType	ptUnknownValueDataType	ftIntegerNamefinno	ParamType	ptUnknownValue
TIntegerFieldqryFWAvailWARPNODisplayLabelWarpDisplayWidth	FieldNameWARPNOTSmallintFieldqryFWAvailGREIGENODisplayLabelGreigeDisplayWidth	FieldNameGREIGENO
TIntegerFieldqryFWAvailFINNODisplayLabelFinDisplayWidth	FieldNameFINNOTSmallintFieldqryFWAvailPIECENODisplayLabelPieceDisplayWidth	FieldNamePIECENOTStringFieldqryFWAvailRETURNEDDisplayLabelRet	FieldNameRETURNEDSizeTStringFieldqryFWAvailVBSTRUDisplayLabelStrDisplayWidth	FieldNameVBSTRUSizeTStringFieldqryFWAvailVBCOLDisplayLabelCol	FieldNameVBCOLSizeTStringFieldqryFWAvailVBFINDisplayLabelFin	FieldNameVBFINSizeTSmallintFieldqryFWAvailMETRICWIDTHDisplayLabelWidthDisplayWidth	FieldNameMETRICWIDTHTFloatFieldqryFWAvailFWDisplayLabelFW mDisplayWidth	FieldNameFW
DisplayFormat0.00TDataSource
datFWAvailDataSet
qryFWAvailLeftXTopPTQueryqrySlitDatabaseNameVBStockSQL.Strings=select vr.warpno,vr.greigeno,vr.pieceno,vr.finno,vr.returned,-  vr.vbstru,vr.vbcol,vr.vbfin,vr.metricwidth,2  vr.datemanu,  sum(vr.grosslength / vw.strips) fwfrom vbrcpt vr, vbwidth vwwhere warpno=:warpnoand greigeno=:greigenoand finno=:finno!and vr.metricwidth=vw.metricwidthand returned='Y'?group by vr.warpno,vr.greigeno,vr.finno,vr.pieceno,vr.returned,-  vr.vbstru,vr.vbcol,vr.vbfin,vr.metricwidth,
  vr.datemanu=order by vr.warpno,vr.greigeno,vr.finno,vr.pieceno,vr.stripnoLeftàTopP	ParamDataDataType	ftIntegerNamewarpno	ParamType	ptUnknownValueôDataType	ftIntegerNamegreigeno	ParamType	ptUnknownValueDataType	ftIntegerNamefinno	ParamType	ptUnknownValue
TIntegerField
qrySlitWARPNODisplayLabelWarpDisplayWidth	FieldNameWARPNOTSmallintFieldqrySlitGREIGENODisplayLabelGreigeDisplayWidth	FieldNameGREIGENO
TIntegerFieldqrySlitFINNODisplayLabelFinDisplayWidth	FieldNameFINNOTSmallintFieldqrySlitPIECENODisplayLabelPieceDisplayWidth	FieldNamePIECENOTStringFieldqrySlitRETURNEDDisplayLabelRet	FieldNameRETURNEDSizeTStringField
qrySlitVBSTRUDisplayLabelStruDisplayWidth	FieldNameVBSTRUSizeTStringFieldqrySlitVBCOLDisplayLabelCol	FieldNameVBCOLSizeTStringFieldqrySlitVBFINDisplayLabelFin	FieldNameVBFINSizeTSmallintFieldqrySlitMETRICWIDTHDisplayLabelWidthDisplayWidth	FieldNameMETRICWIDTHTDateTimeFieldqrySlitDATEMANUDisplayLabelManu	FieldNameDATEMANU
DisplayFormat
dd/mm/yyyyTFloatField	qrySlitFWDisplayLabelFW mDisplayWidth	FieldNameFW
DisplayFormat0.00TDataSourcedatSlitDataSetqrySlitLeft®TopPTQuery
qryDespatchedDatabaseNameVBStockSQL.Stringsselect vr.despno,vr.despdate,8  vr.warpno,vr.greigeno,vr.pieceno,vr.finno,vr.returned,-  vr.vbstru,vr.vbcol,vr.vbfin,vr.metricwidth,$  sum(vr.grosslength / vw.strips) fwfrom vbrcpt vr, vbwidth vwwhere warpno=:warpnoand greigeno=:greigenoand finno=:finnoand vr.metricwidth=2070!and vr.metricwidth=vw.metricwidthand vr.despno<>0group by vr.despno,vr.despdate,8  vr.warpno,vr.greigeno,vr.finno,vr.pieceno,vr.returned,,  vr.vbstru,vr.vbcol,vr.vbfin,vr.metricwidthorder by vr.despno,vr.despdate,6  vr.warpno,vr.greigeno,vr.finno,vr.pieceno,vr.stripnoLeftTopP	ParamDataDataType	ftIntegerNamewarpno	ParamType	ptUnknownValueôDataType	ftIntegerNamegreigeno	ParamType	ptUnknownValueDataType	ftIntegerNamefinno	ParamType	ptUnknownValue
TIntegerFieldqryDespatchedWARPNODisplayLabelWarpDisplayWidth	FieldNameWARPNOTSmallintFieldqryDespatchedGREIGENODisplayLabelGregieDisplayWidth	FieldNameGREIGENO
TIntegerFieldqryDespatchedFINNODisplayLabelFinDisplayWidth	FieldNameFINNOTSmallintFieldqryDespatchedPIECENODisplayLabelPieceDisplayWidth	FieldNamePIECENOTStringFieldqryDespatchedRETURNEDDisplayLabelRet	FieldNameRETURNEDSizeTStringFieldqryDespatchedVBSTRUDisplayLabelStruDisplayWidth	FieldNameVBSTRUSizeTStringFieldqryDespatchedVBCOLDisplayLabelCol	FieldNameVBCOLSizeTStringFieldqryDespatchedVBFINDisplayLabelFin	FieldNameVBFINSizeTSmallintFieldqryDespatchedMETRICWIDTHDisplayLabelWidthDisplayWidth	FieldNameMETRICWIDTHTFloatFieldqryDespatchedFWDisplayLabelFW mDisplayWidth	FieldNameFW
DisplayFormat0.00
TIntegerFieldqryDespatchedDESPNODisplayLabelDesp No	FieldNameDESPNOTDateTimeFieldqryDespatchedDESPDATEDisplayLabel
Despatched	FieldNameDESPDATETDataSource
datDespatchedDataSet
qryDespatchedLeftTopP