[Home] [Help]
PACKAGE BODY: APPS.OE_GET_DEFAULT_SOURCE_TYPE_PUB
Source
1 package body OE_GET_DEFAULT_SOURCE_TYPE_PUB as
2 /* $Header: OEXPDSTB.pls 115.0 99/07/16 08:14:21 porting ship $ */
3
4 G_PKG_NAME CONSTANT VARCHAR2(30) := 'OE_CUSTOM_DEFAULT_SOURCE_TYPE';
5
6 procedure GET_CUSTOM_DEFAULT_SOURCE_TYPE( P_API_Version In Number,
7 P_Return_Status Out Varchar2,
8 P_Msg_Count Out Number,
9 P_MSG_Data Out Varchar2,
10 p_item in number,
11 p_cycle_id in number,
12 p_linetype in varchar2,
13 p_option_flag in varchar2,
14 p_item_type in varchar2,
15 p_source_type_svrid out number,
16 p_source_type out varchar2,
17 p_warehouse in number default null) is
18 L_API_Name Constant Varchar2(30) := 'GET_CUSTOM_DEFAULT_SOURCE_TYPE';
19 L_API_Version Constant Number := 1.0;
20
21 begin
22
23 IF Not FND_API.Compatible_API_Call (L_API_Version,
24 P_API_Version,
25 L_API_Name,
26 G_PKG_Name) Then
27 Raise FND_API.G_EXC_UNEXPECTED_ERROR;
28 End If;
29
30
31 p_source_type := '';
32 p_source_type_svrid := NULL;
33 P_Return_Status := FND_API.G_RET_STS_SUCCESS;
34
35 end GET_CUSTOM_DEFAULT_SOURCE_TYPE;
36
37 end OE_GET_DEFAULT_SOURCE_TYPE_PUB;