Archive for the ‘ x++ ’ Category

AX 2012′de muhasebe günlüğü oluşturmak

Merhaba

Ax 2012′de muhasebe günlüğü oluşturmak için iki tane sınıf var. AxLedgerJournalTable ve AxLedgerJournalTrans.

Bu sınıflar kullanılarak kolayca günlük oluşturulabilir.

Örneğin:

static void createLedgerJournal(Args _args)
{
AxLedgerJournalTable   ledgerJournalTable = new AxLedgerJournalTable();
AxLedgerJournalTrans   ledgerJournalTrans= new AxLedgerJournalTrans();
container                   ledgerDimensions, offsetDimensions;
;
ledgerJournalTable.parmJournalName("GenJrn");
ledgerJournalTable.save(); // LedgerJournalTable oluştu.

ledgerJournalTrans.parmAccountType(LedgerJournalACType::Ledger);
ledgerJournalTrans.parmJournalNum(ledgerJournalTable.ledgerJournalTable().JournalNum);
ledgerDimensions = ["Şirket Hesabı","110.100.10"];
ledgerJournalTrans.parmLedgerDimension(AxdDimensionUtil::getLedgerAccountId(ledgerDimensions));
ledgerJournalTrans.parmAmountCurDebit(1000);
offsetDimensions = ["Şirket Hesabı","632.100.20"];
ledgerJournalTrans.parmOffsetLedgerDimension(AxdDimensionUtil::getLedgerAccountId(offsetDimensions));
ledgerJournalTrans.save(); // LedgerJournalTrans oluştu
}

Genel muhasebe boyut yapısı Ax 2012′ tamamen değişmiş durumda. Burada ana hesapları da boyutla birlikte veriyoruz.
Aslında ana hesaplarda boyut gibi çalışıyor denebilir.
Başka bir makalede boyutlarla ilgili bazı konuları da anlatacağım.
Selamlar.

AX 2012 ‘de lookup’ta çoklu kayıt seçimi nasıl yapılır

Merhaba

Ax 2012 ‘yi  incelerken  SysLookupMultiSelectCtrl isminde bir sınıfla karşılaştım . Bu sınıf sayesinde lookuplarda  çoklu kayıt seçilebiliyor.

Öncelikle lookupta görmek istediğiniz veri için bir query hazırlamalısınız. AOT de ki query düğümünü kullanarak yapabileceğiniz gibi kodla da oluşturabilirsiniz.

Biz CustTable için bir query hazırlayalım. Ayrıca tasarımında sadece stringEdit (adı CustAccount olsun ) bir alan olan form yapalım.

Bu aşamadan sonra forma kod yazmamız gerekiyor. Eklememiz gereken kodlar :

Read more

Dynamics Ax’ ta Jobs

Merhaba

Jobslar tek başına çalışabilen kod parçaçıklarıdır.  Genelde biz axcılar joblarda kod testlerini ve veri güncellemelerini yaparız. Jobları uygulamanın içinde pek kullanmayız. Doğrusuda budur. Eğer uygulamada kullanılacak bir işse sınıf yazmak daha mantıklı olacaktır.

Joblar genelde açıldıktan sonra çalıştır denilerek kullanılır.  AOT den jobın üzerine gelip Aç derseniz  job çalışacaktır. Bu bazen tehlikeli olabilir. Örneğin bir seferlik  veri güncellemesi yapması gerekn  bir job yazdınız. Başka birisi joba sağ tıklayıp Aç dediğinde tekrar çalışacak ve verinizi bozacaktır. Bu durum için yapılması gereken işiniz bittikten sonra job içindeki update yapan kodlarınızı yorum satırı halıne getirmektir. Jobın kodunu görmek için üzerine çıft tıklamak veye sağ tıklayıp düzenle demek gerekir.

Eğer istersek jobları kod içinden de çalıştırabiliriz.

Örneğin  mesaj veren aşağıdaki gibi bir  job olsun ve bunu koddan çağırıp mesajı görelim;

Read more

setRFix() ve setLFix() metodları

Merhaba

setRFix() ve setLFix() metodlarını belli bir formatta string oluşturmak istediğimizde kullanırız. Bu metodlar sayesinde belli sayıdaki karakteri bir tekstin ister sağına  ister soluna ekleyebilirsiniz. Bir job ile nasıl kullanıldığını görelim.


static void strRLFix(Args _args)
{
int     i = 1;
str     padded;
str     finalResult;
;
padded = strRFix(int2str(i), 5, "0");
finalResult = strFmt("NUM-%1", padded);
info(finalResult);
padded = strLFix(int2str(i), 5, "0");
finalResult = strFmt("NUM-%1", padded);
info(finalResult);
}

Çıktısı :

