Skip to main content

Purchline Change confirmed date Axapta

void clicked()
{
  PurchLine                 tmpPurchLine;
  PurchLine                 updatePurchLine;
  PurchLine                 selectedRecord;

  Dialog            dl;
  DialogField       dlfTransdate;
;

    dl  = new Dialog("Change confirmed date");
    dlfTransdate = dl.addFieldValue(typeid("Transdate"),today(),"Confirmed date");
    if(dl.run()){
        selectedRecord =  PurchLine_ds.cursor();
        for (tmpPurchLine = PurchLine_ds.getFirst(true) ? PurchLine_ds.getFirst(true) : PurchLine_ds.cursor();
        tmpPurchLine;    tmpPurchLine = PurchLine_ds.getnext())
        {
            ttsbegin;
            SELECT FORUPDATE updatePurchLine
             WHERE updatePurchLine.PurchId == tmpPurchLine.PurchId
                && updatePurchLine.VendAccount == tmpPurchLine.VendAccount
                && updatePurchLine.LineNum == tmpPurchLine.LineNum
                && updatePurchLine.ItemId == tmpPurchLine.ItemId;
            updatePurchLine.ConfirmedDlv = dlfTransdate.value();
            updatePurchLine.update();
            ttscommit;
        }
        PurchLine_ds.reread();
        PurchLine_ds.research();
        PurchLine_ds.findRecord(selectedRecord);
    }
    super();
}

Popular posts from this blog

Dynamics Axapta: Sales Orders & Business Connector

Well, again folllowing my same idea of writting close to nothing and pasting code, I'll paste in some code to create a sales order from some basic data and the invoice it. I'll try to explain more in the future. AxaptaObject axSalesTable = ax.CreateAxaptaObject("AxSalesTable"); AxaptaRecord rcInventDim = ax.CreateAxaptaRecord("InventDim"); AxaptaRecord rcCustTable = ax.CreateAxaptaRecord("CustTable"); rcCustTable.ExecuteStmt("select * from %1 where %1.AccountNum == '" + MySalesOrderObject.CustAccount + "'"); if (MySalesOrderObject.CurrencyCode.Trim().Length == 0) MySalesOrderObject.CurrencyCode = rcCustTable.get_Field("Currency").ToString().Trim(); string sTaxGroup = rcCustTable.get_Field("taxgroup").ToString().Trim(); //set header level fields axSalesTable.Call("parmSalesName", MySalesOrderObject.SalesName.Trim()); axSalesTable.Call("parmCustAccount", M

Passing values between form and class

Class name is EmplDuplication and Form is EmplTable . void clicked() {    MenuFunction mf;    args args = new Args();    ;     args.record(EmplTable);     mf = new menufunction(identifierstr(EmplDuplication), MenuItemType::Action); mf.run(args); } Meanwhile, in the main() method of the EmplDuplication class, we need to put this Axapta x++ code to get the datasource: static void main(Args args) {     EmplDuplication EmplDuplication; EmplTable localEmplTable; ;     if(args.record().TableId == tablenum(EmplTable)) localEmplTable = args.record();     ... }