Author Archive

Ax’ta yeni bir iş akışı ataması oluştuğunda aynı kullanıcının bu iş akışı için daha önce onayı var mı tespit etmek

Merhaba

İş akışında yeni bir atama oluştuğunda atanan kişinin aynı iş akışında daha önce onayı var mı diye kontrol etmek için aşağıdaki metodu kullanabilirsiniz. Bu metodu WorkflowTrackingTable’ a yazdım ama farklı bir yere de yazılabilir. İş akışı altyapısı biraz karışık standart yapıyı değiştirirken dikkatli olmakta fayda var.


Boolean dmrExistApprove()
{
    boolean ret = false;

    WorkflowTrackingStatusTable     workflowTrackingStatus;
    WorkflowTrackingStatusTable     workflowTrackingStatusExist;
    WorkflowTrackingTable           workflowTrackingTable;
    ;

    workflowTrackingStatusExist = WorkflowTrackingStatusTable::findRecId(this.WorkflowTrackingStatusTable);

    select firstOnly RecId, User from workflowTrackingTable
    exists join workflowTrackingStatus
    where  workflowTrackingTable.WorkflowTrackingStatusTable == workflowTrackingStatus.RecId
        && workflowTrackingTable.TrackingType       == WorkflowTrackingType::Approval
        && workflowTrackingTable.User               == this.User
        && workflowTrackingTable.RecId              != this.RecId
        && workflowTrackingStatus.ContextRecId      == workflowTrackingStatusExist.ContextRecId
        && workflowTrackingStatus.InstanceNumber    == workflowTrackingStatusExist.InstanceNumber
        && workflowTrackingStatus.ContextTableId    == workflowTrackingStatusExist.ContextTableId
        && workflowTrackingStatus.TrackingStatus    != WorkflowTrackingStatus::Cancelled ;

    if(workflowTrackingTable.recid)
    {
        ret = true;
    }

    return ret;
}

Selamlar.

İş akışı onayını koddan yapmak

Merhaba

Ax2012′de iş akışını onaylamak için aşağıdaki örnek kodu kullanabilirsiniz.


static void FD_WorkflowWorkItemTable(Args _args)
{

    WorkflowWorkItemTable WorkflowWorkItemTable;
    ;

    WorkflowWorkItemTable = WorkflowWorkItemTable::findRecId(123434343);

    if(WorkflowWorkItemTable)
    {
        ttsBegin;
        WorkflowWorkItemActionManager::dispatchWorkItemAction(
           WorkflowWorkItemTable, // Work item record for which the action is being taken
           strFmt("Auto Approve by %1 ", curUserId() ), // Comment associated with this action
           curUserId(), //The target user of the action
           WorkflowWorkItemActionType::Complete,//The work item action type to take
           "PurchTableApprovalApprove", // The name of the menu item from which the action originated
           false // Flag denoting if this request originated from web or rich client
           );

        ttsCommit;
    }
}

Selamlar.

Yazılım uzamanı iş ilanı

Merhaba ,

Dmr’de birlikte çalışmak için yazılım uzmanı arayışımız var. İlana buradan ulaşabilirsiniz. İlgelenenler benimle iletişime geçebilirler.

Selamlar.

Satınalma talep konsolidasyonu (PurchReqConsolidation) formu performans sorunu

Merhaba,

Bir müşterimizde Satınalma talep konsolidasyonu formu çok geç açılıyordu. Öncelikle sorunun ne olduğunu anlamadım. Formun veri kaynağında yavaşlığa sebep olacak bir tablo yoktu. Indexler düzgün bağlantılarda sorun yok. Formun açılışına yazılmış bir kod yok. Bir süre inceledikten sonra Partları gördüm. Partların kodunu inceleyince sorunu hemen tespit ettim.

public void linkActive()
{
    PurchReqConsolidationLine   purchReqConsolidationLine;
    PurchReqLine                purchReqLine;

    purchReqConsolidation = element.args().record();

    super();

    delete_from purchReqTmpConsolidationPart;

    while select purchReqConsolidationLine
    {
        purchReqLine = PurchReqLine::find(purchReqConsolidationLine.PurchReqLineID);

        purchReqTmpConsolidationPart.PurchReqConsolidationLine = purchReqConsolidationLine.RecId;
        purchReqTmpConsolidationPart.PurchReqConsolidationID   = purchReqConsolidationLine.PurchReqConsolidationId;
        purchReqTmpConsolidationPart.AmountBeforeConsolidation = purchReqConsolidationLine.calcAmountBeforeConsolidation();
        purchReqTmpConsolidationPart.AmountAfterConsolidation  = purchReqConsolidationLine.calcAmountAfterConsolidation();
        purchReqTmpConsolidationPart.VendAccount               = purchReqConsolidationLine.NewVendor;
        purchReqTmpConsolidationPart.setDataAreaForModifiedField(fieldNum(PurchReqTmpConsolidationPart, VendAccount), purchReqLine.buyingLegalEntity2DataArea());
        purchReqTmpConsolidationPart.CurrencyCode              = purchReqLine.CurrencyCode;
        purchReqTmpConsolidationPart.doInsert();
    }

    this.executeQuery();
    this.research();
}

