I have create a custom table "Cost Sheet Header".set workflow for this table.
create tableextension for "approva entry" table add Customer Name,Machine No. . I want to show this fields on Request To approve page so create page extension for
"Requests to Approve".
when send requst to approve then customer name,machine no should be blank on request To approve page.
[EventSubscriber(ObjectType::Codeunit, Codeunit::"Approvals Mgmt.", 'OnPopulateApprovalEntryArgument', '', true, true)]
local procedure SetPopulateApprovalEntryArgument(var RecRef: RecordRef; var ApprovalEntryArgument: Record "Approval Entry"; WorkflowStepInstance: Record "Workflow Step Instance")
var
RecMachineCostSheet: Record "ST_Cost Sheet Header";
RecINRCostSheet: Record "ST_INR CostSheet Header";
IsHandled: Boolean;
begin
case RecRef.Number of
DATABASE::"ST_Cost Sheet Header":
begin
RecRef.SetTable(RecMachineCostSheet);
ApprovalEntryArgument."Document No." := RecMachineCostSheet."Cost Sheet No.";
ApprovalEntryArgument."Customer Name" := RecMachineCostSheet."Customer Name";
ApprovalEntryArgument."Machine Category" := RecMachineCostSheet."Machine Category";
ApprovalEntryArgument."Machine Model No." := RecMachineCostSheet.Model;
ApprovalEntryArgument."Enquiry Quantity" := RecMachineCostSheet."Enquiry Quantity";
ApprovalEntryArgument.Amount := RecMachineCostSheet."Offer Net price(With Usance)";
end;
end;
end;
