Sales order Holds

Sales orders in D365 can have holds, stopping their further processing. He is the data diagram over the tables.


A select statement would look like this, showing all sales orders that have a certain hold code.


        SalesTable salesTable;
        MCRHoldCodeTrans holdCodeTrans;
        MCRHoldCodeTable holdCodeTable;

         
while select SalesId, 
                from salesTable                
                join MCRHoldCode, InventRefId
                    from holdCodeTrans                   
                    where   holdCodeTrans.InventRefId == salesTable.SalesId
//Needs setup parameter
                    &&      holdCodeTrans.MCRHoldCode == 'RX Item'
            
        {
            info(strFmt('%1 %2 %3 %4'
, salesTable.SalesId
, holdCodeTrans.MCRHoldCode));
        }


A more complex view including Retail Attributes on sales order lines, which was the actual task.


        SalesTable salesTable;
        SalesLine salesLine;
        MCRHoldCodeTrans holdCodeTrans;
        MCRHoldCodeTable holdCodeTable;

        RetailSalesTableInstanceValue instanceValue;
        EcoResAttribute attribute;
        EcoResAttributeValue attributeValue;
        EcoResTextValue     textValue;


while select salesId, ItemID, LineNum
    from salesLine           
            join SalesId 
                from salesTable
                where salesTable.SalesId == salesLine.SalesId
                join MCRHoldCode, InventRefId
                    from holdCodeTrans                   
                    where   holdCodeTrans.InventRefId == salesTable.SalesId
//Needs setup parameter
                    &&      holdCodeTrans.MCRHoldCode == 'RX Item'
            join SalesId, RecID
                from instanceValue
                where   instanceValue.SalesId == salesLine.SalesId
                &&      instanceValue.HeaderOrLineNum == 1 //0 is header, 1 is line
                join    InstanceValue, Value, Attribute 
                    from attributeValue
                    where attributeValue.InstanceValue == instanceValue.RecId
                    join textValue
                        where textValue.RecId == attributeValue.Value
                    join RecId, Name
                        from    attribute
                        where   attribute.RecId == attributeValue.Attribute
//Needs setup parameter
                        &&      attribute.Name == 'EncryptedKey'
        {
            i++;
         
            info(strFmt('%1 %2 %3 %4 %5 %6 %7'
, i
, salesLine.SalesId
, salesLine.ItemId
, salesLine.LineNum
, textValue.TextValue
, attribute.Name
, holdCodeTrans.MCRHoldCode));
        }

Comments

Post a Comment

Popular posts from this blog

SysOperationFramework with use of Query

Image
 The SysOperation framework is very good and effective, but unforutnatly a bit complicated to get in to and do as you want.  I had one case in which a simple table should be updated, the job was to be able to set in batch. Also it had to use a query so that the user could easily set up the ranges as he pleased. Note that I will use the same query for updating the table which I mentioned. So the same query is used all the way through ending in using Quer::updateRecordset For this you need: Data contract class Controller class Service class Simple query oject Action Menu item Main menu where to make the menu item available. 1. Data contract class Note the simple query highlighted in bright yellow .  [DataContractAttribute     , SysOperationGroupAttribute('Parameters',  "Parameters", '1')] internal final class CustAutoCancelUpdateDataContract {     str             packedQuery;     MCRAutoCancel  ...
Read more

Customer payment transaction, mark for settlement against invoice and post

Pre requisite is that you have your CustInvoiceJour table containing the invoice you wanted to receive payment for and settle. //... //Create your LedgerJournalTable and LedgerJournalTrans //ledgerJournalTrans.InvoiceId must be blank to hinder this becoming a free text invoice ledgerJournalTrans.MarkedInvoice = custInvoiceJour.InvoiceId; ledgerJournalTrans.MarkedInvoiceCompany = custInvoiceJour.DataAreaId; ledgerJournalTrans.MarkedInvoiceRecId = CustTransOpen::getFirstDueRecIdByInvoice(ledgerJournalTrans.MarkedInvoice); ledgerJournalTrans.insert(); //mark the open customer transactions LedgerJournalEngine_CustPayment::updateMarkedInvoiceSpecTrans(ledgerJournalTrans); After posting the payment journal, if everything validates, your transactions will be settled. //Post the journal LedgerJournalCheckPost::newLedgerJournalTable(ledgerJournalTable, NoYes::Yes).runOperation();
Read more

Retail Attributes on sales lines

Image
Recently I've dived into Retail. There will be some posts about retail and the problems I've faced with solutions. First off will be the Retail Attributes, they can be problematic here is a data base diagram illustrating a simplyfied view, assuming the value is of type text. And here is the select statement for listing all sales lines with their attributes.         SalesTable salesTable;         SalesLine salesLine;         RetailSalesTableInstanceValue instanceValue;         EcoResAttribute attribute;         EcoResAttributeValue attributeValue;         EcoResTextValue      textValue;     while select salesId                  from  salesLine  ...
Read more