ÿ
TVBPALLETFORM0K(TPF0
TVBPalletFormVBPalletFormLeftÜTopMWidth.HeightÜ
ActiveControlEditPalletBarCodeCaptionPalletise VBColor	clBtnFaceFont.CharsetDEFAULT_CHARSET
Font.ColorclBlackFont.Heightõ	Font.Name
MS Sans Serif
Font.StyleOldCreateOrder	PositionpoScreenCenterShowHint	OnClose	FormCloseOnShowFormShow
PixelsPerInch`
TextHeight
TSpeedButtonPrintSpdBtnLeft
TopWidthHeightHintPrint this form
Glyph.Data
zvBMvv( €€€€€€€€€¿¿¿ÿÿÿÿÿÿÿÿÿÿÿÿ0?ÿÿÿÿÿÿÿˆˆˆˆˆˆ€wwwwwwwˆˆˆˆˆˆ€wwwwwwwÿÿÿÿÿÿÿÿ������€wwwwwwwøøøøøùğwwwwwww������€wwwwwwwwwwwww30ÿÿÿÿ337óÿÿ?330ğ337÷wss330ÿÿÿÿ337óÿ?ÿ330ğ337÷swws330ÿÿğ3337óÿ73330ğ�3337÷ss3330ÿÿ33337ÿÿw3333033337wws333	NumGlyphsParentShowHintShowHint	OnClickPrintSpdBtnClickTPanelPalletPanelLeft€Top`Width¤Height]CaptionPalletPanelTabOrderTDBGridPalletDBGridLeftTopWidth¢Height[AlignalClient
DataSourcePalletQuerySourceFont.CharsetDEFAULT_CHARSET
Font.ColorclBlackFont.Heightõ	Font.Name
MS Sans Serif
Font.Style
ParentFontTabOrderTitleFont.CharsetDEFAULT_CHARSETTitleFont.ColorclBlackTitleFont.HeightõTitleFont.Name
MS Sans SerifTitleFont.StyleTPanel
EntryPanelLeftTopWidth€HeightÁAlignalLeftTabOrderTLabelLabel3LeftTopWidthIHeight
Caption&Pallet Bar CodeFocusControlEditPalletBarCodeTLabelLabel4LeftTopvWidth%Height
CaptionNumberTLabelLabel1LeftTopLWidthNHeight
CaptionC&arton Bar CodeFocusControlEditBoxBarCodeTLabelLabel2LeftTop2Width%Height
CaptionNumberTEditEditPalletBarCodeLeftTopWidthdHeightTabOrderOnChangeEditPalletBarCodeChangeTEditEditBoxBarCodeLeftTop\WidthdHeightTabOrderOnChangeEditBoxBarCodeChangeTBitBtnCloseBitBtnLeftTop�WidthiHeightCaption&CloseModalResultTabOrderOnClickCloseBitBtnClick
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?	NumGlyphsTEditShowPalletNumberLeft>Top0Width2HeightTabStopColorclSilverReadOnly	TabOrderTEdit
ShowBoxNumberLeft>ToptWidth2HeightTabStopColorclSilverReadOnly	TabOrderTBitBtnUpdatePalletCountBitBtnLeftTop°WidthiHeightCaption&AllModalResultTabOrderOnClickUpdatePalletCountBitBtnClick
Glyph.Data
öòBMòv($|€€€€€€€€€ÀÀÀ€€€ÿÿÿÿÿÿÿÿÿÿÿÿ334C33333338�3333333B$3333333ƒ8ó333334""C33333833�33333B""$33333ƒ338ó3334"*""C3338ó?33�3332"¢¢"C3338óƒó3�333:*"*"$3338ø3?38ó334¢""¢"C338ƒ33ó3�33B"¢"*"$33�3�3?38ó3"*:"$¢"C3�88ó8ó3�3¢£3¢"J"$3�ƒ3�3�38ó:33:"$¢"C8338ó8ó3�3333¢"J"C3333�3�3�3333:"$¢#33338ó8ø333333¢"J333333�3�333333:"$3333338ó8ó333333¢$3333333�8ó333333:"33333338øó3333333£33333333ƒ3	NumGlyphsTBitBtnExportBitBtnLeftTopĞWidthiHeightCaptionExport Pal DataTabOrderOnClickExportBitBtnClick
Glyph.Data
zvBMvv( €€€€€€€€€¿¿¿ÿÿÿÿÿÿÿÿÿÿÿÿ333333333333ó333333�3333333wÿ333333™3?ÿÿÿÿwó™™™�3wwwwwwwÿÿğ™™™™37wwwwÿğ™™™™�?÷wwwwwğ™™™™w7wwwwsÿğ™™™�3?÷wwww3ÿÿğ™3w337ws3ÿÿÿğ�33?óÿ÷w33ğ33w7wws33ÿğÿ333?÷ós333ğğ3333w7÷3333ÿğ3333ÿ÷s333333333www333333333333333333333	NumGlyphsTBitBtnImportBitBtnLeftTopğWidthiHeightCaptionImport Pal DataTabOrderOnClickImportBitBtnClick
Glyph.Data
zvBMvv( €€€€€€€€€¿¿¿ÿÿÿÿÿÿÿÿÿÿÿÿ33333333333?ÿÿÿÿ333333wwwww333ÿÿÿğ3333337333ÿÿÿğ333?óÿ÷333ğğ33ów7w7303ÿÿÿğ37ÿ??ó÷39ğğ37sw7739�ÿÿÿğ?÷w?óÿ÷	™™ğwwww7ww	™™�ÿğÿwwwwÿ7ós	™™™ğğ3wwwws7÷3	™™�ÿğ3wwwwÿ÷s3	™™33wwwwww3339�3333337w33333393333337s333333033333337333333	NumGlyphsTBitBtnEraseBitBtnLeftTopWidthiHeightCaptionClear Current PalletTabOrderOnClickEraseBitBtnClickTBitBtnBitBtn1LeftTop.WidthiHeightCaptionPrint PickedTabOrder	VisibleOnClickBitBtn1ClickTBitBtnImportRowDataBitBtnLeftTop‚WidthuHeightCaptionImport Row DataTabOrder
OnClickImportRowDataBitBtnClick
Glyph.Data
zvBMvv( €€€€€€€€€¿¿¿ÿÿÿÿÿÿÿÿÿÿÿÿ33333333333?ÿÿÿÿ333333wwwww333ÿÿÿğ3333337333ÿÿÿğ333?óÿ÷333ğğ33ów7w7303ÿÿÿğ37ÿ??ó÷39ğğ37sw7739�ÿÿÿğ?÷w?óÿ÷	™™ğwwww7ww	™™�ÿğÿwwwwÿ7ós	™™™ğğ3wwwws7÷3	™™�ÿğ3wwwwÿ÷s3	™™33wwwwww3339�3333337w33333393333337s333333033333337333333	NumGlyphsTBitBtnImportStockAreasBitBtnLeftTop WidthuHeightCaptionImport Stock AreasTabOrderOnClickImportStockAreasBitBtnClick
Glyph.Data
zvBMvv( €€€€€€€€€¿¿¿ÿÿÿÿÿÿÿÿÿÿÿÿ33333333333?ÿÿÿÿ333333wwwww333ÿÿÿğ3333337333ÿÿÿğ333?óÿ÷333ğğ33ów7w7303ÿÿÿğ37ÿ??ó÷39ğğ37sw7739�ÿÿÿğ?÷w?óÿ÷	™™ğwwww7ww	™™�ÿğÿwwwwÿ7ós	™™™ğğ3wwwws7÷3	™™�ÿğ3wwwwÿ÷s3	™™33wwwwww3339�3333337w33333393333337s333333033333337333333	NumGlyphsTBitBtnExportStockAreasBitBtnLeftTopJWidthuHeightCaptionExport Stock AreasTabOrderOnClickExportStockAreasBitBtnClick
Glyph.Data
zvBMvv( €€€€€€€€€¿¿¿ÿÿÿÿÿÿÿÿÿÿÿÿ333333333333ó333333�3333333wÿ333333™3?ÿÿÿÿwó™™™�3wwwwwwwÿÿğ™™™™37wwwwÿğ™™™™�?÷wwwwwğ™™™™w7wwwwsÿğ™™™�3?÷wwww3ÿÿğ™3w337ws3ÿÿÿğ�33?óÿ÷w33ğ33w7wws33ÿğÿ333?÷ós333ğğ3333w7÷3333ÿğ3333ÿ÷s333333333www333333333333333333333	NumGlyphsTBitBtnClearStkAreasBitBtnLeftTopfWidthuHeightCaptionClear Stock AreasTabOrder
OnClickClearStkAreasBitBtnClickTPanelPalletCountPanelLeft€TopWidthyHeightaCaptionPalletCountPanelTabOrderTDBGridPalletCountDBGridLeftTopWidthwHeight_AlignalClient
DataSourcePalletCountQuerySourceTabOrderTitleFont.CharsetDEFAULT_CHARSETTitleFont.ColorclBlackTitleFont.HeightõTitleFont.Name
MS Sans SerifTitleFont.StyleTQueryPalletQueryDatabaseNameVBStockSQL.Stringsselect lotno,vbfin,=metricwidth,qlty,sum(netlength),boxno,palletno,despno,vtordnofrom vbrcptwhere palletno=:palletnoCgroup by lotno,vbfin,metricwidth,qlty,boxno,palletno,despno,vtordnoorder by lotno,vbfin,boxnoLeftLTopÌ	ParamDataDataType	ftIntegerNamepalletno	ParamType	ptUnknownValued
TIntegerFieldPalletQueryLOTNODisplayLabelLot NoDisplayWidth	FieldNameLOTNOTStringFieldPalletQueryVBFINDisplayLabelFinDisplayWidth	FieldNameVBFINSizeTSmallintFieldPalletQueryMETRICWIDTHDisplayLabelWidthDisplayWidth	FieldNameMETRICWIDTHTStringFieldPalletQueryQLTYDisplayLabelQltyDisplayWidth	FieldNameQLTYSizeTFloatFieldPalletQuerySUMDisplayLabelNet (m)DisplayWidth	FieldNameSUM
DisplayFormat0.0
TIntegerFieldPalletQueryBOXNODisplayLabel	Carton NoDisplayWidth		FieldNameBOXNO
TIntegerFieldPalletQueryPALLETNODisplayLabel	Pallet NoDisplayWidth	FieldNamePALLETNO
TIntegerFieldPalletQueryDESPNODisplayLabelDesp NoDisplayWidth	FieldNameDESPNO
TIntegerFieldPalletQueryVTORDNODisplayLabelPickedDisplayWidth	FieldNameVTORDNOTDataSourcePalletQuerySourceDataSetPalletQueryLeftlTopÌTQueryPalletCountQueryDatabaseNameVBStockSQL.Strings/select despno,palletno,lotno,vbfin,metricwidth,+  qlty,sum(netlength),count(distinct boxno)from vbrcptwhere palletno=:palletno5group by despno,palletno,lotno,vbfin,metricwidth,qlty%order by lotno,vbfin,metricwidth,qltyLeftLTop	ParamDataDataType	ftIntegerNamepalletno	ParamType	ptUnknownValued
TIntegerFieldPalletCountQueryLOTNODisplayLabelLot NoDisplayWidth	FieldNameLOTNOTStringFieldPalletCountQueryVBFINDisplayLabelFinDisplayWidth	FieldNameVBFINSizeTSmallintFieldPalletCountQueryMETRICWIDTHDisplayLabelWidthDisplayWidth	FieldNameMETRICWIDTHTStringFieldPalletCountQueryQLTYDisplayLabelQltyDisplayWidth	FieldNameQLTYSizeTFloatFieldPalletCountQuerySUMDisplayLabelNet (m)DisplayWidth	FieldNameSUM
DisplayFormat0.0
TIntegerFieldPalletCountQueryCOUNTDisplayLabelCartonsDisplayWidth	FieldNameCOUNT
TIntegerFieldPalletCountQueryPALLETNODisplayLabel	Pallet NoDisplayWidth	FieldNamePALLETNO
TIntegerFieldPalletCountQueryDESPNODisplayLabelDesp NoDisplayWidth	FieldNameDESPNOTDataSourcePalletCountQuerySourceDataSetPalletCountQueryLeftpTopTQueryUpdateVBRcptQueryDatabaseNameVBStockSQL.Strings
update vbrcptset palletno=:palletnowhere boxno=:boxnoLeftPTop	ParamDataDataType	ftIntegerNamepalletno	ParamType	ptUnknownDataType	ftIntegerNameboxno	ParamType	ptUnknownTQueryCheckBoxExistsQueryDatabaseNameVBStockSQL.Strings$select distinct boxno,palletno,rownofrom vbrcptwhere boxno=:boxnoLeft0Top	ParamDataDataType	ftIntegerNameboxno	ParamType	ptUnknown
TIntegerFieldCheckBoxExistsQueryBOXNO	FieldNameBOXNO
TIntegerFieldCheckBoxExistsQueryPALLETNO	FieldNamePALLETNO
TIntegerFieldCheckBoxExistsQueryROWNO	FieldNameROWNOTQueryMyQueryDatabaseNameVBStockLeftxTopTQueryqryCheckPalletOnDespatchDatabaseNameVBStockSQL.Strings
select despnofrom vbrcptwhere palletno=:palletno
and despno<>0Left0Top8	ParamDataDataType	ftIntegerNamepalletno	ParamType	ptUnknown
TIntegerFieldqryCheckPalletOnDespatchDESPNO	FieldNameDESPNO