Fetching Financial Dimension Value X++

static void Fetching_Financial_Dimension_Value(Args _args)

{

    PurchTable                          _purchTable;  

    DimensionAttributeValueSetStorage   class_dimStorage;

    str                                 dimvalue;

   

    _purchTable = PurchTable::find('PO-000007');

    class_dimStorage = DimensionAttributeValueSetStorage::find(_purchTable.DefaultDimension);

   

    info(strFmt('Purchase Order PO-000007, Department : %1',  

  class_dimStorage.getDisplayValueByDimensionAttribute(DimensionAttribute::findByName('Department').RecId)));

 }

 

Read more...

void clicked()

void clicked()
{

    SrsReportRunController                  reportRunController;
    Map                                     queryContracts;
    MapEnumerator                           mapEnum;
    Query                                   query;
    QueryBuildRange                         range;

    SrsReportDataContract                   contract;
    TECSOContract                           rdpContract;
    //JournalNameId                           ScraptReworkJournalNameId;

    reportRunController = new SrsReportRunController();
    reportRunController.parmReportName(ssrsReportStr(TECJTCEDDSls04packingSlipSo ,Report));
    reportRunController.parmLoadFromSysLastValue(false);

    // Set printer settings (print to file, format, filename, etc).
    contract    = reportRunController.parmReportContract();
    rdpContract = contract.parmRdpContract() as TECSOContract;

    queryContracts = contract.parmQueryContracts();
    mapEnum = queryContracts.getEnumerator();

    while(mapEnum.moveNext())
    {
        query = mapEnum.currentValue();
        SysQuery::findOrCreateRange(query.dataSourceTable(tableNum(CustPackingSlipJour)),fieldNum(CustPackingSlipJour, recId)).value(queryValue(CustPackingSlipJour.RecId));
        reportRunController.runReport();
    }
    //super();

    super();
}

Read more...

While Select forupdate from 2 different Table AX

static void forupdate(Args _args)
{
    InventTable             _inventTable;
    InventItemGroupItem     _inventItemGroupItem;   
    ItemGroupId             _ItemGroupId = _inventItemGroupItem.ItemGroupId ;   
   
   
    ttsBegin;
    while select forUpdate _inventTable
        exists join _inventItemGroupItem
            where _inventItemGroupItem.ItemGroupId == "WIP" && _inventTable.TECIsOverideInvTransParam == NoYescombo::Yes
    {
        _inventTable.TECIsOverideInvTransParam = NoYesCombo::No;
        _InventTable.update();
    } 
    ttsCommit;
   

}

Regards,
Tyo

Read more...