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;