Part formlarından biri olan PurchReqConsolidationPartByVendor formunun LinkActive metoduna yazılan koddaki temel hatayı hemen anlamışsınızdır. join yazılması gereken yerde find kullanılmış. Partları aktif olarak kullanmadığı için bu formdan kaldırıp formun çok daha hızlı açılmasını sağladım.

Daha vahim bir durum Satınalma talep konsolidasyonu formundan bir buton ile açılan PurchReqConsolidationAddLine formunda vardı.

PurchReqConsolidationAddLine Formunun PurchReqLine veri kaynağının init metodunda aşağıdaki kod mevcut.

public void init()
{
    PurchReqLine            tmpPurchReqLine;
    PurchReqTable           tmpPurchReqTable;
    QueryBuildRange         qbr;

    super();

    qbr = purchReqLine_ds.query().dataSourceTable(tableNum(PurchReqLine)).addRange(fieldNum(PurchReqLine,RequisitionPurpose));
    qbr.value(SysQuery::value(RequisitionPurpose::Consumption));
    qbr.status(RangeStatus::Locked);

    qbr = purchReqLine_ds.query().dataSourceTable(tableNum(PurchReqLine)).addRange(fieldNum(PurchReqLine,PurchLineCreated));
    qbr.value(SysQuery::value(NoYes::No));
    qbr.status(RangeStatus::Locked);

    qbr = purchReqLine_ds.query().dataSourceTable(tableNum(PurchReqLine)).addRange(fieldNum(PurchReqLine,RequisitionStatus));
    qbr.value(queryValue(PurchReqRequisitionStatus::Approved));
    qbr.status(RangeStatus::Locked);

    purchReqLine.setTmp();

    while select tmpPurchReqLine
            join RecId, SourceDocumentHeader   from tmpPurchReqTable
           where tmpPurchReqLine.PurchReqTable            == tmpPurchReqTable.RecId   &&
                 tmpPurchReqLine.IsPreEncumbranceRequired != UnknownNoYes::Unknown
    {
        if (PurchReqPurchaseOrderGenerationRule::canConsolidateStatic(tmpPurchReqLine) &&
            !PurchReqConsolidationLine::findByReqLineId(tmpPurchReqLine.RecId))
        {
            purchReqLine.data(tmpPurchReqLine.data());

            // Since tempory table will overwrite the RecId value, so assign RecId into an unused field
            purchReqLine.AddressRefRecId = tmpPurchReqLine.RecId;

            purchReqLine.doInsert();
        }
    }
}

PurchReqConsolidationLine join yerine if ile kontrol edildiği için bu formun açılması da dakikalar sürüyordu. Kodu aşağıdaki hale çevirince saniyeler içinde açılmaya başladı.

public void init()
{
    PurchReqLine            tmpPurchReqLine;
    PurchReqTable           tmpPurchReqTable;
    purchReqConsolidationLine purchReqConsolidationLine;
    QueryBuildRange         qbr;

    super();

    qbr = purchReqLine_ds.query().dataSourceTable(tableNum(PurchReqLine)).addRange(fieldNum(PurchReqLine,RequisitionPurpose));
    qbr.value(SysQuery::value(RequisitionPurpose::Consumption));
    qbr.status(RangeStatus::Locked);

    qbr = purchReqLine_ds.query().dataSourceTable(tableNum(PurchReqLine)).addRange(fieldNum(PurchReqLine,PurchLineCreated));
    qbr.value(SysQuery::value(NoYes::No));
    qbr.status(RangeStatus::Locked);

    qbr = purchReqLine_ds.query().dataSourceTable(tableNum(PurchReqLine)).addRange(fieldNum(PurchReqLine,RequisitionStatus));
    qbr.value(queryValue(PurchReqRequisitionStatus::Approved));
    qbr.status(RangeStatus::Locked);
    purchReqLine.setTmp();

    while select tmpPurchReqLine
            join RecId, SourceDocumentHeader   from tmpPurchReqTable
           where tmpPurchReqLine.PurchReqTable            == tmpPurchReqTable.RecId   &&
                 tmpPurchReqLine.IsPreEncumbranceRequired != UnknownNoYes::Unknown
        // Dmr FD -->
        notExists join purchReqConsolidationLine
            where tmpPurchReqLine.RecId ==  purchReqConsolidationLine.PurchReqLineID
        // Dmr FD <--

    {
        // Dmr FD -->
        //if (PurchReqPurchaseOrderGenerationRule::canConsolidateStatic(tmpPurchReqLine) &&
           // !PurchReqConsolidationLine::findByReqLineId(tmpPurchReqLine.RecId))
        if (PurchReqPurchaseOrderGenerationRule::canConsolidateStatic(tmpPurchReqLine) )
        // Dmr FD <--
        {
            purchReqLine.data(tmpPurchReqLine.data());

            // Since tempory table will overwrite the RecId value, so assign RecId into an unused field
            purchReqLine.AddressRefRecId = tmpPurchReqLine.RecId;

            purchReqLine.doInsert();
        }
    }
}

