Find credit note original sales order on sales order invoice report

 [ExtensionOf(classStr(SalesInvoiceDP))]

final class HIGSalesInvoiceDP_Extension

{

    protected void populateSalesInvoiceHeaderFooterTmp(CustInvoiceJour _custInvoiceJour, CompanyInfo _companyInfo)

    {

        CustInvoiceTrans custInvoiceTrans,custInvoiceTransOrig;

        SalesLine salesLine;

        InventTransOrigin  transOrigin,transOriginOrig;

        InventTrans inventTrans;


        next   populateSalesInvoiceHeaderFooterTmp(_custInvoiceJour,_companyInfo);

        salesInvoiceHeaderFooterTmp.BuyerAddress = _custInvoiceJour.deliveryAddress();

        salesInvoiceHeaderFooterTmp.BuyerName = _custInvoiceJour.DeliveryName;

        salesInvoiceHeaderFooterTmp.CompanyAddress = strReplace(salesInvoiceHeaderFooterTmp.CompanyAddress,"\n",",");

        salesInvoiceHeaderFooterTmp.HIGDueDate = salesInvoiceHeaderFooterTmp.InvoiceDate + PaymTerm::find(_custInvoiceJour.Payment).NumOfDays ;

        //salesInvoiceHeaderFooterTmp.CompanyBankAccount = BankAccountTable::find(_companyInfo.Bank).AccountNum;

        salesInvoiceHeaderFooterTmp.CompanyEmail = _companyInfo.email();

// Code starts from here

        if(_custInvoiceJour.InvoiceAmount <0)

        {

            select firstonly InvoiceId from custInvoiceTransOrig

            join InventTransIdReturn from salesLine

                where salesLine.InventTransIdReturn != ""

                join InventTransId from  custInvoiceTrans

                where custInvoiceTrans.InvoiceId  ==_custInvoiceJour.InvoiceId

                &&  custInvoiceTrans.InventTransId == salesLine.InventTransId

                && custInvoiceTransOrig.InventTransId == salesLine.InventTransIdReturn;

          /*  if(!custInvoiceTransOrig.InvoiceId)

            {

                select firstonly MarkingRefInventTransOrigin from inventTrans

                exists join custInvoiceTrans

                where custInvoiceTrans.InvoiceId  ==_custInvoiceJour.InvoiceId

                && custInvoiceTrans.LineAmount <0

                join transOrigin

                where  transOrigin.InventTransId == custInvoiceTrans.InventTransId

                && inventTrans.InventTransOrigin == transOrigin.RecId;


                select firstonly InvoiceId from  custInvoiceTransOrig

                join transOriginOrig

                where transOriginOrig.RecId == inventTrans.MarkingRefInventTransOrigin

                && transOriginOrig.InventTransId == custInvoiceTransOrig.InventTransId;

            }*/

            salesInvoiceHeaderFooterTmp.HIGPurchOrderFormNum =custInvoiceTransOrig.InvoiceId ;

        }

// Code ends from here

        else

        {

            InterCompanyPurchSalesReference salesRef;

            select firstonly salesRef

                where salesRef.SalesId ==   _custInvoiceJour.salesTable().SalesId;

            if(salesRef.PurchId)

            {

                salesInvoiceHeaderFooterTmp.HIGPurchOrderFormNum = salesRef.PurchId;

            }

            else

            {

                salesInvoiceHeaderFooterTmp.HIGPurchOrderFormNum = _custInvoiceJour.salesTable().PurchOrderFormNum;

            }

        }


        BankAccountTable bankAccTable =  BankAccountTable::find(_companyInfo.Bank);

        if(bankAccTable.CurrencyCode != "GBP")

        {

            salesInvoiceHeaderFooterTmp.HIGCompanyBankInfo =  "Rounting No: "+bankAccTable.RegistrationNum+"\n"+ "Account Number: "+bankAccTable.AccountNum;

        }

        else

        {

            salesInvoiceHeaderFooterTmp.HIGCompanyBankInfo =  "Sort Code: "+bankAccTable.BankSortCode+"\n"+ "Account Number: "+bankAccTable.AccountNum;

        }

    }


}

Comments

Post a Comment

Popular posts from this blog

Get voucher transactions,settlement , and other details from customer , invocie other posted transactions via GJentry and subledger entry

   //From here the code is common for all posted transactions if Project invoice one then we need to join with projinvoicejour instead of vendinvoicejour like this way GeneralJournalAccountEntry accEntry; SubledgerVoucherGeneralJournalEntry subGjEntry ;  LedgerDimensionPreviewTmp   ledgerDimensionPreviewTmpLocal; while select maxof(GeneralJournalEntry) from  subGjEntry                         where subGjEntry.AccountingDate == vendInvoiceJour.InvoiceDate                         &&     subGjEntry.Voucher ==  vendInvoiceJour.LedgerVoucher                          join sum(TransactionCurrencyAmount),LedgerDimension,maxof(Text),maxof(IsCredit) from   accEntry group by accEntry.LedgerDimension                         where accEntry.GeneralJournalEntry  == subGjEntry.GeneralJournalEntry                         &&  accEntry.PostingType != LedgerPostingType::VendBalance                         &&  accEntry.PostingType != LedgerPostingType::InterunitCredit              
Read more

Logistics address, postal address, address phone fax contact information

// Find primary address by roles  LogisticsPostalAddress postalAddr;  postalAddr = DirParty::findPostalAddressByRole(DirPartyTable::find(companyInfo::find().PartyNumber).RecId,LogisticsLocationRoleType::Invoice); Get Description/ name of location LogisticsLocation::find(postalAddrInvoice.Location).Description // Find contact information (Generic one) DirPartyContactInfoView contactInfoView; contactInfoView = DirPartyContactInfoView::find(partyRecId, _location); // Find primary address by roles regardless primary or not public  LogisticsPostalAddress getPostalAddressByType(DirPartyRecId _party, LogisticsLocationRoleType _type)     {         DirPartyLocation        partyLocation;         DirPartyLocationRole    partyLocationRole;         LogisticsLocation       location;         LogisticsLocationRole   locationRole;         LogisticsPostalAddress  postalAddress;         select firstonly postalAddress         exists join location             where location.RecId == postalAddress.Location
Read more

Get Ledger journal transactions payment marked invoices for posted and non posted

// Code from customer payment journal report --CustPaymentJournalDP     private LedgerJournalTable ledgerJournalTable;     private LedgerJournalTable tmpLedgerJournalTable;     private LedgerJournalTrans ledgerJournalTrans;     private LedgerJournalTrans tmpLedgerJournalTrans;     private CustTrans tmpCustTrans;     private CustTrans custTrans;     private CustTransOpen custTransOpen;     private CustSettlement custSettlement;     private SpecTrans specTrans;     private LedgerJournalId lastJournalNum;     private AccountNum lastAccountNum;     private Amount sumPaymSettleAmountCur;     private CustPaymentJournalTmp custPaymentJournalTmp;     private RecId ledgerJournalTransRecId;     private Query query;  while (qr.next())         {             tmpLedgerJournalTable = qr.get(tmpLedgerJournalTable.TableId);             this.insertDataFromLedgerJournalTable();             tmpLedgerJournalTrans = qr.get(tmpLedgerJournalTrans.TableId);             this.insertDataFromLedgerJournalTrans();
Read more