NUM-00001
NUM-10000

Selamlar.

Ax tablolarındaki kontrol(validation) metodları

Merhaba

Ax tablolarında veri kontrolunu sağlayan metodlardan bahsedeceğim. Herhangi bir tablonun metodları üzerinden sağ tıklayıp yöntemi gecersiz kıl derseniz ezebileceğiniz (Override) metodların listesini görürsünüz. Bu metodlar içinde kontrol için kullanılanları da görebilirsiniz.

Bu konuyu anlatabilmek için bir proje yaptım.  Öncelikle iki alanı olan bir tablo ve onun formunu yaptım. Bir job birde sınıf yazdım burada da kod ile insert update ve delete işlemlerini yaptım. Bunlardan maksadım hangi işlemde hangi kontrol metodu çalışıyor bunu size gösterebilmekti.

Kontrol için kullanıla metodları tek tek ezip içlerine şu kodları yazdım.

Read more

Prompt ekranından girilen kriterleri başka bir query’e aktarmak

Merhaba

Prompt ekranı bir query için kriter girme, sıralama ve gruplama gibi farklı işlemleri yapabileceğiniz çok esnek bir uygulamadır. Özellikle rapor ve formlarda çok kullanılan bu ekranı her ax kullanıcısının çok iyi bilmesi gerekir. Bizim bu yazıdaki konumuz Prompt ekranında herhangi bir veri kaynağı için dinamik olarak girilen kriterleri tespit edip başka bir query’e aktarmaktır.

Bunu şöyle bir jobta deneyebiliriz:


static void GetQueryPromtRangeValues(Args _args)
{
CustTable               CustTable;
CustTable               CustTable2;
int                     counter;

Query                   q;
QueryRun                qRun;
QueryBuildRange         qbr;
QueryBuildDataSource    qbds;

Query                   q2;
QueryRun                qRun2;
QueryBuildDataSource    qbds2;

QueryBuildRange         qbrGet;
QueryBuildDataSource    qbdsGet;

;
// Birinci Query
q       = new Query();
qbds    = q.addDataSource(TableNum(CustTable));
qRun    = new QueryRun(q);
// İkinci Query
q2       = new Query();
qbds2    = q2.addDataSource(TableNum(CustTable));

if(qRun.prompt())
{
// CustTable veri kaynağı için girilen kriterleri buluyoruz
qbdsGet = qRun.query().dataSourceTable(TableNum(CustTable));
counter = qbdsGet.rangeCount(); // Kaç adet kriter girilmiş tespit ettik
// Girilen kriterleri bir döngü kullanarak ikinci query ye ekliyoruz
while(counter >0)
{
qbrGet = qbdsGet.range(counter);
info(strfmt("%1 : %2 ",counter , qbrGet.value() ));
qbds2.addRange(qbrGet.field()).value(qbrGet.value());
counter--;
}

setPrefix("Asıl Query ile ");
while(qRun.next())
{
CustTable = qRun.get(TableNum(CustTable));
info(strfmt("%1 : %2 ", CustTable.AccountNum,CustTable.Name ));
}
}

// ikinci query için QueryRun oluşturuyoruz.
// Aynı kriterlerin eklendiğini promt ekranında görebiliyoruz
qRun2    = new QueryRun(q2);

setPrefix("İkinci Query ile ");
if(qRun2.prompt())
{
while(qRun2.next())
{
CustTable2 = qRun2.get(TableNum(CustTable));
info(strfmt("%1 : %2 ", CustTable2.AccountNum,CustTable2.Name ));
}
}
}

Selamlar.

Script menusune otomatik query oluşturan bir kod eklemek

Merhaba

Daha önce ax editörunda bulunan script menusune nasıl ekleme yapılacağından bahsetmiştik. Ben kendi işlerimde kullanmak üzere bir çok ekleme yaptım bir tanesini sizinle paylaşacağım.

İki tablo ismi  ve join tipini soran ve bu bilgilere göre query hazırlayan kod örneğimiz şöyle:

Öncelikle EditorScripts sınıfımıza şu metodu ekliyoruz.


public void FD_Query(Editor editor)
{
    xppSource       xppSource       = new xppSource();
    Dialog          dialog          = new Dialog("Query oluştur");

    DialogField     dlgTablename    = dialog.addField(typeid(TableName));
    DialogField     dlgTablename2   = dialog.addField(typeid(TableName));
    DialogField     dlgExtTypeName  = dialog.addField(typeid(joinMode));
    Source          template;
;
    if (dialog.run())
    {
        template = xppSource.Query2Method(dlgTablename.value() ,
        dlgTablename2.value(),dlgExtTypeName.value() );

        editor.insertLines(template);
    }
}