İki kod arasındaki farkı şöyle özetleyebilirim. İlk hali bütün PurchReqLine ları dolanıp PurchReqConsolidationLine da olmayanlar için temp kayıt oluşturur.
İkinci hali ise NotExists join ile bağlandığı için zaten sadece PurchReqConsolidationLine olmayan PurchReqLine ları getirecektir. Dolayısıyla çok daha hızlı olacaktır.

Performans ERP yazılımında belkide en çok dikkat edilmesi gereken konulardan biri. Yazdığımız her kodun birilerinin günlük hayatı olduğunu anlayıp mümkün olduğunda performanslı olmasına dikkat etmek gerekiyor. Gördüğünüz gibi çok basit dokunuşlarla çok büyük kazanımlar elde edebiliyorsunuz. Burada standart kodda böyle bir hatayla karşılaşmak beni şaşırttı. Genelde Standart kod çok kalitelidir ama bazen böyle gözden kaçan kodlar da olabiliyor.

Selamlar.

Muhasebe günlük satırlarından bir alanı tedarikçi açık hareketlerine taşımak

Merhaba

Muhasebe günlük satırlarından (LedgerJournalTrans) bir alanı Tedarikçi hareketlerine (VendTrans) ve Tedarikçi açık hareketlerine (VendTransOpen) taşımak için aşağıdaki adımları takip edebilirsiniz.

  1. LedgerJournalTrans.DmrWfId taşımak istediğimiz alan.
  2. VendTrans, VendTransOpen tablolarına ve  CustVendTrans mapine DmrWfId alanı açılır.
  3. LedgerJournalTransDaily formuna DmrWfId alanı eklenip veri girilmesi sağlanır.
  4. VendVoucher clasının post() metoduna  _vendTrans.DmrWfId   =  ledgerJournalTrans.DmrWfId; satırı eklenir.
  5. VendVoucherJournal clasının initCustVendTrans() metoduna vendTrans.DmrWfId = ledgerJournalTrans.DmrWfId; satırı eklenir.
  6. VendVoucher clasının createTransOpen() metoduna  vendTransOpen.DmrWfId  = _custVendTrans.DmrWfId; satırı eklenir.

Bu adımlarla DmrWfId alanını istediğimiz tablolara taşımış olduk.

Selamlar.

CIL Derleme sistematiği

Merhaba

Çok sık karşılaştığım bir sorun var. CIL derlenememesi ve buna bağlı olarak SSRS, Küp ve servislerin çalışmaması.  CIL sorunu çözmek için aşağıdaki adımları uygularsanız büyük oranda sorununuz çözülecektir.

  1. Bütün AOS’ları durdurun.
  2. c:\Program Files\Microsoft Dynamics AX\60\Server\InstanceName\bin\XppIL klasörünü silin. (Silmek uzun sürebiliyor klasörün adını değiştirip yedek almak daha mantıklı)
  3. Model veritabanındaki SysXppAssembly tablosunun bütün kayıtlarını silin.
  4. İşlem yapılacak AOS’u açın.
  5. Paralel derleme ile işlem yapılacak AOS’u derleyin. Paralel derleme için bakınız.
  6. C:\Program Files\Microsoft Dynamics AX\60\Server\DynamicsAX_Live\Log\AxCompalieAll.html dosyasından hataları kontrol edin. Tablo, Class ve güvenlik nesnelerinde hata olmamalı. Form ve job lardaki hatalar CIL için önemli değil.
  7. AOS’u yeniden başlatın.
  8. Ful CIL derleyin.
  9. Diğer AOS’larin XppIL klasörlerini silin.
  10. Diğer AOS ları başlatın.

CIL hatası hala devam ediyorsa Google veya tecrübesinde istifade edeceğiniz birine danışın :)

Selamlar.

Ax2012 Paralel derleme

Merhaba

Bazı durumlarda Ax komple derleme ihtiyacı oluyor. Bu durumda AOT’yi açıp tümünü derlemeye kalkarsanız çok uzun sürdüğünü görürsünüz. Bunu yerine Command Prompt’tan paralel derleme yapabilirsiniz. Sunucuya bağlı olarak 30 ile 50 dakika arasında derleme işlemi bitecektir.

