Skip to main content

Notifications

Announcements

No record found.

Small and medium business | Business Central, N...
Suggested answer

Tracking of Stock Transfer

(0) ShareShare
ReportReport
Posted on by 194

Dear All,

I have a requirement regarding Transfer Orders,  to get the transfer orders details if 

      1. Transfer Orders Deleted

       2 Order was Created, not shipped 

      3, Transfer order was Created and Shipped but Not Received 

      4   Quantity difference in Shipped items and Received items in any of the Order

Regards

  • BCUSER2024 Profile Picture
    BCUSER2024 194 on at
    RE: Tracking of Stock Transfer

    Dear Experts,

    i made the report like this (attached) brought some details regarding the stock Transfer. is there any possibility to modify the code and bring some of my above  requirements into this. (Req 2,3,4).

    Posted Transfer Rcpt and Posted Transfer Shipment data only i used in the code. i think transfer order table also need to include

    I need coding experts help on this .

    report 60007 " Location Transfer Report"
    {
        ApplicationArea = All;
        DefaultLayout = RDLC;
        Caption = 'Location Transfer Report';
        RDLCLayout = './ReportLayouts/LocationTransferReport.rdl';
        UseRequestPage = true;
        UsageCategory = ReportsAndAnalysis;
        dataset
        {
    
            dataitem("Transfer Receipt Header"; "Transfer Receipt Header")
            {
                //RequestFilterFields = "Receipt Date";
                //  RequestFilterFields = "No";
                //RequestFilterFields = "Transfer Order No.";
                //DataItemTableView = sorting("Transfer Order Date");
    
                column(FromDate;
                FromDate)
                {
    
                }
                column(Todate; Todate)
                {
    
                }
    
    
                column(Transfer_Order_Date; Format("Transfer Order Date", 0, 1))
                {
    
                }
                column(Posting_Date; format("Posting Date", 0, 1))
                {
    
                }
    
                column(Transfer_Order_No_; "Transfer Order No.")
                {
    
                }
                column(No_TransferReceiptHeader; "No.")
                {
                }
                column(NoSeries_TransferReceiptHeader; "No. Series")
                {
                }
                column(ExternalDocumentNo_TransferReceiptHeader; "External Document No.")
                {
                }
                column(ReceiptDate_TransferReceiptHeader; "Receipt Date")
                {
                }
                column(TransferOrderDate_TransferReceiptHeader; "Transfer Order Date")
                {
                }
                column(TransferOrderNo_TransferReceiptHeader; "Transfer Order No.")
                {
                }
    
                column(Transfer_from_Code; "Transfer-from Code")
                {
    
                }
                column(Transfer_to_Code; "Transfer-to Code")
                {
    
                }
                column(Transfer_to_Post_Code; "Transfer-to Post Code")
                {
    
                }
    
                dataitem("Transfer Receipt Line"; "Transfer Receipt Line")
                {
                    DataItemLink = "Document No." = field("No.");
                    // DataItemTableView = sorting("Document No.");
                    DataItemTableView = sorting("Receipt Date") order(ascending);
    
    
    
                    column(Item_No_; "Item No.")
                    {
    
                    }
                    column(Item_Rcpt__Entry_No_; "Item Rcpt. Entry No.")
                    {
    
                    }
                    column(DocumentNo_TransferReceiptLine; "Document No.")
                    {
                    }
                    column(QtyperUnitofMeasure_TransferReceiptLine; "Qty. per Unit of Measure")
                    {
                    }
                    column(ReceiptDate_TransferReceiptLine; "Receipt Date")
                    {
                    }
                    column(TransferOrderNo_TransferReceiptLine; "Transfer Order No.")
                    {
                    }
    
                    column(Description; Description)
                    {
    
                    }
                    column(Quantity; Quantity)
                    {
    
                    }
                    column(LineAmount; LineAmount)
                    {
                    }
                    column(UnitPrice; UnitPrice)
                    {
    
                    }
                    column(UnitCost; UnitCost)
                    {
    
                    }
                    column(JobNo_TransferReceiptLine; "Job No.")
                    {
                    }
                    column(TotalCost; TotalCost)
                    { }
                    trigger OnAfterGetRecord()
                    var
                        CalculateTotalCost: Decimal;
                        Rec_item: Record item;
    
                    begin
                        //clear(Rec_item);
                        //Rec_item.Reset();
                        //Rec_item.SetRange("No.", "Transfer Receipt Line"."Item No.");
    
                        if Rec_item.Get("Item No.") then begin
                            UnitCost := Rec_item."Unit Cost";
                            CalculateTotalCost := (Quantity * Rec_item."Unit Cost");
                            TotalCost := CalculateTotalCost;
                            // Price := UnitCost;
                        end;
    
                    end;
    
                }
    
                trigger OnPreDataItem()
                begin
                    SetRange("Posting Date", FromDate, Todate);
                end;
            }
        }
    
        requestpage
        {
            layout
            {
                area(Content)
                {
                    group("LTO Report Data")
                    {
                        field(FromDate; FromDate)
                        {
                            Caption = 'From Date';
                            ApplicationArea = All;
    
                        }
                        field(Todate; Todate)
                        {
                            Caption = 'To Date';
                            ApplicationArea = all;
                        }
                    }
                }
            }
    
    
        }
    
    
        var
            myInt: Integer;
            LineAmount: Decimal;
            UnitPrice: Decimal;
    
            FromDate: date;
            Todate: date;
    
            TotalCost: Decimal;
            UnitCost: Decimal;
            Price: Decimal;
    
    
    }

    Right now am getting the data like this....if LTO number is there and corresponding NO Recpt number is there , then the column comes as blank also satisfy my parital req

    1wf.JPG

    Thanks

  • Suggested answer
    Dallefeld Profile Picture
    Dallefeld 169 User Group Leader on at
    RE: Tracking of Stock Transfer

    For your requirements 2, 3 and 4, these are just different looks into Open Transfer Orders.

    2. Read Transfer Order lines see if there is a value in Quantity Shipped, if zero then it has not shipped

    3. Read Transfer Order lines and if there is a value in Quantity Shipped but not in Quantity received, that's the lines you want

    4. Read Transfer Order lines and compare Quantity, Quantity Shipped and Quantity Received.

    Transfer Orders Deleted is a bit harder as there is no archive feature for transfer orders, you might have to turn on change log for this and then determine a way to differentiate orders just deleted versus orders shipped-and-received that are deleted.

  • Suggested answer
    MahGah Profile Picture
    MahGah 15,433 on at
    RE: Tracking of Stock Transfer

    Hi

    Do you mean all in one page and report? If yes then you need to use either Jet Report, Excel/ODATA, or development.

    1) As far as I know BC has not Transfer Order Archive to keep track of deleted Transfer Order (if they did not ship or received) . I think you need to submit the idea here  experience.dynamics.com/.../

    1) If you need to see history of what has been shipped and received then go to Posted Transfer Shipment and Posted Transfer Receipt

    2) Go to Transfer Order list and use Filter then try "Completely Shipped" and No

    3) Go to Transfer Order List and use filter then try "Completely Received" and No

    4) For this you need Jet Report or Excel/ODATA. Or manually check.

Under review

Thank you for your reply! To ensure a great experience for everyone, your content is awaiting approval by our Community Managers. Please check back later.

Helpful resources

Quick Links

Congratulations 2024 Spotlight Honorees!

Kudos to all of our 2024 community stars! 🎉

Meet the Top 10 leaders for December!

Congratulations to our December super stars! 🥳

Get Started Blogging in the Community

Hosted or syndicated blogging is available! ✍️

Leaderboard

#1
André Arnaud de Calavon Profile Picture

André Arnaud de Cal... 291,684 Super User 2024 Season 2

#2
Martin Dráb Profile Picture

Martin Dráb 230,414 Most Valuable Professional

#3
nmaenpaa Profile Picture

nmaenpaa 101,156

Leaderboard

Featured topics

Product updates

Dynamics 365 release plans