Multiple If Expression di SSRS

Tutorial if expression di SSRS.

contoh single if di SSRS :

IIF(kondisi parameter, "TRUE","FALSE")

IIF(Fields!Nolines.Value >= 10,"Gede","Kecil")

untuk multiple, return FALSE diisi untuk expressi selanjutnya sampai selesai.

contoh multiple if di SSRS :

=IIF(Fields!Nolines.Value = 1,"Januari",

IIF(Fields!Nolines.Value = 2,"Februari",

IIF(Fields!Nolines.Value = 3,"Maret",

IIF(Fields!Nolines.Value = 4,"April",

IIF(Fields!Nolines.Value = 5,"Mei",

IIF(Fields!Nolines.Value = 6,"Juni",

IIF(Fields!Nolines.Value = 7,"Juli",

IIF(Fields!Nolines.Value = 8,"Agustus",

IIF(Fields!Nolines.Value = 9,"September",

IIF(Fields!Nolines.Value = 10,"Oktober",

IIF(Fields!Nolines.Value = 11,"November",

IIF(Fields!Nolines.Value = 12,"Desember",""))))))))))))

SSRS dengan multiple design

Salah satu cara untuk memanggil multiple design pada SSRS.

Bisa dilakukan custom pada class Controller.

Controller.prePromptModifyContract

disini kita akan membaca lemparan dari mana record berasal.

contoh

protected void prePromptModifyContract()

{

    //add husna 20210907

    RsPcmFoodingPaymentTable                sectiontable;

    PSMSumEXFoodingHeader                   depttable;

    if (!contract)

    {

        contract = this.parmReportContract().parmRdpContract() as RS_HR_ExtraFoodingPaymReportContract;

    }

    //membaca lemparan parameter

    if(this.parmArgs().dataset() == tableNum("PSMSumEXFoodingHeader"))

    {

        depttable = this.parmArgs().record();

        contract.parmJournalIdDept(depttable.JournalId);

    }

    if(this.parmArgs().dataset() == tableNum("RsPcmFoodingPaymentTable"))

    {

        sectiontable = this.parmArgs().record();

        contract.parmJournalId(sectiontable.JournalId);

    }

    //contract.parmJournalId(data.JournalId); remark by husna 20210907

    super();

}

di Main method

public static void main(Args _args)

{

    RS_HR_ExtraFoodingPaymReportController  controller = new RS_HR_ExtraFoodingPaymReportController();

    SRSPrintDestinationSettings printSettings;

    ;

    if(_args.dataset() == tableNum("PSMSumEXFoodingHeader"))

    {

        controller.parmReportName(ssrsReportStr(RS_HR_ExtraFoodingPaymReport, DesignDept));

        controller.parmArgs(_args);

        printSettings = controller.parmReportContract().parmPrintSettings();

    }

    if(_args.dataset() == tableNum("RsPcmFoodingPaymentTable"))

    {

        controller.parmReportName(ssrsReportStr(RS_HR_ExtraFoodingPaymReport, Design));

        controller.parmArgs(_args);

        printSettings = controller.parmReportContract().parmPrintSettings();

    }

    //printSettings.printLandscape(true);

    controller.parmShowDialog(false);

    controller.startOperation();

}

//preRunModifyContract x++ AX2012

AX restart setelah membuka sabuah form

Jadi kala itu saya ada development untuk menambahkan satu field ditable PurchAgreementheader.

Penambahan sudah completed dan bisa dipanggil/personalize untuk ditampilkan diform.

Tapi ternyata penambahan form tersebut tidak jadi dan saya delete field tersebut.

setelah compile dan restore selesai, ternyata form itu tidak bisa dibuka, aplikasi AX jadi restart setiap kali form itu dicoba untuk dibuka

sudah saya Synchronize, Full CIll, Restat AOS,Restart service SQL ttp tidak berhasil.

Case ini bisa solved dengan cara menghapus semua chahe memory yang ada diuser AX anda.

Klik FIle>Tools>Option> pilih Usage data dan reset semua setingan anda.

Selamat mencoba

Tempuri

SrsReportViewer|AxReportViewer_RefreshComplete

Tidak bisa Deploy SSRS

A.              The deployment was aborted. You do not have privileges to deploy to server: . For deployment, you must have administrative rights to the SQL Server Reporting Services (SSRS) server. Contact your administrator to deploy.

Go to SSRS Server > Services > Hidupkan Remote Registry

Mengaktifkan tombol di Docuview

https://community.dynamics.com/ax/f/microsoft-dynamics-ax-forum/188370/how-to-enable-disable-delete-button-in-the-attachment-document-handling-based-on-enum-status/474532

Hi,

please have a look inside DocuView form, doReSearch method, around line number 160 and below. Hopefully you will see that there is already some code there that sets variable called 'allowEditBasedOnActualForm'.