Paralel derleme için öncelikle Command Prompt’u açıp aşağıdaki klasöre geçmelisiniz. Bu işlemi ASO’un kurulu olduğu sunucuda yapmalısınız. Kuruluma göre klasör değişebilir.

cd “C:\Program Files\Microsoft Dynamics AX\60\Server\DynamicsAX_Live\bin”

Daha sonra aşağıdaki kodu çalıştırmalısınız.

axbuild.exe xppcompileall /s=01 /altbin=”C:\Program Files (x86)\Microsoft Dynamics AX\60\Client\Bin” /workers=12

S=01  AOS numarasıdır sizde farklı olabilir. Server Configuration Utility’den bakabilirsiniz.

Worker=12 kaç işlemin aynı anda çalışacağını gösterir. Kendi sunucunuzdaki  işlemcilere göre göre değiştirebilirsiniz.

Selamlar.

AutoRefreshData property on buttons AX2012

Merhaba,

Ax gerçekten bir çok ayrıntıya sahip. Özellikle nesnelerin özelliklerinde aktif olarak kullanmadığımız bir çok yenilik mevcut. AutoRefreshData özelliği de bunlardan biri.

Yaptığım bir geliştirmede ListePage formunda durum değiştiren bir sınıf yaptım. Bildiğiniz gibi ListPage formlara kod yazamıyoruz. Bu sınıf ListePage’teki satırın durum alanını değiştiriyor. Bu değişikliği yaptıktan sonra formu yenilemem gerekiyordu. Bunu yapmak için args üzerinde DateSource alıp üzerinden Refresh çalıştırmak gerekiyor ama güzel bir yöntem değil. Bunun daha kolay bir çözümü olmalı derken buton üzerindeki AutoRefreshData özelliğini gördüm. Bu özelliği true olarak ayarlağınızda aslında Table_DS.Research(True) metodunun yaptığı işi yapıyor. Bu sayede kod yazmadan griddeki veriyi güncelleniyor.

Selamlar.

How to get table field properties from X++

Hi,

Sometimes while development process you need to get table field properties. One of my customer i need to setup a structure which i have to get all the LedgerJournalTrans table fields names and properties .

In this example i loop all the fields except some system fields and  show names and some properties.


//Dmr Fatih Demirci
static void Dmr_FD_GetTableField(Args _args)
{
    SysDictTable    dictTable = new SysDictTable(tableNum(LedgerJournalTrans));
    SysDictField    dictField;
    TreeNode        treeNode;
    FieldId         fieldId   = dictTable.fieldNext(0);
    ;

    while (fieldId)
    {
        dictField = dictTable.fieldObject(fieldId);

        //Except Sql, System, visible fields
        if (   dictField.isSql()      && !dictField.isSystem()
            && dictField.allowEdit()  && dictField.allowEditOnCreate()
            && dictField.visible()    && !dictField.getCountryRegionCodes( ) )
        {
            treeNode = dictField.treeNode();

            info(strFmt("%1-%2-%3-%4",  dictField.id(),
                                        dictField.name() ,
                                        dictField.label(),
                                        dictField.baseType()  ));
        }

        fieldId = dictTable.fieldNext(fieldId);
    }
}

Info:

Happy Daxing.

Microsoft Dynamics AX Implementation Guide

Hi,

Yogesh Kasat  and Jilajeet Yadav  have come out with a wonderful book on handling Microsoft Dynamics AX Implementation Projects.The book describes about the basics of implementation, common errors, issues and some real life experiences about AX implementation projects. This book appeals to wide range of audience and is very useful guide for DAX implementations.

This is my second book that i reviewed recently on Dynamics AX. The first was Microsoft Dynamics AX 2012 R3 Cookbook. There are so many differences between reading and reviewing the book. Reviewing is thoroughly investigating the book. All codes should be run and all samples should be tested meticulously. Sometimes, same page should be reread to advise for required optimizations and improvements and to detect errors and bugs.

It has been so pleasant and improving activity to study on this comprehensive book. I am so thankful to Packt Publising, Yogesh Kasat  and Jilajeet Yadav, one by one, to find me appropriate for this review.

I wish them continued success.

Here is the page where the riviewers brief biography exists.

You can read the article on this book here on Posts By Yogesh Kasat on LinkedIn or Dynamics World.

The book is available to be bought on AmazonPackt Publishing, and other major places, both as an e-book or a hard copy.

Happy Daxing.

Page 3 of 25123451020...Last »

Türkiye'nin en doğru, dolu dolu ve hatasız anlatımları ile teknik yazılarına, makalelerine, video'larına, seminerlerine, forum sayfasına ve sektörün önde gelenlerine ulaşabileceğiniz teknik topluluğu, MSHOWTO