gysjsqd.cpp

售后服务系统优质的售后服务是企业生存和市场竞争的保障

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
#include "ShFwMain.h"
#include "gysjs.h"
#include "gysjsqd.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TGYSJSQDForm *GYSJSQDForm;
//---------------------------------------------------------------------------
__fastcall TGYSJSQDForm::TGYSJSQDForm(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TGYSJSQDForm::QRBand2AfterPrint(TQRCustomBand *Sender,
      bool BandPrinted)
{
        pjfy=fwfy=jtfy=wgfy=0;
}
//---------------------------------------------------------------------------

void __fastcall TGYSJSQDForm::QRBand2BeforePrint(TQRCustomBand *Sender,
      bool &PrintBand)
{
        switch( MainForm->MyPjBh.ToInt()) {
        case 0:
                QRLabel11->Enabled = false;
                QRLabel22->Enabled = false;
                QRLabel13->Enabled = false;
                QRLabel23->Enabled = false;
                break;
        case 1:
                QRLabel11->Enabled = true;
                QRLabel22->Enabled = true;
                QRLabel22->Caption = QRDBText7->DataSet->FieldByName("ppmc")->AsString;
                QRLabel13->Enabled = false;
                QRLabel23->Enabled = false;
                break;
        case 2:
                QRLabel11->Enabled = true;
                QRLabel22->Enabled = true;
                QRLabel22->Caption = QRDBText7->DataSet->FieldByName("ppmc")->AsString;
                QRLabel13->Enabled = true;
                QRLabel23->Enabled = true;
                QRLabel23->Caption = QRDBText7->DataSet->FieldByName("ggmc")->AsString;
                break;
        }
}
//---------------------------------------------------------------------------

void __fastcall TGYSJSQDForm::QRSubDetail1AfterPrint(TQRCustomBand *Sender,
      bool BandPrinted)
{
        pjfy += QRDBText1->DataSet->FieldByName("mfpjfy")->AsFloat;
        fwfy += QRDBText8->DataSet->FieldByName("mffwfy")->AsFloat;
        jtfy += QRDBText9->DataSet->FieldByName("gysjtfy")->AsFloat;
        wgfy += QRDBText6->DataSet->FieldByName("gyswgfy")->AsFloat;

        hjpjfy += QRDBText1->DataSet->FieldByName("mfpjfy")->AsFloat;
        hjfwfy += QRDBText8->DataSet->FieldByName("mffwfy")->AsFloat;
        hjjtfy += QRDBText9->DataSet->FieldByName("gysjtfy")->AsFloat;
        hjwgfy += QRDBText6->DataSet->FieldByName("gyswgfy")->AsFloat;
}
//---------------------------------------------------------------------------

void __fastcall TGYSJSQDForm::QRBand4BeforePrint(TQRCustomBand *Sender,
      bool &PrintBand)
{
        QRLabel27->Caption = String(pjfy);
        QRLabel28->Caption = String(fwfy);
        QRLabel29->Caption = String(wgfy);
        QRLabel30->Caption = String(jtfy);
        QRLabel47->Caption = String(pjfy+fwfy+wgfy+jtfy);
}
//---------------------------------------------------------------------------

void __fastcall TGYSJSQDForm::QRBand6BeforePrint(TQRCustomBand *Sender,
      bool &PrintBand)
{
        QRLabel38->Caption = String(hjpjfy);
        QRLabel39->Caption = String(hjfwfy);
        QRLabel40->Caption = String(hjwgfy);
        QRLabel41->Caption = String(hjjtfy);
        QRLabel48->Caption = String(hjpjfy+hjfwfy+hjwgfy+hjjtfy);
}
//---------------------------------------------------------------------------