smssg_collect.~pas

家具行業的成本核算報价系統,主要征對家個產品的結構展開進行材料成本及人工制造費用統計,加上可調節的利潤設定,將其成本核算出來,同時將報價單作出來

    act_edit3: TBitBtn;
    act_save3: TBitBtn;
    act_cancel3: TBitBtn;
    Panel13: TPanel;
    Panel14: TPanel;
    Label47: TLabel;
    Label70: TLabel;
    DBText5: TDBText;
    Label73: TLabel;
    Label81: TLabel;
    Label82: TLabel;
    Label83: TLabel;
    Label84: TLabel;
    Label85: TLabel;
    Label86: TLabel;
    Label87: TLabel;
    Label88: TLabel;
    Label91: TLabel;
    Label92: TLabel;
    Label93: TLabel;
    Label94: TLabel;
    Label98: TLabel;
    DBxEdit34: TDBxEdit;
    RxDBComboEdit5: TRxDBComboEdit;
    DBxEdit50: TDBxEdit;
    DBxEdit52: TDBxEdit;
    DBxEdit53: TDBxEdit;
    DBxEdit54: TDBxEdit;
    DBxEdit55: TDBxEdit;
    DBxEdit57: TDBxEdit;
    DBxEdit58: TDBxEdit;
    BitBtn16: TBitBtn;
    DBxEdit60: TDBxEdit;
    Splitter5: TSplitter;
    v_othitem: TQuery;
    v_othitemfsno: TStringField;
    v_othitemfsgcode: TStringField;
    v_othitemffirstcost: TFloatField;
    v_othitemfup: TFloatField;
    v_othitemfjcpsales: TFloatField;
    v_othitemfduty: TFloatField;
    v_othitemfrgt: TFloatField;
    v_othitemfinsfee: TFloatField;
    v_othitemfharbor: TFloatField;
    v_othitemfsubttl: TFloatField;
    v_othitemfadmin: TFloatField;
    v_othitemfcoop: TFloatField;
    v_othitemfelc: TFloatField;
    v_othitemfmkcode: TStringField;
    v_othitemfmkname: TStringField;
    v_othitemffgname: TStringField;
    v_othitemcbm: TFloatField;
    v_othitemfjcpsalesmu_c: TFloatField;
    v_othitemgross_c: TFloatField;
    v_othitemffgsa: TFloatField;
    v_othitemfup1: TFloatField;
    v_othitemffirstcost_s: TFloatField;
    v_othitemfjcpsales_s: TFloatField;
    v_othitemfelc_s: TFloatField;
    v_othitemffggsa_s: TFloatField;
    v_othitemfsetqty: TFloatField;
    v_othitemffgpackpcs: TStringField;
    v_othitemfpcs: TIntegerField;
    v_othitemfremark: TStringField;
    v_othitemfno: TIntegerField;
    v_othitemfup_s: TFloatField;
    v_othitemduty: TFloatField;
    v_othitemmpf: TFloatField;
    v_othitemhmf: TFloatField;
    v_othitemfhmf: TFloatField;
    v_othitemfmpf: TFloatField;
    v_othitemfnetfob: TFloatField;
    v_othitemfprnno: TIntegerField;
    v_othitemfgroup: TStringField;
    othitemSource: TDataSource;
    UpdateSQL5: TUpdateSQL;
    othGrid: TDBGridEh;
    Label95: TLabel;
    Label96: TLabel;
    Label97: TLabel;
    MaskEdit3: TMaskEdit;
    BitBtn17: TBitBtn;
    ktMultiBevel6: TktMultiBevel;
    ktMultiBevel7: TktMultiBevel;
    ktMultiBevel8: TktMultiBevel;
    DBNavigator1: TDBNavigator;
    DBNavigator2: TDBNavigator;
    DBNavigator3: TDBNavigator;
    JCPMenu: TPopupMenu;
    act_del2: TMenuButton;
    ELC1: TMenuItem;
    ELC2: TMenuItem;
    samMenu: TPopupMenu;
    MenuItem2: TMenuItem;
    MenuItem3: TMenuItem;
    othMenu: TPopupMenu;
    MenuItem4: TMenuItem;
    MenuItem5: TMenuItem;
    act_del3: TMenuButton;
    act_del1: TMenuButton;
    Edit5: TEdit;
    Edit6: TEdit;
    TabSheet6: TTabSheet;
    ds_rmsm: TUpdateSQL;
    v_sggj: TQuery;
    v_sggjfsgcode: TStringField;
    v_sggjfptname: TStringField;
    v_sggjfunit: TStringField;
    v_sggjfnl: TFloatField;
    v_sggjfnw: TFloatField;
    v_sggjfnh: TFloatField;
    v_sggjfusize: TFloatField;
    v_sggjfqty: TFloatField;
    v_sggjfrmname: TStringField;
    v_sggjfrmup: TFloatField;
    v_sggjfamt: TFloatField;
    v_sggjfowcode: TFloatField;
    v_sggjfrtname: TStringField;
    v_sggjfsno: TIntegerField;
    DSUP: TDataSource;
    PageControl2: TPageControl;
    sm: TTabSheet;
    wb: TTabSheet;
    wj: TTabSheet;
    bt: TTabSheet;
    other: TTabSheet;
    Panel16: TPanel;
    act_del4: TMenuButton;
    act_add4: TBitBtn;
    act_edit4: TBitBtn;
    act_save4: TBitBtn;
    act_cancel4: TBitBtn;
    Panel17: TPanel;
    DBNavigator4: TDBNavigator;
    smgrid: TDBGridEh;
    v_sggjfsize1: TFloatField;
    v_sggjfsize2: TFloatField;
    v_sggjfcsize: TFloatField;
    v_sggjfbl: TFloatField;
    v_sggjfbw: TFloatField;
    bsgrid: TDBGridEh;
    tot: TTabSheet;
    v_sum: TQuery;
    v_sumfqty1: TFloatField;
    v_sumfqty2: TFloatField;
    v_sumfqty3: TFloatField;
    v_sumfqty4: TFloatField;
    v_sumfqty5: TFloatField;
    ds_sum: TDataSource;
    v_sumfsgcode: TStringField;
    v_sumfqty6: TFloatField;
    ppReport3: TppReport;
    ppHeaderBand2: TppHeaderBand;
    ppLabel16: TppLabel;
    ppLabel19: TppLabel;
    ppLabel20: TppLabel;
    ppShape3: TppShape;
    ppLine5: TppLine;
    ppLabel23: TppLabel;
    ppLine7: TppLine;
    ppLine8: TppLine;
    ppLabel24: TppLabel;
    ppLabel25: TppLabel;
    ppLine9: TppLine;
    ppLabel26: TppLabel;
    ppLabel27: TppLabel;
    ppLine10: TppLine;
    ppLabel29: TppLabel;
    ppLine12: TppLine;
    ppLabel31: TppLabel;
    ppLine13: TppLine;
    ppLabel32: TppLabel;
    ppDBText24: TppDBText;
    ppDBText25: TppDBText;
    ppLine20: TppLine;
    ppLabel103: TppLabel;
    ppDetailBand2: TppDetailBand;
    ppLine21: TppLine;
    ppLine22: TppLine;
    ppLine24: TppLine;
    ppLine25: TppLine;
    ppLine26: TppLine;
    ppLine27: TppLine;
    ppLine74: TppLine;
    ppLine75: TppLine;
    ppLine76: TppLine;
    ppDBText28: TppDBText;
    ppDBText29: TppDBText;
    ppDBText30: TppDBText;
    ppDBText31: TppDBText;
    ppDBText35: TppDBText;
    ppDBText37: TppDBText;
    ppDBText41: TppDBText;
    ppLine82: TppLine;
    ppFooterBand2: TppFooterBand;
    ppLabel79: TppLabel;
    ppGroup2: TppGroup;
    ppGroupHeaderBand2: TppGroupHeaderBand;
    ppGroupFooterBand2: TppGroupFooterBand;
    ppGroup4: TppGroup;
    ppGroupHeaderBand4: TppGroupHeaderBand;
    ppGroupFooterBand4: TppGroupFooterBand;
    ppLabel10: TppLabel;
    ppLabel17: TppLabel;
    ppLabel18: TppLabel;
    ppLine6: TppLine;
    ppLine11: TppLine;
    ppLine14: TppLine;
    ppLine15: TppLine;
    ppLine16: TppLine;
    ppLine17: TppLine;
    ppDBText8: TppDBText;
    ppDBText9: TppDBText;
    ppDBText10: TppDBText;
    v_rep_gj: TQuery;
    v_rep_gjfsgcode: TStringField;
    v_rep_gjfsno: TIntegerField;
    v_rep_gjfptname: TStringField;
    v_rep_gjfunit: TStringField;
    v_rep_gjfnl: TFloatField;
    v_rep_gjfnw: TFloatField;
    v_rep_gjfnh: TFloatField;
    v_rep_gjfsize1: TFloatField;
    v_rep_gjfusize: TFloatField;
    v_rep_gjfsize2: TFloatField;
    v_rep_gjfcsize: TFloatField;
    v_rep_gjfqty: TFloatField;
    v_rep_gjfrmname: TStringField;
    v_rep_gjfrmup: TFloatField;
    v_rep_gjfamt: TFloatField;
    v_rep_gjfowcode: TFloatField;
    v_rep_gjfbl: TFloatField;
    v_rep_gjfbw: TFloatField;
    ds_rep_gj: TDataSource;
    ppDBPipeline2: TppDBPipeline;
    ppLabel21: TppLabel;
    ppSystemVariable2: TppSystemVariable;
    ppLabel22: TppLabel;
    ppSummaryBand1: TppSummaryBand;
    ppLabel28: TppLabel;
    BitBtn12: TBitBtn;
    ppDBCalc1: TppDBCalc;
    ppDBCalc2: TppDBCalc;
    ppDBCalc3: TppDBCalc;
    ppLine18: TppLine;
    ppLine19: TppLine;
    ppLine23: TppLine;
    ppLine28: TppLine;
    ppLine29: TppLine;
    ppLine30: TppLine;
    ppLine31: TppLine;
    ppLabel30: TppLabel;
    ppShape4: TppShape;
    v_rep_gjfsgename: TStringField;
    ppLabel33: TppLabel;
    ppLine32: TppLine;
    ppLine33: TppLine;
    ppLine34: TppLine;
    ppLine35: TppLine;
    ppLabel34: TppLabel;
    ppLabel35: TppLabel;
    ppLabel36: TppLabel;
    ppLabel37: TppLabel;
    ppLabel38: TppLabel;
    ppLabel39: TppLabel;
    ppLabel40: TppLabel;
    ppLabel41: TppLabel;
    ppLabel42: TppLabel;
    ppLabel43: TppLabel;
    ppLine36: TppLine;
    ppLabel44: TppLabel;
    ppLabel45: TppLabel;
    ppLabel46: TppLabel;
    ppLabel47: TppLabel;
    ppLabel48: TppLabel;
    ppLabel49: TppLabel;
    ppLabel50: TppLabel;
    ppLabel51: TppLabel;
    ppLabel52: TppLabel;
    ppLine37: TppLine;
    ppLine38: TppLine;
    ppLine39: TppLine;
    ppLine40: TppLine;
    ppLine41: TppLine;
    ppLine42: TppLine;
    ppLine43: TppLine;
    s1: TppLabel;
    s2: TppLabel;
    s3: TppLabel;
    s4: TppLabel;
    s5: TppLabel;
    s6: TppLabel;
    g1: TppLabel;
    g2: TppLabel;
    g3: TppLabel;
    g4: TppLabel;
    g5: TppLabel;
    g6: TppLabel;
    y2: TppLabel;
    y1: TppLabel;
    c1: TppLabel;
    ppLine44: TppLine;
    Z1: TppLabel;
    Z2: TppLabel;
    z3: TppLabel;
    z4: TppLabel;
    ppLabel53: TppLabel;
    ppLabel54: TppLabel;
    ppLabel55: TppLabel;
    ppLabel56: TppLabel;
    ppLabel57: TppLabel;
    Z5: TppLabel;
    RadioGroup1: TRadioGroup;
    ppSubReport1: TppSubReport;
    ppChildReport1: TppChildReport;
    ppTitleBand1: TppTitleBand;
    ppDetailBand3: TppDetailBand;
    ppShape5: TppShape;
    ppLabel58: TppLabel;
    ppLabel59: TppLabel;
    ppLabel60: TppLabel;
    ppLabel61: TppLabel;
    ppLabel62: TppLabel;
    ppDBText12: TppDBText;
    ppLabel63: TppLabel;
    ppLabel64: TppLabel;
    ppLabel65: TppLabel;
    ppLabel66: TppLabel;
    ppLabel67: TppLabel;
    ppLabel68: TppLabel;
    ppDBText13: TppDBText;
    ppLabel69: TppLabel;
    ppLabel70: TppLabel;
    ppDBText14: TppDBText;
    ppLabel71: TppLabel;
    ppDBText15: TppDBText;
    ppLabel72: TppLabel;
    ppLabel73: TppLabel;
    ppLabel74: TppLabel;
    ppDBText16: TppDBText;
    ppLabel75: TppLabel;
    ppLabel76: TppLabel;
    ppDBText17: TppDBText;
    ppLabel77: TppLabel;
    ppLabel78: TppLabel;
    ppLabel80: TppLabel;
    ppLabel81: TppLabel;
    ppDBText18: TppDBText;
    ppLabel82: TppLabel;
    ppDBText19: TppDBText;
    ppLabel83: TppLabel;
    ppLabel84: TppLabel;
    ppLabel85: TppLabel;
    ppLabel86: TppLabel;
    ppLabel87: TppLabel;
    ppLabel88: TppLabel;
    ppLabel89: TppLabel;
    ppLabel90: TppLabel;
    ppLabel91: TppLabel;
    ppLabel92: TppLabel;
    ppLabel93: TppLabel;
    ppLabel94: TppLabel;
    ppLabel95: TppLabel;
    ppLine45: TppLine;
    ppLine46: TppLine;
    ppLabel96: TppLabel;
    ppLabel97: TppLabel;
    ppLabel98: TppLabel;
    ppLabel99: TppLabel;
    ppLabel100: TppLabel;
    ppLabel101: TppLabel;
    ppLine47: TppLine;
    ppLine48: TppLine;
    ppLine49: TppLine;
    ppDBText11: TppDBText;
    ppLine50: TppLine;
    ppDBText20: TppDBText;
    ppDBText21: TppDBText;
    ppDBText22: TppDBText;
    ppLine51: TppLine;
    ppLine52: TppLine;
    ppLine53: TppLine;
    ppLabel102: TppLabel;
    ppLine54: TppLine;
    ppDBText23: TppDBText;
    ppDBText26: TppDBText;
    ppLabel104: TppLabel;
    ppLine55: TppLine;
    ppDBText27: TppDBText;
    ppLabel105: TppLabel;
    ppLabel106: TppLabel;
    ppLine56: TppLine;
    ppDBText32: TppDBText;
    ppDBText33: TppDBText;
    ppDBText34: TppDBText;
    ppDBText36: TppDBText;
    ppDBText38: TppDBText;
    ppDBText39: TppDBText;
    ppDBText40: TppDBText;
    ppDBText42: TppDBText;
    ppDBText43: TppDBText;
    ppDBText44: TppDBText;
    ppDBText45: TppDBText;
    ppDBText46: TppDBText;
    ppDBText47: TppDBText;
    ppDBText48: TppDBText;
    ppLabel108: TppLabel;
    ppLabel109: TppLabel;
    ppLabel110: TppLabel;
    ppLabel111: TppLabel;
    ppLabel112: TppLabel;
    ppLabel113: TppLabel;
    ppLabel114: TppLabel;
    ppLabel115: TppLabel;
    ppLabel116: TppLabel;
    ppLabel117: TppLabel;
    ppLabel118: TppLabel;
    ppLabel119: TppLabel;
    ppLabel120: TppLabel;
    ppLabel121: TppLabel;
    ppDBText69: TppDBText;
    ppLabel122: TppLabel;
    ppDBText70: TppDBText;
    ppLabel123: TppLabel;
    ppDBText71: TppDBText;
    ppDBText72: TppDBText;
    ppLabel124: TppLabel;
    ppDBText112: TppDBText;
    ppLine57: TppLine;
    ppLine58: TppLine;
    ppDBText49: TppDBText;
    ppDBText50: TppDBText;
    ppLine59: TppLine;
    v_rep_sam: TQuery;
    ds_rep_sam: TDataSource;
    dbsam: TppDBPipeline;
    v_rep_samfsno: TStringField;
    v_rep_samfsgcode: TStringField;
    v_rep_samffirstcost: TFloatField;
    v_rep_samfup: TFloatField;
    v_rep_samfup1: TFloatField;
    v_rep_samfcn: TFloatField;
    v_rep_samfctn: TFloatField;
    v_rep_samfea: TFloatField;
    v_rep_samfpacking: TStringField;
    v_rep_samfpkg_m: TStringField;