Sonra xppSource sınıfımıza şu metodu ekliyoruz.

Read more

Parm metod ile nesneler arasında parametre göndermek

Merhaba

Ax’ta iki nesne arasında iletişimi args sınıfıyla sağladığımızdan bahsetmiştik. Bu makelede Args().Celler() metodunun bir kullanımını anlatacağım.

Şöyel bir istek olsun: Bir formum var içerisinde ItemId ve TransDate seçebildiğim iki alanım var. Bu alanlar herhangi bir tablodan gelmiyor. Direk form üzerinde oluştrulmuş alanlar. Ben bu iki alanı doldurduktan sonra bir butonla başka bir form açtırıyorum ve bu iki alanın değerini açtırdığım forma göndermek istiyorum.

Alan isimlerimiz  ItemIdField ve TransDateField  olsun.

Bunlar için birinci forma parm metodlar yazalım.

ItemId parmItemId()
{
    ;
    return ItemIdField.valueStr();
}
TransDate parmTransDate()
{
    ;
    return TransDateField.valueStr();
}

Buton ile açtırdığım ikinci formun init metoduna şöyle bir kod yazarsam bu iki değeri almış olurum.

Read more

Müşteri cirosunu hesaplayan bir query örneği

Merhaba

Müşteri adatandırma adıyla yaptığım bir raporda kullandığım müşterinin belli kriterlere göre cirosunu hesaplayan query’ i paylaşıyorum. Burda Query kullanmamın asıl  sebebi range olarak verilecek olan değerlerin bazen boşta gelebiliyor olması. Boş olma durumununda hesaplanması için query de if le kontroller yapmak zorunda kaldım. 

Metodu çağıran kod şöyle:


 element.sumCiro(CustTrans.AccountNum, CustTrans.OrderAccount,
                         CustTrans.ETGSalesResponsible , CustTrans.ETGSalesUnitId);

Metodumuz şöyle:


void sumCiro(AccountNum _accountNum , CustAccount _custAccount , EmplId _emplId , smmSalesUnitId _unitId)
{
    CustTrans   custTrans;

    Query                   q;
    QueryRun                qRun;
    QueryBuildDataSource    qbdsCustTrans;
    QueryBuildRange         qbrEmplID;
    QueryBuildRange         qbrCustAccount;
    QueryBuildRange         qbrAccountNum;
    QueryBuildRange         qbrUnitId;

    ;
    Ciro = 0;

    q   = new query();
    qbdsCustTrans = q.addDataSource(tableNum(CustTrans));
    qbdsCustTrans.addSelectionField(fieldNum(CustTrans, AmountMst), SelectionField::Sum);

    if(printAccountNum)
    {
        qbrAccountNum = qbdsCustTrans.addRange(fieldNum(CustTrans, AccountNum));
        qbrAccountNum.value(sysQuery::value(_accountNum));
    }
    if(printOrderAccount)
    {
        qbrCustAccount = qbdsCustTrans.addRange(fieldNum(CustTrans, OrderAccount));
        qbrCustAccount.value(sysQuery::value(_custAccount));
    }
    if(printSalesRes)
    {
        qbrEmplID = qbdsCustTrans.addRange(fieldNum(CustTrans, ETGSalesResponsible));
        qbrEmplID.value(sysQuery::value(_emplId));
    }
    if(printUnitID)
    {
        qbrUnitId = qbdsCustTrans.addRange(fieldNum(CustTrans, ETGSalesUnitId));
        qbrUnitId.value(sysQuery::value(_unitId));
    }

    qbdsCustTrans.addRange(fieldNum(CustTrans, ETGReversed)).value(sysQuery::value( ETGReverseType::No));
    qbdsCustTrans.addRange(fieldNum(CustTrans,
               TransType)).value(sysQuery::valueNot( LedgerTransType::Settlement));

    qbdsCustTrans.addRange(fieldnum(CustTrans, TransDate)).value(sysquery::range(startDate , endDate));
    qbdsCustTrans.addRange(fieldnum(CustTrans, AmountMST)).value('( AmountMST > 0 )');

    qRun = new QueryRun(q);
    while(qRun.next())
    {
       custTrans = qRun.get(tableNum(CustTrans));

       Ciro = CustTrans.AmountMST;

    }
}

Selamlar.

Label kodunun dile göre içeriğine kod ekranından ulaşmak

Merhaba

Label kodunun metnine ulaşmak için bu job örneğini kullanabilirsiniz.

static void retrieveLabel(Args args)
{
    Syslabel  label = new label("TR" ); //”En-us”
    Str     someTxt;
    ;
    someTxt = strFmt( label.extractString( literalStr("@SYS92165") ) );
    info(someTxt);
}
Page 7 of 15« First...5678910...Last »