Are we able to hide selection before posting?

julkifli33
julkifli33 Member Posts: 1,100
in NAV Three Tier
Hi all,
for cloud bc, are we able to hide selection before post?
45vyxzf7bskt.png

I want to allow user only has "Ship"
but hide "Ship & Invoice"

my idea is duplicate the standard code, and then hide Ship & Invoice.
any other better and efficient way?

Thanks before

Best Answers

  • yukon
    yukon Member Posts: 361
    Answer ✓
    How about this?
    Use second option if you do not want to show any message.
        [EventSubscriber(ObjectType::Codeunit, Codeunit::"Whse.-Post Shipment (Yes/No)", 'OnBeforeConfirmWhseShipmentPost', '', false, false)]
    local procedure OnBeforeConfirmWhseShipmentPostSub(var WhseShptLine: Record "Warehouse Shipment Line"; var HideDialog: Boolean; var Invoice: Boolean; var IsPosted: Boolean; var Selection: Integer)
    var
        MsgConfirmLbl: Label 'Do you want to ship?';
        MsgCancelLbl: Label 'Posting is canceled';
    begin
        Selection := 1; // Default is ship
        HideDialog := true;

        /*  First Option for user Cancel */
        if (GuiAllowed) then
            if not Confirm(MsgConfirmLbl) then
                Error(MsgCancelLbl);

        /*  Second Option for user Cancel */
        if (GuiAllowed) then
            if not Confirm(MsgConfirmLbl) then
                IsPosted := true;
    end;
    Make Simple & Easy
  • DenSter
    DenSter Member Posts: 8,307
    Answer ✓
    There is a way to override the standard dialog, but it involves a little more than just setting the 'Selection' variable.

    Take a look at the 'posting yes/no' codeunits, for instance codeunit 81 which is Sales Post Yes/No.
    enmirthcs7wg.png
    Go into the ConfirmPost function to see how standard BC controls whether it will do Ship or Invoice, and make sure that your own event subscriber sets the right values
    z0icd6v3h3m5.png

    Daniel Rimmelzwaan
    RIS Plus, LLC

Answers

  • yukon
    yukon Member Posts: 361
    Answer ✓
    How about this?
    Use second option if you do not want to show any message.
        [EventSubscriber(ObjectType::Codeunit, Codeunit::"Whse.-Post Shipment (Yes/No)", 'OnBeforeConfirmWhseShipmentPost', '', false, false)]
    local procedure OnBeforeConfirmWhseShipmentPostSub(var WhseShptLine: Record "Warehouse Shipment Line"; var HideDialog: Boolean; var Invoice: Boolean; var IsPosted: Boolean; var Selection: Integer)
    var
        MsgConfirmLbl: Label 'Do you want to ship?';
        MsgCancelLbl: Label 'Posting is canceled';
    begin
        Selection := 1; // Default is ship
        HideDialog := true;

        /*  First Option for user Cancel */
        if (GuiAllowed) then
            if not Confirm(MsgConfirmLbl) then
                Error(MsgCancelLbl);

        /*  Second Option for user Cancel */
        if (GuiAllowed) then
            if not Confirm(MsgConfirmLbl) then
                IsPosted := true;
    end;
    Make Simple & Easy
  • DenSter
    DenSter Member Posts: 8,307
    Answer ✓
    There is a way to override the standard dialog, but it involves a little more than just setting the 'Selection' variable.

    Take a look at the 'posting yes/no' codeunits, for instance codeunit 81 which is Sales Post Yes/No.
    enmirthcs7wg.png
    Go into the ConfirmPost function to see how standard BC controls whether it will do Ship or Invoice, and make sure that your own event subscriber sets the right values
    z0icd6v3h3m5.png

    Daniel Rimmelzwaan
    RIS Plus, LLC
  • julkifli33
    julkifli33 Member Posts: 1,100
    Hi @yukon & @DenSter
    thanks for your reply.
    i will test and try

Categories