Dear suvarna,
Yes, I am able to achieve this. I am hereby attaching the code along with this message. I am sure that the code would work efficiently for you in achieveing your requirement.
codeunit 50133 SOtoPO
{
[EventSubscriber(ObjectType::Codeunit, Codeunit::"Purch. Doc. From Sales Doc.", 'OnCreatePurchaseOrderOnAfterPurchaseHeaderSetFilters', '', false, false)]
local procedure Salesordertopurchaseordermessage(SalesHeader: Record "Sales Header"; PurchaseHeader: Record "Purchase Header")
begin
PurchaseHeader."Vendor Order No." := SalesHeader."External Document No.";
PurchaseHeader.Modify(true);
end;
}
Thanks and Regards,
Lakshmanan R