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();
    }

}