-- 打开PO
PROCEDURE Btn_Open_Po IS
BEGIN Fnd_Function.Execute(Function_Name => 'PO_POXPOEPO',
Open_Flag => 'Y',
Session_Flag => 'Y',
Other_Params => 'PO_HEADER_ID=' || :Po.Po_Header_Id || ' ' || ' ACCESS_LEVEL_CODE="MODIFY"' ||
' POXPOEPO_CALLING_FORM="POXSTNOT"',
Activate_Flag => 'ACTIVATE'); END;
-- 打开SO
PROCEDURE Btn_Open_So IS
BEGIN Fnd_Function.Execute(Function_Name => 'ONT_OEXOEORD',
Open_Flag => 'Y',
Session_Flag => 'Y',
Other_Params => 'DESKTOP_HEADER_ID="' || :So.So_Header_Id || '"',
Activate_Flag => 'ACTIVATE'); END;