Exemplo n.º 1
0
        private void DoCurrCheck()
        {
            var adap = MyData.GetKlonsRepAdapter("ROps1a") as ROps1aTableAdapter;

            adap.FillBy_curcheck_01(MyData.DataSetKlonsRep.ROps1a,
                                    startDate, endDate, ac, null, currency);

            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "Report_DokSar_1";
            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.ROps1a;

            string paramstr = string.Format(
                "Dokumenti ar valūtas konvertācijas kļūdām \nDatums:[{0}-{1}], konts: [{2}]",
                startDateStr, endDateStr, cbAC.Text);

            rd.AddReportParameters(
                new string[]
            {
                "RSD", startDateStr,
                "RED", endDateStr,
                "RACX", "",
                "RACNM", paramstr,
                "CompanyName", MyData.Params.CompNameX
            });

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 2
0
        private void DoIt()
        {
            string rt = Check();

            if (rt != "OK")
            {
                MyMainForm.ShowWarning(rt);
                return;
            }

            ROps2aTableAdapter ad = MyData.GetKlonsRepAdapter("ROps2a") as ROps2aTableAdapter;

            if (ad == null)
            {
                return;
            }

            ad.FillBy_pvn_10(MyData.DataSetKlonsRep.ROps2a, startDate, endDate);

            SaveParams();

            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "Report_PVN_kops";
            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.ROps2a;
            rd.AddReportParameters(
                new string[]
            {
                "RSD", MyData.Params.RSD,
                "RED", MyData.Params.RED,
                "CompanyName", MyData.Params.CompName
            });
            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 3
0
        private void DoIt()
        {
            string rt = Check();

            if (rt != "OK")
            {
                MyMainForm.ShowWarning(rt);
                return;
            }

            SaveParams();
            DataView rv = new DataView(MyData.DataSetKlons.Persons,
                                       "clid = '" + clid + "'", null, DataViewRowState.CurrentRows);

            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "Report_Rekins_1";
            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.TRepOPSd;
            rd.Sources["DataSet2"] = rv;
            rd.AddReportParameters(
                new string[]
            {
                "RCOMPNAME", MyData.Params.CompName,
                "RREGNR", MyData.Params.CompRegNr,
                "RPVNREGNR", MyData.Params.CompRegNrPVN,
                "RADRESE", MyData.Params.CompAddr + ", " + MyData.Params.CompAddrInd,
                "RBANKASKODS", MyData.Params.BankId,
                "RBANKA", MyData.Params.BankName,
                "RKONTS", MyData.Params.BankAcc,
                "RDESCR", tbDescr.Text,
                "RSIGNER", tbSigner.Text
            });
            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 4
0
        private void DoApgr1()
        {
            var ad = MyData.GetKlonsRepAdapter("ROps2a") as ROps2aTableAdapter;

            if (ad == null)
            {
                return;
            }
            ad.FillBy_apgr_cur_01_clid(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac, null, currency);
            MyData.ReportHelper.PrepareRops2a();

            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "Report_Apgr_Bil";
            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.ROps2a;

            rd.AddReportParameters(
                new string[]
            {
                "RSD", startDateStr,
                "RED", endDateStr,
                "RACX", cbAC.Text,
                "RACNM", lbACName.Text,
                "CompanyName", MyData.Params.CompNameX,
                "RCURRENCY", currency
            });

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 5
0
        public void MakeReport3()
        {
            //var cnm = new[] { "Kat.", "Nol.kat.", "Nod.nol. kat.", "Strv.", "Atrodas" };
            var cnm = new[] {
                "Kategorija",
                "Nolietojuma kategorija",
                "Nolietojuma kategorija nodokļa aprēķinam",
                "Struktīr-vienība",
                "Atrošanās vieta"
            };
            var cnm2 = new string[5];

            for (int i = 0; i < 5; i++)
            {
                cnm2[i] = GroupFieldsOrderA[i] == -1 ? "" : cnm[GroupFieldsOrderA[i]];
            }

            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "ReportP_Kustiba_3";
            rd.Sources["DataSet1"] = ReportMovement.ReportRows;
            rd.AddReportParameters(
                new string[]
            {
                "PCompany", MyData.Params.CompNameX,
                "PDate1", Utils.DateToString(DT1),
                "PDate2", Utils.DateToString(DT2),
                "PFilterStr", "Atlases parametri:" + MakeFilterStr(),
                "PCNM1", cnm2[0],
                "PCNM2", cnm2[1],
                "PCNM3", cnm2[2],
                "PCNM4", cnm2[3]
            });
            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 6
0
        private void DoCurrDiff()
        {
            var ad = MyData.GetKlonsRepAdapter("ROps2a") as ROps2aTableAdapter;

            if (ad == null)
            {
                return;
            }
            ad.FillBy_currdiff_01(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac, null, currency);

            if (MyData.DataSetKlonsRep.ROps2a.Count == 0)
            {
                MyMainForm.ShowWarning("Ar dotajiem parametriem dati netika atrasti");
                return;
            }

            var     dr = MyData.DataSetKlonsRep.ROps2a[0];
            decimal d1, d2, d3, d4;

            d1 = dr.ADb - dr.ACr;
            d2 = dr.BDb - dr.BCr;
            string s = ac.Substring(0, 1);

            if (s != "1" && s != "2")
            {
                d1 = -d1;
                d2 = -d2;
            }
            d3     = Math.Round(d1 * currrate, 2);
            d4     = d3 - d2;
            dr.ADb = d1;
            dr.ACr = d3;
            dr.TDb = d2;
            dr.TCr = d4;
            MyData.DataSetKlonsRep.ROps2a.AcceptChanges();

            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "Report_CurrDiff";
            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.ROps2a;

            s = string.Format(
                "Valūta: {0}\nKonts: {1} {2}\nPersona: {3} {4}",
                currency, cbAC.Text, lbACName.Text,
                cbClid.Text, lbClName.Text);

            rd.AddReportParameters(
                new string[]
            {
                "RSD", startDateStr,
                "RED", endDateStr,
                "RACX", cbAC.Text,
                "RACNM", s,
                "CompanyName", MyData.Params.CompNameX,
                "RCURRENCY", currency
            });

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 7
0
        private void DoIt1(int selectedreport)
        {
            var ad  = MyData.GetKlonsAdapter("BalA21") as BalA21TableAdapter;
            var ad2 = MyData.GetKlonsAdapter("BalA22") as BalA22TableAdapter;

            if (ad == null)
            {
                return;
            }

            try
            {
                MyData.DataSetKlons.BalA21.Clear();
                MyData.DataSetKlons.BalA22.Clear();
                ad2.Fill(MyData.DataSetKlons.BalA22);
                ad.FillBy_bal_12(MyData.DataSetKlons.BalA21, startDate, endDate, balid);
            }
            catch (Exception)
            {
                MyMainForm.ShowWarning("Neizdevās sagatavot atskaiti.");
                return;
            }
            MyData.ReportHelper.FillBalA2FromBalA21(balid);


            ReportViewerData rd = new ReportViewerData();

            switch (selectedreport)
            {
            case 0:
                rd.FileName = "Report_Bilance_2";
                break;

            case 1:
                rd.FileName = "Report_Bilance_1";
                break;
            }

            DataView dv = new DataView(
                MyData.DataSetKlons.BalA22,
                "balid = '" + balid + "'",
                "dc, nr",
                DataViewRowState.CurrentRows);

            rd.Sources["DataSet1"] = dv;
            rd.AddReportParameters(
                new string[]
            {
                "RSD", MyData.Params.RSD,
                "RED", MyData.Params.RED,
                "CompanyName", MyData.Params.CompNameX,
                "RTITLE", rtitle,
                "RAKTIVS", raktivs,
                "RPASIVS", rpasivs
            });
            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 8
0
        private void DoIt2(int selectedreport)
        {
            var ad  = MyData.GetKlonsAdapter("BalA2") as BalA2TableAdapter;
            var ad2 = MyData.GetKlonsRepAdapter("SP_REP_BAL_22") as SP_REP_BAL_22TableAdapter;

            if (ad == null)
            {
                return;
            }

            try
            {
                MyData.DataSetKlons.BalA2.Clear();
                MyData.DataSetKlons.BalA22.Clear();
                MyData.DataSetKlonsRep.SP_REP_BAL_22.Clear();
                ad.Fill(MyData.DataSetKlons.BalA2);
                ad2.Fill(MyData.DataSetKlonsRep.SP_REP_BAL_22, startDate, endDate, balid);
            }
            catch (Exception)
            {
                MyMainForm.ShowWarning("Neizdevās sagatavot atskaiti.");
                return;
            }

            List <RepRow_BalMT> reprows = null;

            ReportViewerData rd = new ReportViewerData();

            switch (selectedreport)
            {
            case 2:
                reprows     = PrepareReportMt_apgr(balid, MyData.DataSetKlonsRep.SP_REP_BAL_22);
                rd.FileName = "Report_Bilance_31";
                break;

            case 3:
                reprows     = PrepareReportMt_atl(balid, MyData.DataSetKlonsRep.SP_REP_BAL_22);
                rd.FileName = "Report_Bilance_41";
                break;
            }

            rd.Sources["DataSet1"] = reprows;
            rd.AddReportParameters(
                new string[]
            {
                "RSD", MyData.Params.RSD,
                "RED", MyData.Params.RED,
                "CompanyName", MyData.Params.CompNameX,
                "RTITLE", rtitle,
                "RAKTIVS", raktivs,
                "RPASIVS", rpasivs
            });
            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 9
0
        private void DoIt(int k)
        {
            string rt = Check();

            if (rt != "OK")
            {
                MyMainForm.ShowWarning(rt);
                return;
            }

            SaveParams();

            var ad = MyData.GetKlonsRepAdapter("ROps1a") as ROps1aTableAdapter;

            if (k == 1)
            {
                ad.FillBy_skaidra_01(MyData.DataSetKlonsRep.ROps1a, startDate, endDate, limit1, "JP");
            }
            else
            {
                ad.FillBy_skaidra_02(MyData.DataSetKlonsRep.ROps1a, startDate, endDate, limit2, "FP");
            }

            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "Report_Skaidra_1";
            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.ROps1a;

            string s1 = "", s = "              ";
            int    i = 13;

            if (k == 2)
            {
                i = startDate.Month;
            }
            s1  = s.Substring(0, i - 1);
            s1 += "X";
            s1 += s.Substring(0, 13 - i);

            rd.AddReportParameters(
                new string[]
            {
                "PYEAR", startDate.Year.ToString(),
                "PMONTH", s1,
                "Company", MyData.Params.CompName,
                "Addr", MyData.Params.CompAddr,
                "AddrInd", MyData.Params.CompAddrInd,
                "RegNr", MyData.Params.CompRegNr,
                "Manager", MyData.Params.CompMName,
                "Phone", MyData.Params.CompPhone
            });

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 10
0
        private void MakeReport()
        {
            ReportViewerData rd = new ReportViewerData();

            rd.FileName          = "ReportP_NodNolGads_1";
            rd.Sources["dsRows"] = bsRows;
            rd.AddReportParameters(
                new string[]
            {
                "PCompany", MyData.Params.CompNameX,
                "PYear", YearCurrent.ToString()
            });
            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 11
0
        public void MakeReport()
        {
            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "ReportP_NodNol_1";
            rd.Sources["DataSet1"] = ReportMovement.ReportRows;
            rd.AddReportParameters(
                new string[]
            {
                "PCompany", MyData.Params.CompNameX,
                "PYR", YR.ToString(),
                "PDate1", "01.01.\n" + YR,
                "PDate2", "31.12.\n" + YR
            });
            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 12
0
        public void MakeReport2()
        {
            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "ReportP_Kustiba_2";
            rd.Sources["DataSet1"] = ReportMovement.ReportRows;
            rd.AddReportParameters(
                new string[]
            {
                "PCompany", MyData.Params.CompNameX,
                "PDate1", Utils.DateToString(DT1),
                "PDate2", Utils.DateToString(DT2),
                "PFilterStr", "Atlases parametri:" + MakeFilterStr()
            });
            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 13
0
        private void DoIt()
        {
            string rt = Check();

            if (rt != "OK")
            {
                MyMainForm.ShowWarning(rt);
                return;
            }
            SaveParams();

            ROps1aTableAdapter ad1a = MyData.GetKlonsRepAdapter("ROps1a") as ROps1aTableAdapter;
            ROps2aTableAdapter ad2a = MyData.GetKlonsRepAdapter("ROps2a") as ROps2aTableAdapter;
            ROps3aTableAdapter ad3a = MyData.GetKlonsRepAdapter("ROps3a") as ROps3aTableAdapter;

            ReportViewerData rd = new ReportViewerData();

            rd.Sources["DataSet1"]   = MyData.DataSetKlonsRep.ROps1a;
            rd.Sources["DataSet_2a"] = MyData.DataSetKlonsRep.ROps2a;
            rd.Sources["DataSet_3a"] = MyData.DataSetKlonsRep.ROps3a;

            ad1a.FillBy_koresp_11_clid2(MyData.DataSetKlonsRep.ROps1a, startDate, endDate, ac, clid);
            ad2a.FillBy_apgr_01_clid2(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac, clid);
            ad3a.FillBy_koresp_01_clid2(MyData.DataSetKlonsRep.ROps3a, startDate, endDate, ac, clid);

            MyData.ReportHelper.PrepareRops1a();
            MyData.ReportHelper.PrepareRops2a();
            MyData.ReportHelper.PrepareRops2aRAC();

            rd.AddReportParameters(
                new string[]
            {
                "RSD", startDateStr,
                "RED", endDateStr,
                "RAC", cbAC.Text,
                "RACNM", lbACName.Text,
                "CompanyName", MyData.Params.CompNameX,
                "RPER", MyData.Params.RPER,
                "RPERNM", lbClName.Text,
                "AVNR", tbNr.Text,
                "PAC", null,
                "PCLID", null
            });

            rd.FileName = "Report_AvNor_1";
            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 14
0
        private void MakeReport()
        {
            var dr = bsCatT.CurrentDataRow as KlonsPDataSet.CATTRow;

            ReportViewerData rd = new ReportViewerData();

            rd.FileName          = "ReportP_NodNolKat_1";
            rd.Sources["dsRows"] = bsRows;
            rd.AddReportParameters(
                new string[]
            {
                "PCompany", MyData.Params.CompNameX,
                "PCatStr", $"[{dr.CODE}] {dr.DESCR}",
                "PCatRate", $"{dr.RATE}%"
            });
            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 15
0
        private void DoIt()
        {
            string rt = Check();

            if (rt != "OK")
            {
                MyMainForm.ShowWarning(rt);
                return;
            }
            ROps2aTableAdapter ad = MyData.GetKlonsRepAdapter("ROps2a") as ROps2aTableAdapter;

            if (ad == null)
            {
                return;
            }

            if (cbCharCount.Text == "*")
            {
                ad.FillBy_apgr_np_11(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac);
            }
            else
            {
                ad.FillBy_apgr_np_12(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac, int.Parse(cbCharCount.Text));
            }

            SaveParams();

            MyData.ReportHelper.PrepareRops2a();

            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "Report_Apgr_NP";
            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.ROps2a;
            rd.AddReportParameters(
                new string[]
            {
                "RSD", MyData.Params.RSD,
                "RED", MyData.Params.RED,
                "RACX", MyData.Params.RACX,
                "RACNM", MyData.Params.RACNM,
                "CompanyName", MyData.Params.CompNameX
            });

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 16
0
        private void DoApgrPers1()
        {
            var ad = MyData.GetKlonsRepAdapter("ROps2a") as ROps2aTableAdapter;

            if (ad == null)
            {
                return;
            }
            ad.FillBy_apgr_cur_01_clid(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac, clid, currency);
            MyData.ReportHelper.PrepareRops2a();

            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "Report_Pers_1";
            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.ROps2a;

            string s = string.Format("{1} Konts: [{0}]", cbAC.Text, currency);

            if (!string.IsNullOrEmpty(lbACName.Text))
            {
                s = string.Format("{0} {1}", s, lbACName.Text);
            }
            if (!string.IsNullOrEmpty(cbClid.Text))
            {
                s = string.Format("{0}\nPersona: [{1}]", s, cbClid.Text);
            }
            if (!string.IsNullOrEmpty(lbClName.Text))
            {
                s = string.Format("{0} {1}", s, lbClName.Text);
            }

            rd.AddReportParameters(
                new string[]
            {
                "RSD", startDateStr,
                "RED", endDateStr,
                "RACX", cbAC.Text,
                "RACNM", s,
                "CompanyName", MyData.Params.CompNameX
            });

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 17
0
        private void DoIt()
        {
            string rt = Check();

            if (rt != "OK")
            {
                MyMainForm.ShowWarning(rt);
                return;
            }
            ROps2aTableAdapter ad2a = MyData.GetKlonsRepAdapter("ROps2a") as ROps2aTableAdapter;
            ROps3aTableAdapter ad3a = MyData.GetKlonsRepAdapter("ROps3a") as ROps3aTableAdapter;

            if (ad2a == null)
            {
                return;
            }
            if (ad3a == null)
            {
                return;
            }

            ad2a.FillBy_apgr_dz_12(MyData.DataSetKlonsRep.ROps2a, startDate, endDate);
            ad3a.FillBy_apgr_dz_11(MyData.DataSetKlonsRep.ROps3a, startDate, endDate);

            SaveParams();

            MyData.ReportHelper.PrepareRops2a();

            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "Report_Apgr_DZ_1";
            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.ROps2a;
            rd.Sources["DataSet2"] = MyData.DataSetKlonsRep.ROps3a;
            rd.AddReportParameters(
                new string[]
            {
                "RSD", MyData.Params.RSD,
                "RED", MyData.Params.RED,
                "CompanyName", MyData.Params.CompNameX
            });

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 18
0
        private void DoIt()
        {
            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "ReportA_VidIzp_1";
            rd.Sources["DataSet1"] = AvPayCalcInfo.ReportRows;
            rd.AddReportParameters(
                new string[]
            {
                "CompanyName", MyData.Params.CompNameX,
                "RPerson", string.Format("{0} {1}", AvPayCalcInfo.FName, AvPayCalcInfo.LName),
                "RPeriod", string.Format("{0}.{1:00}", AvPayCalcInfo.Year, AvPayCalcInfo.Month),
                "RRateHour", AvPayCalcInfo.RateHour.ToString("N2"),
                "RRateDay", AvPayCalcInfo.RateDay.ToString("N2"),
                "RRateCalDay", AvPayCalcInfo.RateCalendarDay.ToString("N2"),
                "RRemark", AvPayCalcInfo.UsingMinRate? "Izmantotās minimālās likmes.":""
            });

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 19
0
        private void DoIt()
        {
            string rt = Check();

            if (rt != "OK")
            {
                MyMainForm.ShowWarning(rt);
                return;
            }

            var ad1 = MyData.GetKlonsRepAdapter("TREPPVNZ1") as TREPPVNZ1TableAdapter;

            if (ad1 == null)
            {
                return;
            }

            string speriod = string.Format("{0}. gada {1}", startDate.Year, Utils.MonthNames[startDate.Month - 1]);

            SaveParams();

            ReportViewerData rd = new ReportViewerData();

            ad1.FillBy_PVNZ1(MyData.DataSetKlonsRep.TREPPVNZ1, startDate, endDate);
            rd.FileName = "Report_PVNZ_1";

            MyData.ReportHelper.PrepareTRepDarz1();

            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.TREPPVNZ1;
            rd.AddReportParameters(
                new string[]
            {
                "RPERIOD", speriod,
                "CompanyName", MyData.Params.CompNameX,
                "PRID0", firstPRowNr.ToString(),
                "PFirstPageNr", firstPageNr.ToString()
            });

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 20
0
        private void DoKoresp1()
        {
            var ad1a = MyData.GetKlonsRepAdapter("ROps1a") as ROps1aTableAdapter;
            var ad2a = MyData.GetKlonsRepAdapter("ROps2a") as ROps2aTableAdapter;
            var ad3a = MyData.GetKlonsRepAdapter("ROps3a") as ROps3aTableAdapter;

            ReportViewerData rd = new ReportViewerData();

            rd.Sources["DataSet1"]   = MyData.DataSetKlonsRep.ROps1a;
            rd.Sources["DataSet_2a"] = MyData.DataSetKlonsRep.ROps2a;
            rd.Sources["DataSet_3a"] = MyData.DataSetKlonsRep.ROps3a;

            ad1a.FillBy_koresp_11_cur(MyData.DataSetKlonsRep.ROps1a, startDate, endDate, ac, clid, currency);
            ad2a.FillBy_apgr_cur_01_clid(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac, clid, currency);
            ad3a.FillBy_koresp_01_cur(MyData.DataSetKlonsRep.ROps3a, startDate, endDate, ac, clid, currency);

            MyData.ReportHelper.PrepareRops1a();
            MyData.ReportHelper.PrepareRops2a();
            MyData.ReportHelper.PrepareRops2aRAC(cbAC.Text, lbACName.Text, cbClid.Text, lbClName.Text);

            rd.AddReportParameters(
                new string[]
            {
                "RSD", startDateStr,
                "RED", endDateStr,
                "RAC", cbAC.Text,
                "RACNM", lbACName.Text,
                "CompanyName", MyData.Params.CompNameX,
                "RPER", MyData.Params.RPER,
                "RPERNM", lbClName.Text,
                "PAC", null,
                "PCLID", null,
                "RCURRENCY", currency
            });

            rd.FileName = "Report_Koresp_1";

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 21
0
        private void DoIt()
        {
            string rt = Check();

            if (rt != "OK")
            {
                MyMainForm.ShowWarning(rt);
                return;
            }
            TRepApAnTableAdapter ad = MyData.GetKlonsRepAdapter("TRepApAn") as TRepApAnTableAdapter;

            if (ad == null)
            {
                return;
            }

            ad.FillBy_apgr_full_11(MyData.DataSetKlonsRep.TRepApAn, startDate, endDate,
                                   ac1, ac2, ac3, ac4, ac5, cl,
                                   xac1, xac2, xac3, xac4, xac5, xcl);

            SaveParams();

            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "Report_Apgr_Full_11";
            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.TRepApAn;
            rd.AddReportParameters(
                new string[]
            {
                "RSD", MyData.Params.RSD,
                "RED", MyData.Params.RED,
                "RACX", "",
                "RACNM", param,
                "CompanyName", MyData.Params.CompNameX
            });

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 22
0
        private void DoIt()
        {
            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "ReportA_SlimibasNauda_1";
            rd.Sources["DataSet1"] = SickDayCalcInfo.Rows;
            rd.AddReportParameters(
                new string[]
            {
                "CompanyName", MyData.Params.CompNameX,
                "RPerson", Person,
                "RPeriod", Period,
                "RPay", SickDayCalcInfo.TotalRow.SickDayPay.ToString("N2"),
                "RPay75", SickDayCalcInfo.TotalRow.SickDayPay75.ToString("N2"),
                "RPay80", SickDayCalcInfo.TotalRow.SickDayPay80.ToString("N2"),
                "RRateHour", SickDayCalcInfo.AvPayRateHour.ToString("N4"),
                "RRateDay", SickDayCalcInfo.AvPayRateDay.ToString("N4"),
                "RRateCalDay", SickDayCalcInfo.AvPayRateCalendarDay.ToString("N4"),
                "RRemark", ""
            });

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 23
0
        private void DoIt(bool doreport = true)
        {
            string rt = Check();

            if (rt != "OK")
            {
                MyMainForm.ShowWarning(rt);
                return;
            }

            SaveParams();

            ROps2aTableAdapter ad = MyData.GetKlonsRepAdapter("ROps2a") as ROps2aTableAdapter;

            if (ad == null)
            {
                return;
            }

            try
            {
                if (cbCharCount.Text == "*")
                {
                    ad.FillBy_apgr_11(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac);
                }
                else
                {
                    ad.FillBy_apgr_21(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac, int.Parse(cbCharCount.Text));
                }
            }
            catch (ConstraintException e)
            {
                Exception e1 = ExceptionHelper.TranslateException(e, MyData.DataSetKlonsRep.ROps2a);
                Form_Error.ShowException(MyMainForm, e1);
                return;
            }

            MyData.ReportHelper.PrepareRops2a();

            if (doreport)
            {
                ReportViewerData rd = new ReportViewerData();
                rd.FileName            = "Report_Apgr_Bil";
                rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.ROps2a;
                rd.AddReportParameters(
                    new string[]
                {
                    "RSD", startDateStr,
                    "RED", endDateStr,
                    "RACX", cbAC.Text,
                    "RACNM", lbACName.Text,
                    "CompanyName", MyData.Params.CompNameX,
                    "RCURRENCY", ""
                });

                MyMainForm.ShowReport(rd);
            }
            else
            {
                var fm = MyMainForm.ShowFormDialog(typeof(Form_Apgr1)) as Form_Apgr1;
                if (fm == null)
                {
                    return;
                }
                fm.Show();
                fm.LoadParams();
            }
        }
Exemplo n.º 24
0
        private void DoIt()
        {
            string rt = Check();

            if (rt != "OK")
            {
                MyMainForm.ShowWarning(rt);
                return;
            }

            SaveParams();

            DataView rv = new DataView(MyData.DataSetKlons.Persons,
                                       "clid = '" + clid + "'", null, DataViewRowState.CurrentRows);

            var ad = MyData.KlonsRepTableAdapterManager.TRepOPSTableAdapter;

            ad.FillBy_rekins_11(MyData.DataSetKlonsRep.TRepOPS, docid);

            bool    haspvn = false;
            decimal pvn    = 0.00M;
            decimal total  = 0.00M;
            List <klonsRepDataSet.TRepOPSRow> PVNRows = new List <klonsRepDataSet.TRepOPSRow>();

            foreach (var dr in MyData.DataSetKlonsRep.TRepOPS)
            {
                total += dr.Summ;
                if (MyData.IsPVN(dr.AC15.Nz()) || MyData.IsPVN(dr.AC25.Nz()))
                {
                    haspvn = true;
                    pvn   += dr.Summ;
                    PVNRows.Add(dr);
                    break;
                }
            }

            foreach (var dr in PVNRows)
            {
                MyData.DataSetKlonsRep.TRepOPS.RemoveTRepOPSRow(dr);
            }

            ReportViewerData rd = new ReportViewerData();

            switch (repid)
            {
            case 1:
                rd.FileName = "Report_Rekins_PZ_1";
                break;

            default:
                return;
            }

            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.TRepOPSd;
            rd.Sources["DataSet2"] = rv;
            rd.Sources["DataSet3"] = MyData.DataSetKlonsRep.TRepOPS;
            rd.AddReportParameters(
                new string[]
            {
                "RCOMPNAME", MyData.Params.CompName,
                "RREGNR", MyData.Params.CompRegNr,
                "RPVNREGNR", MyData.Params.CompRegNrPVN,
                "RADRESE", MyData.Params.CompAddr,
                "RBANKASKODS", MyData.Params.BankId,
                "RBANKA", MyData.Params.BankName,
                "RKONTS", MyData.Params.BankAcc,
                "RDESCR", "",
                "RPVN", haspvn? pvn.ToString("F2") : "-",
                "RAPMAKSAI", total.ToString("F2"),
                "RSIGNER", tbSigner.Text,
                "RPARVNOSAUKUMS", parv,
                "RPARVREGNR", parvregnr,
                "RPARVPVNREGNR", parvpvnregnr,
                "RPARVJURADRESE", parvjuradrese,
                "RPARVTR", tbTLNumurs.Text,
                "RPARVVARDS", tbTLVaditajs.Text,
                "RDARIJUMS", cbDarVeids.Text,
                "RAPMAKSA", cbApmaksa.Text,
                "RTERMINS", cbTermins.Text
            });
            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 25
0
        private void DoReportDoks1()
        {
            DateTime?dt1, dt2;

            dt1 = Utils.StringToDate(tbDate1.Text);
            dt2 = Utils.StringToDate(tbDate2.Text);
            string sac11, sac12, sac13, sac14, sac15;
            string sac21, sac22, sac23, sac24, sac25;

            string sclid  = ZN(cbClid.Text);
            string stext  = ZN(tbText.Text);
            string sdocgr = ZN(cbDocGr.Text);

            sac11 = ZN(cbAC11.Text);
            sac12 = ZN(cbAC12.Text);
            sac13 = ZN(cbAC13.Text);
            sac14 = ZN(cbAC14.Text);
            sac15 = ZN(cbAC15.Text);

            sac21 = ZN(cbAC21.Text);
            sac22 = ZN(cbAC22.Text);
            sac23 = ZN(cbAC23.Text);
            sac24 = ZN(cbAC24.Text);
            sac25 = ZN(cbAC25.Text);

            string s = "";

            if (dt1.HasValue)
            {
                s = Utils.DateToString(dt1.Value);
            }
            s += " - ";
            if (dt2.HasValue)
            {
                s += Utils.DateToString(dt2.Value);
            }

            string paramstr = string.Format(
                "Datums:[{0}], persona:[{2}]," +
                " dokumentu grupa:[{14}]" +
                " debets:[{3},{4},{5},{6},{7}] {13}" +
                " kredīts:[{8},{9},{10},{11},{12}]",
                s, "", cbClid.Text,
                cbAC11.Text, cbAC12.Text, cbAC13.Text, cbAC14.Text, cbAC15.Text,
                cbAC21.Text, cbAC22.Text, cbAC23.Text, cbAC24.Text, cbAC25.Text,
                cmAndOr.Text, cbDocGr.Text);

            bool b1 = (sac11 == null && sac12 == null && sac13 == null && sac14 == null && sac15 == null) ||
                      (sac21 == null && sac22 == null && sac23 == null && sac24 == null && sac25 == null);

            string pandor = (cmAndOr.Text == "un" || b1) ? "AND" : "OR";

            ROps1aTableAdapter adap = MyData.GetKlonsRepAdapter("ROps1a") as ROps1aTableAdapter;

            adap.FillBy_doks_11(MyData.DataSetKlonsRep.ROps1a,
                                dt1, dt2, stext, sclid,
                                sac11, sac12, sac13, sac14, sac15,
                                sac21, sac22, sac23, sac24, sac25, sdocgr, pandor);

            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "Report_DokSar_1";
            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.ROps1a;
            rd.AddReportParameters(
                new string[]
            {
                "RSD", MyData.Params.RSD,
                "RED", MyData.Params.RED,
                "RACX", "",
                "RACNM", paramstr,
                "CompanyName", MyData.Params.CompNameX
            });

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 26
0
        private void DoIt()
        {
            string rt = Check();

            if (rt != "OK")
            {
                MyMainForm.ShowWarning(rt);
                return;
            }

            int selectedReport = lbCM.SelectedIndex;

            if (selectedReport == -1)
            {
                return;
            }

            TRepDarz1TableAdapter ad1 = MyData.GetKlonsRepAdapter("TRepDarz1") as TRepDarz1TableAdapter;
            TRepDarz2TableAdapter ad2 = MyData.GetKlonsRepAdapter("TRepDarz2") as TRepDarz2TableAdapter;

            if (ad1 == null)
            {
                return;
            }
            if (ad2 == null)
            {
                return;
            }

            DateTime startDateOfYear = new DateTime(startDate.Year, 1, 1);
            string   speriod         = string.Format("{0}. gada {1}", startDate.Year, Utils.MonthNames[startDate.Month - 1]);

            SaveParams();

            ReportViewerData rd = new ReportViewerData();

            switch (selectedReport)
            {
            case 0:
                ad1.FillBy_darz_1(MyData.DataSetKlonsRep.TRepDarz1, startDate, endDate);
                ad2.FillBy_darz_2(MyData.DataSetKlonsRep.TRepDarz2, startDateOfYear, startDate.AddDays(-1));
                rd.FileName = "Report_Darz_1";
                break;

            case 1:
                ad1.FillBy_darz_1(MyData.DataSetKlonsRep.TRepDarz1, startDate, endDate);
                ad2.FillBy_darz_2(MyData.DataSetKlonsRep.TRepDarz2, startDateOfYear, startDate.AddDays(-1));
                rd.FileName = "Report_Darz_3";
                break;

            case 2:
                ad1.FillBy_darz_3(MyData.DataSetKlonsRep.TRepDarz1, startDate, endDate);
                ad2.FillBy_darz_4(MyData.DataSetKlonsRep.TRepDarz2, startDateOfYear, startDate.AddDays(-1));
                rd.FileName = "Report_Darz_2";
                break;
            }

            MyData.ReportHelper.PrepareTRepDarz1();

            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.TRepDarz1;
            rd.Sources["DataSet2"] = MyData.DataSetKlonsRep.TRepDarz2;
            rd.AddReportParameters(
                new string[]
            {
                "RPERIOD", speriod,
                "CompanyName", MyData.Params.CompNameX
            });

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 27
0
        private void DoReportDoks2()
        {
            DateTime?dt1, dt2;

            dt1 = Utils.StringToDate(tbDate1.Text);
            dt2 = Utils.StringToDate(tbDate2.Text);
            string sac11, sac12, sac13, sac14, sac15;
            string sac21, sac22, sac23, sac24, sac25;

            string sclid  = ZN(cbClid.Text);
            string stext  = ZN(tbText.Text);
            string sdocgr = ZN(cbDocGr.Text);

            sac11 = ZN(cbAC11.Text);
            sac12 = ZN(cbAC12.Text);
            sac13 = ZN(cbAC13.Text);
            sac14 = ZN(cbAC14.Text);
            sac15 = ZN(cbAC15.Text);

            sac21 = ZN(cbAC21.Text);
            sac22 = ZN(cbAC22.Text);
            sac23 = ZN(cbAC23.Text);
            sac24 = ZN(cbAC24.Text);
            sac25 = ZN(cbAC25.Text);

            string s = "";

            if (dt1.HasValue)
            {
                s = Utils.DateToString(dt1.Value);
            }
            s += " - ";
            if (dt2.HasValue)
            {
                s += Utils.DateToString(dt2.Value);
            }

            string paramstr = string.Format(
                "Datums:[{0}], persona:[{2}]," +
                " dokumentu grupa:[{14}]" +
                " debets:[{3},{4},{5},{6},{7}] {13}" +
                " kredīts:[{8},{9},{10},{11},{12}]",
                s, "", cbClid.Text,
                cbAC11.Text, cbAC12.Text, cbAC13.Text, cbAC14.Text, cbAC15.Text,
                cbAC21.Text, cbAC22.Text, cbAC23.Text, cbAC24.Text, cbAC25.Text,
                cmAndOr.Text, sdocgr);

            ReportViewerData rd = new ReportViewerData();

            rd.FileName            = "Report_Ieraksti_1";
            rd.Sources["DataSet1"] = MyData.DataSetKlons.vw_OPS;
            rd.AddReportParameters(
                new string[]
            {
                "RSD", MyData.Params.RSD,
                "RED", MyData.Params.RED,
                "RACX", "",
                "RACNM", paramstr,
                "CompanyName", MyData.Params.CompNameX
            });

            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 28
0
        private void DoIt()
        {
            string rt = Check();

            if (rt != "OK")
            {
                MyMainForm.ShowWarning(rt);
                return;
            }
            SaveParams();

            ROps1aTableAdapter ad1a = MyData.GetKlonsRepAdapter("ROps1a") as ROps1aTableAdapter;

            ReportViewerData rd = new ReportViewerData();

            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.ROps1a;

            int selectedreport = lbCm.SelectedIndex;

            if (selectedreport == -1)
            {
                return;
            }

            switch (selectedreport)
            {
            case 0:
                ad1a.FillBy_kg_11(MyData.DataSetKlonsRep.ROps1a, startDate, endDate, ac);
                MyData.ReportHelper.PrepareRops1aForKO();
                rd.FileName = "Report_KasesGr_1";
                break;

            case 1:
                ad1a.FillBy_kg_11(MyData.DataSetKlonsRep.ROps1a, startDate, endDate, ac);
                MyData.ReportHelper.PrepareRops1aForKO();
                rd.FileName = "Report_KasesGr_2";
                break;

            case 2:
                ad1a.FillBy_kieo_21(MyData.DataSetKlonsRep.ROps1a, startDate, endDate, ac);
                MyData.ReportHelper.PrepareRops1aForKO();
                rd.FileName = "Report_KIEO_1";
                break;

            case 3:
                ad1a.FillBy_kizo_21(MyData.DataSetKlonsRep.ROps1a, startDate, endDate, ac);
                MyData.ReportHelper.PrepareRops1aForKO();
                rd.FileName = "Report_KIZO_1";
                break;

            default:
                return;
            }

            decimal bal0;

            switch (selectedreport)
            {
            case 0:
                bal0 = MyData.ReportHelper.GetBal0ForDate(ac, startDate);
                rd.AddReportParameters(
                    new string[]
                {
                    "CompanyName", MyData.Params.CompNameX,
                    "RPAGENR", (nr - 1).ToString(),
                    "RBAL0", bal0.ToString()
                });
                break;

            case 1:
                bal0 = MyData.ReportHelper.GetBal0ForDate(ac, startDate);
                string speriod = Utils.DateToString(startDate) +
                                 " - " + Utils.DateToString(endDate);
                rd.AddReportParameters(
                    new string[]
                {
                    "CompanyName", MyData.Params.CompNameX,
                    "RPAGENR", (nr - 1).ToString(),
                    "RBAL0", bal0.ToString(),
                    "RPERIOD", speriod
                });
                break;

            case 2:
            case 3:
                rd.AddReportParameters(
                    new string[]
                {
                    "RCOMPNAME", MyData.Params.CompName,
                    "RREGNR", MyData.Params.CompRegNr,
                    "RPVNREGNR", MyData.Params.CompPhone
                });
                break;
            }
            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 29
0
        private void DoIt()
        {
            string rt = Check();

            if (rt != "OK")
            {
                MyMainForm.ShowWarning(rt);
                return;
            }

            int cmid = lbCM.SelectedIndex;

            if (cmid == -1)
            {
                return;
            }

            SaveParams();

            TRepMTTableAdapter ad = MyData.GetKlonsRepAdapter("TRepMT") as TRepMTTableAdapter;

            if (ad == null)
            {
                return;
            }

            ReportViewerData rd = new ReportViewerData();

            switch (cmid)
            {
            case 0:
                ad.FillBy_apgr_mt_11(MyData.DataSetKlonsRep.TRepMT, startDate, endDate, ac);
                break;

            case 1:
            case 2:
                ad.FillBy_apgr_mt_12(MyData.DataSetKlonsRep.TRepMT, startDate, endDate, ac);
                break;

            case 3:
                ad.FillBy_apgr_mt_21(MyData.DataSetKlonsRep.TRepMT, startDate, endDate, ac);
                break;

            case 4:
                ad.FillBy_apgr_mt_22(MyData.DataSetKlonsRep.TRepMT, startDate, endDate, ac);
                break;
            }

            MyData.ReportHelper.PrepareTRepMT();

            switch (cmid)
            {
            case 0:
                rd.FileName = "Report_Apgr_MT_11";
                break;

            case 1:
                rd.FileName = "Report_Apgr_MT_12";
                break;

            case 2:
                rd.FileName = "Report_Apgr_MT_13";
                break;

            case 3:
            case 4:
                rd.FileName = "Report_Apgr_MT_21";
                break;
            }

            rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.TRepMT;
            rd.AddReportParameters(
                new string[]
            {
                "RSD", MyData.Params.RSD,
                "RED", MyData.Params.RED,
                "RACX", MyData.Params.RACX,
                "RACNM", MyData.Params.RACNM,
                "CompanyName", MyData.Params.CompNameX
            });

            switch (cmid)
            {
            case 3:
                rd.AddReportParameter("RTITLE", "Apgrozijuma pārskats debetam ar summām un daudzumiem");
                break;

            case 4:
                rd.AddReportParameter("RTITLE", "Apgrozijuma pārskats kredītam ar summām un daudzumiem");
                break;
            }
            MyMainForm.ShowReport(rd);
        }
Exemplo n.º 30
0
        private void DoIt()
        {
            string rt = Check();

            if (rt != "OK")
            {
                MyMainForm.ShowWarning(rt);
                return;
            }
            SaveParams();

            int repid = lbCm.SelectedIndex;

            if (cbClid.Text == "*")
            {
                cbClid.Text = "";
            }
            if (cbClid.Text != "")
            {
                repid += 6;
            }

            ROps1aTableAdapter ad1a = MyData.GetKlonsRepAdapter("ROps1a") as ROps1aTableAdapter;
            ROps2aTableAdapter ad2a = MyData.GetKlonsRepAdapter("ROps2a") as ROps2aTableAdapter;
            ROps3aTableAdapter ad3a = MyData.GetKlonsRepAdapter("ROps3a") as ROps3aTableAdapter;

            ReportViewerData rd = new ReportViewerData();

            if (repid != 5)
            {
                rd.Sources["DataSet1"] = MyData.DataSetKlonsRep.ROps1a;
            }
            rd.Sources["DataSet_2a"] = MyData.DataSetKlonsRep.ROps2a;
            rd.Sources["DataSet_3a"] = MyData.DataSetKlonsRep.ROps3a;

            ReportViewerData rdsub = null;


            switch (repid)
            {
            case 0:
            case 1:
            case 2:
                ad1a.FillBy_koresp_11(MyData.DataSetKlonsRep.ROps1a, startDate, endDate, ac);
                ad2a.FillBy_apgr_01(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac);
                ad3a.FillBy_koresp_01(MyData.DataSetKlonsRep.ROps3a, startDate, endDate, ac);
                break;

            case 3:
                ad1a.FillBy_koresp_11(MyData.DataSetKlonsRep.ROps1a, startDate, endDate, ac);
                ad2a.FillBy_apgr_02(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac);
                ad3a.FillBy_koresp_02(MyData.DataSetKlonsRep.ROps3a, startDate, endDate, ac);
                break;

            case 5:
                ad2a.FillBy_apgr_01(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac);
                ad3a.FillBy_koresp_01(MyData.DataSetKlonsRep.ROps3a, startDate, endDate, ac);
                break;

            case 6:
            case 7:
            case 8:
                ad1a.FillBy_koresp_11_clid(MyData.DataSetKlonsRep.ROps1a, startDate, endDate, ac, clid);
                ad2a.FillBy_apgr_01_clid(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac, clid);
                ad3a.FillBy_koresp_01_clid(MyData.DataSetKlonsRep.ROps3a, startDate, endDate, ac, clid);
                break;

            case 9:
                ad1a.FillBy_koresp_11_clid(MyData.DataSetKlonsRep.ROps1a, startDate, endDate, ac, clid);
                ad2a.FillBy_apgr_02_clid(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac, clid);
                ad3a.FillBy_koresp_02_clid(MyData.DataSetKlonsRep.ROps3a, startDate, endDate, ac, clid);
                break;

            case 4:
            case 10:
                ad1a.FillBy_koresp_11(MyData.DataSetKlonsRep.ROps1a, startDate, endDate, ac);
                ad2a.FillBy_apgr_02_clid(MyData.DataSetKlonsRep.ROps2a, startDate, endDate, ac, null);
                ad3a.FillBy_koresp_02_clid(MyData.DataSetKlonsRep.ROps3a, startDate, endDate, ac, null);
                break;
            }


            MyData.ReportHelper.PrepareRops1a();
            MyData.ReportHelper.PrepareRops2a();
            MyData.ReportHelper.PrepareRops2aRAC();

            rd.AddReportParameters(
                new string[]
            {
                "RSD", startDateStr,
                "RED", endDateStr,
                "RAC", cbAC.Text,
                "RACNM", lbACName.Text,
                "CompanyName", MyData.Params.CompNameX,
                "RPER", MyData.Params.RPER,
                "RPERNM", lbClName.Text,
                "PAC", null,
                "PCLID", null,
                "RCURRENCY", ""
            });


            switch (lbCm.SelectedIndex)
            {
            case 0:
                rd.FileName = "Report_Koresp_1";
                break;

            case 1:
                rd.FileName = "Report_Koresp_2";
                break;

            case 2:
                rd.FileName = "Report_Koresp_1_full";
                break;

            case 5:
                rd.FileName = "Report_Koresp_3";
                break;

            case 3:
                rdsub          = rd;
                rdsub.FileName = "Report_Koresp_1";
                rdsub.AddSubreportLink("DataSet1", "PAC", "Ac1");
                rdsub.AddSubreportLink("DataSet_2a", "PAC", "AC");
                rdsub.AddSubreportLink("DataSet_3a", "PAC", "Ac1");

                rd = new ReportViewerData();
                rd.Sources["DataSet_2a"] = MyData.DataSetKlonsRep.ROps2a;
                rd.FileName = "Report_Koresp_1_byac";
                rd.SubReports[rdsub.FileName] = rdsub;
                rd.AddReportParameters(
                    new string[]
                {
                    "RSD", startDateStr,
                    "RED", endDateStr,
                    "RAC", cbAC.Text,
                    "RACNM", lbACName.Text,
                    "CompanyName", MyData.Params.CompNameX,
                    "RPER", MyData.Params.RPER,
                    "RPERNM", lbClName.Text,
                    "RCURRENCY", ""
                });
                break;

            case 4:
                rdsub          = rd;
                rdsub.FileName = "Report_Koresp_1";
                rdsub.AddSubreportLink("DataSet1", "PAC", "Ac1", "PCLID", "Clid");
                rdsub.AddSubreportLink("DataSet_2a", "PAC", "AC", "PCLID", "Clid");
                rdsub.AddSubreportLink("DataSet_3a", "PAC", "Ac1", "PCLID", "Clid");

                rd = new ReportViewerData();
                rd.Sources["DataSet_2a"] = MyData.DataSetKlonsRep.ROps2a;
                rd.FileName = "Report_Koresp_1_byacnadcl";
                rd.SubReports[rdsub.FileName] = rdsub;
                rd.AddReportParameters(
                    new string[]
                {
                    "RSD", startDateStr,
                    "RED", endDateStr,
                    "RAC", cbAC.Text,
                    "RACNM", lbACName.Text,
                    "CompanyName", MyData.Params.CompNameX,
                    "RPER", "",
                    "RPERNM", "",
                    "RCURRENCY", ""
                });
                break;
            }

            MyMainForm.ShowReport(rd);
        }