zoukankan      html  css  js  c++  java
  • Crystal Report in AX

        COM  com = new COM("CrystalRuntime.Application");
        COM  report = new COM("CrystalRuntime.Report");
        str  pathfile = "F:\\CrystalReport1.rpt";
        ;

       

        report = com.OpenReport(pathfile, 1);
        CrystalReport.ReportSource(report);
        CrystalReport.ViewReport();

    void ViewCrystalReport()
    {
        Com comapp;
        Com reporting;
        str paramwhole;
        str paramfilename;
        str paramCond;
        str ViewYesNo;
        int ret;
        COMVariant variant;

        ;

        variant = new COMvariant(COMVariantInOut::OUT,COMVariantType::VT_BOOL) ;
        paramwhole = this.args().parm();
        comapp = new COM("CrystalRuntime.Application.11");

        ret = strfind(paramwhole,"|",2,strlen(paramwhole));

        paramfilename = substr(paramwhole,2,ret-2) ;
        ViewYesNo = substr(paramwhole,1,1);
        reporting = comapp.openreport(paramfilename);
        reporting.discardsaveddata();
        reporting.readrecords();

        paramcond = substr(paramwhole,ret+1,strlen(paramwhole));

        reporting.RecordSelectionFormula(paramCond);

        if(ViewYesNo == 'N')
        {
            variant.boolean(false);
            reporting.PrintOut(variant);
        }
        else
        {
            ActiveX.ReportSource(reporting);
            ActiveX.width(1200);
            ActiveX.height(750);
            ActiveX.DisplayToolbar(true);
            ActiveX.DisplayGroupTree(false);
            ActiveX.Refresh();
            ActiveX.ViewReport();
            ActiveX.Refresh();
        }


    }

  • 相关阅读:
    qemu -net tap配置上网
    qemu所支持的网卡
    linux fdisk
    linux dd命令
    busybox inittab
    busybox相关的工具
    mongoDB全文索引
    MySql 内存表使用
    oracle数据迁移到mysql
    centOS下安装mysql workbench详细步骤
  • 原文地址:https://www.cnblogs.com/lingdanglfw/p/1296827.html
Copyright © 2011-2022 走看看