-

x++ code to get Purchase order Voucher transactions either PO is cancelled or not Cancelled.


    static void  Job(Args _args)
{
    GeneralJournalEntry                     genJourEntry;
    GeneralJournalAccountEntry        genJourAccEntry;
    container                                        conGeneralJourAccEntry;
    //PO_receipt_1985 is the PackingSlipId
 
    while select  DocumentNumber,RecId,JournalNumber,SubledgerVoucher from  genJourEntry
        where genJourEntry.DocumentNumber == 'PO_receipt_1985'
           join GeneralJournalEntry,PostingType,IsCorrection from genJourAccEntry
        where  genJourAccEntry.GeneralJournalEntry  == genJourEntry.RecId
            && genJourAccEntry.PostingType          ==   LedgerPostingType::PurchStdCostPurchasePriceVariance//PurchasePriceVariance
            && (genJourAccEntry.IsCorrection        == NoYes::Yes
            ||  genJourAccEntry.IsCorrection        ==  NoYes::No)
             
    {
        info(strFmt("AccountingCurrencyAmount :%",genJourAccEntry.AccountingCurrencyAmount));
     
 conGeneralJourAccEntry + = GeneralJournalAccountEntry::findRelated(genJourAccEntry.RecId);
  genJourEntry = conpeek(conGeneralJourAccEntry,3);    
     
       info(strFmt("Recid :%1 PackingSlipId: %2 JournalNumber :%3 Voucher:%4",           genJourEntry.RecId,genJourEntry.DocumentNumber,genJourEntry.JournalNumber
  ,genJourEntry.SubledgerVoucher));

    conGeneralJourAccEntry = conNull();
    }
}

Thank you.

Comments

Post a Comment

Popular posts from this blog

x++ code to add hyperlink to a field in D365FO

-
Here is a way to provide hyperlink for field. 1.Create an Extension class to the form as below. [ExtensionOf(formStr(TestHistory))] public final class  TestHistoryForm_Extension { } 2.Copy onPostRun form eventhandler and write code as below.     [FormEventHandler(formStr(TestHistory), FormEventType::PostRun)]     public static void TestHistory_OnPostRun(xFormRun sender, FormEventArgs e)     {         FormStringControl   formCtrl = sender.design().controlName(formControlStr(TestHistory,TestHistory_Voucher));         formCtrl .registerOverrideMethod(methodStr(FormStringControl, jumpRef), methodStr(TestHistoryForm_Extension, JumpRefId), sender);     } 3.write definition for JumpRefId method public void jumpRefId(FormControl _formControl)     {         MenuFunction    menuFunction;       ...
Read more

x++ code to get Vendor Email Address based on Purpose in Dynamics 365 for Operations

-
public static  Email   getVendorEmailAddress()     {               VendTable  vendTable;         DirPartyLocation dirPartyLocation;         LogisticsElectronicAddress elecAddress;         LogisticsElectronicAddressRole elecAddressRole;         LogisticsLocationRole locRole;         Str vendNum;              vendNum='205181';//Vendor Number                 select firstonly  DirPartyLocation                     where dirPartyLocation.party ==  VendTable::find(vendNum).Party//Vendor Number             join   elecAddress                     where elecAddress.Location == dirPartyLocation.Loca...
Read more

x++ code to get Customer Address based on purpose in ax 2012

-
static void  customerAddress(Args _args) {     DirPartyPostalAddressView           dirPartyPostalAddrlocal;     DirPartyLocationRolesView           dirPartyLocationRoleslocal;     LogisticsLocationRole                   logisticsLocRole;     select firstOnly   * from dirPartyPostalAddrlocal order by RecId desc         exists join dirPartyLocationRoleslocal             where dirPartyLocationRoleslocal.Location   == dirPartyPostalAddrlocal.Location                 && dirPartyLocationRoleslocal.Party     ==     CustTable::find(_accountNum).Party//_dirpartyRecid                 //&& dirPartyPostalAddrlocal.IsPrimary == NoYes::No         exists j...
Read more