In my installation there is even some code for Norway, which checks the calling table and sets the variable based on some fields - looks like exactly what you need ?

   if (SysCountryRegionCode::isLegalEntityInCountryRegion([#isoNO]) &&

      (testCursor.TableId == tablenum(CustInvoiceJour) || testCursor.TableId == tablenum(ProjInvoiceJour)))

   {

       switch (testCursor.TableId)

       {

           case tablenum(CustInvoiceJour):

               custTable = CustTable::find(CustInvoiceJour::findRecId(testCursor.RecId).InvoiceAccount, false);

               break;

           case tablenum(ProjInvoiceJour):

               custTable = CustTable::find(ProjInvoiceJour::findRecId(testCursor.RecId).InvoiceAccount, false);

               break;

       }

       if (custTable.EInvoice)

       {

           allowEditBasedOnActualForm = true;

       }

   }

Thanks,

Maciej

Mendefinisikan value dengan tipe data UTCDateTime

cara mendefinisikan value konstanta untuk tipe data UTCDateTime

tanggal 10 April 2021 jam 20:30:00

maka

UTCDateTime            jammakan;

;

jammakan = 2021-04-10T20:30:00

dan Bagaimana cara mendefinisikan UTCDateTime sama dengan Null ?

bisa dengan menggunakan method utcDateTimeNull();

contoh :

static void TestQueryBurndatetime(Args _args)

{

    RSPcmBlock              rspcmblok;

    RSPcmBlock              rspcmblokupdate;

    ;

    

    while select * from rspcmblok

        where rspcmblok.BurnedAreaDateTime >= 2019-04-07T00:00:00

        && rspcmblok.BurnedAreaDateTime <= 2019-04-07T11:59:00

    {

        info(strFmt("%1",rspcmblok.BlockId));

        select forUpdate rspcmblokupdate

        where rspcmblokupdate.BlockId == rspcmblok.BlockId;

        ttsBegin;

            rspcmblokupdate.BurnedAreaDateTime = utcDateTimeNull();

            rspcmblokupdate.update();

        ttsCommit;

    }

}

https://dynamicsaxposed.wordpress.com/tag/utcdatetime-blank-date/

https://stoneridgesoftware.com/dynamics-ax-all-about-dates-and-x/

Export data to Excel via x++

https://visvashwalia.blogspot.com/2016/10/export-data-to-excel-from-microsoft.html?showComment=1618198356552#c3486349219749749881

Jadi kita sedang mencoba untuk code2 baru teruatam bagaimana export data to excel melalui x++.

dipostingan yang lama saya menggunakan ax2009.

sekarang kita akan menggunakan ax2012

static void ExportDatatoExcel(Args _args)

{

    SysExcelApplication            sysExcelApplication;

    SysExcelWorkbooks              excelWorkbookCollection;

    SysExcelWorkbook               excelWorkbook;

    SysExcelWorksheets             excelWorksheetCollection;

    SysExcelWorksheet              excelWorksheet;

    int                            i =1;

    str                            filename;

    vendTable                      vendTable;

    

    PSMRekapbayarsupplier          CustTableSelected; 

    ;

    // give the file name and save it to c drive

     filename = "C:\\A_Folder\\" + "ItemDetails5" +".xls";

    //"C:\\A_Folder\\" + "ItemDetails" + ".csv";

    // initlize the SysExcelApplication instance

    sysExcelApplication  = SysExcelApplication::construct();

    //create excel workbook and excel worksheet

    excelWorkbookCollection  = sysExcelApplication.workbooks();

    excelWorkbook    = excelWorkbookCollection.add();

    excelWorksheetCollection = excelWorkbook.worksheets();

    excelWorksheet = excelWorksheetCollection.itemFromNum(1);

    // excel column captions

    excelWorksheet.cells().item(i,1).value("Supplier");

    excelWorksheet.cells().item(i,2).value("Atas nama");

    excelWorksheet.cells().item(i,3).value("Bank");

    excelWorksheet.cells().item(i,4).value("No.Rek");

    excelWorksheet.cells().item(i,5).value("Total (Rp)");

    excelWorksheet.cells().item(i,6).value("Biaya transfer(Rp)");

    excelWorksheet.cells().item(i,7).value("Total (Rp)");

    

    i++;

    // fill the excel with vendtable Fields

    while select CustTableSelected

        where CustTableSelected.PSMJournalcashier == "GL21000556"

    {

        //if(i == 50)

         //break;

        excelWorksheet.cells().item(i,1).value(CustTableSelected.PSMName);

        excelWorksheet.cells().item(i,2).value(CustTableSelected.PSMName);

        excelWorksheet.cells().item(i,3).value(CustTableSelected.PSMToBankAccountname);

        excelWorksheet.cells().item(i,4).value(CustTableSelected.PSMToBankAccount);

        excelWorksheet.cells().item(i,5).value(num2str(CustTableSelected.PSMNominal,2,2,2,1));

        excelWorksheet.cells().item(i,6).value(CustTableSelected.PSMPaymFeeAmount);

        excelWorksheet.cells().item(i,7).value(CustTableSelected.PSMNominal+CustTableSelected.PSMPaymFeeAmount);

        

        i++;

    }

    //check the fileName is already exist

     if(WinAPI::fileExists(filename))

         WinAPI::deleteFile(filename);

     // save excel file

     excelWorkbook.saveAs(filename);

    // open excel file

    sysExcelApplication.visible(true);

    // close excel file

 // sysExcelApplication.quit();

}

coba lihat di bagian 

excelWorksheet.cells().item(i,5).value(num2str(CustTableSelected.PSMNominal,2,2,2,1));

excelWorksheet.cells().item(i,6).value(CustTableSelected.PSMPaymFeeAmount);

cell no 5 saya kenakan num2str

cell no 6 tidak.

hasil dari cell no 5 adalah nilai amount lengkap dengan separator decimalnya

sedangkan no 6 tidak ada separator dan decimal. sehingga seperti deret angka biasa.

Convert Amount to String

Hi Guys,

to do this dynamically, here is a solution:

System.Double netDouble;

anytype r1 = 1.125;

str s1;

netDouble = Global::real2double(r1);

s1 = netDouble.ToString();

info(strFmt("%1",s1));

https://community.dynamics.com/ax/f/microsoft-dynamics-ax-forum/73896/convert-amount-money-to-string

Menambah/menampilkan icon untuk mengetahui suatu line ada attachmentnnya

display smmDocIconNum showDocHandIcon()

{

    #macrolib.resource

    ;

    if ((select firstonly docuRef where docuRef.RefCompanyId  == this.DataAreaId && docuRef.RefTableId == this.TableId && docuRef.RefRecId == this.RecId).RecId)

    {

        return #RES_NODE_DOC;

    }

    return #RES_AM_NEW;

}

https://dynamicsuser.net/ax/f/users/70109/how-to-know-that-document-attached-or-not

Membuat string sql statement dan mengeksekusinya

Masih inget dengan programming diJava?... 

Bagaimana kita mengquery data dalam sebuah table?.

kita akan mendefinisikan Sql statmentnnya dalam sebuah string.

string        sqlstmt;

;

sqlstmt = "Select * from Mahasiswa";

atau

String     namatable;

String     sqlstmt;

;

namatable = "Mahasiswa";

sqlstmt = "Select * from "+namatable;

conn.execute(sqlstmt) //begitu kalo ga salah kalo diJava :D

Sekarang kita akan melakukannya di AX dengan bahasa x++

dengan menggunakan class

> Connection

> Statement

void Sample_1(void)

{
Connection Con = new Connection();
Statement Stmt = Con.createStatement();
ResultSet R =Stmt.executeQuery(‘SELECT VALUE FROM SQLSYSTEMVARIABLES’);

while ( R.next() )
{
print R.getString(1);
}
}

https://msdax.wordpress.com/2010/06/21/executing-sql-directly-from-x/

Menambahkan file .dll untuk bisa dikenali AX

Tempatkan file .dll di alamat directory 

C:\Program Files\Microsoft Dynamics AX\60\Server\<aosname>\bin

https://community.dynamics.com/ax/f/microsoft-dynamics-ax-forum/153699/adding-a-dll-to-ax-in-server-and-refer-it-in-code?pifragment-96834=1

Memutus proses Workflow diAX

Relasi antara

WorkflowTrackingstatusTable dengan WorkflowWorkItemTable

WorkflowTrackingstatusTable.CorelationId <> WorkflowWorkItemTable.CorelationId

Kita akan mengupdate worklfow yang masih berjalan menjadi seolah2 sudah selesai.

Pertama masuk ke View detail menuitemnya.

lalu lihat dan klik kanan>record info pada lines informasi status workflow maka didapat RecId dari WorkflowTrackingstatusTable.

Step pertama : membuat status WFnya = "Completed"

> setelah itu dapatkan WorkflowTrackingstatusTable.CorelationId based on WorkflowTrackingstatusTable.recId. 

> rubah statusnya menjadi "Completed".

Step kedua : delete WorkItem/user yang salah alamat

> dengan value WorkflowTrackingstatusTable.CorelationId dapatkan record2 workitem pada table WorkflowWorkItemTable dengan cara query relasi antara :

WorkflowTrackingstatusTable.CorelationId <> WorkflowWorkItemTable.CorelationId.

> pilih User user ID yang akan didelete recordnya.

Step ketiga : rubah status dokumen menjadi "Approved"