1 Package IBU_SR_UTIL AUTHID CURRENT_USER as
2 /* $Header: ibusruss.pls 120.9 2009/02/13 11:09:49 mkundali ship $ */
3 --
4 -- To modify this template, edit file PKGSPEC.TXT in TEMPLATE
5 -- directory of SQL Navigator
6 --
7 -- Purpose: Briefly explain the functionality of the package
8 --
9 -- MODIFICATION HISTORY
10 -- version Date Person Comments
11 ---------- --------- ------ ------------------------------------------
12 -- 115.3 03-DEC-2002 WZLI changed OUT and IN OUT calls to use NOCOPY hint
13 -- to enable pass by reference.
14 -- Enter package declarations as shown below
15
16 g_file_name VARCHAR2(32) := 'ibusruss.pls';
17 Type G_VARCHAR_100_TYPE Is Table of VARCHAR2(100) Index By Binary_Integer;
18
19 PROCEDURE check_nlslength
20 ( p_string IN JTF_VARCHAR2_TABLE_2000 :=null,
21 p_max_byte IN JTF_NUMBER_TABLE :=null,
22 x_out_array OUT NOCOPY JTF_VARCHAR2_TABLE_100,
23 x_return_status OUT NOCOPY VARCHAR2
24 );
25
26
27 PROCEDURE copy_out_array(
28 t IN G_VARCHAR_100_TYPE,
29 a0 OUT NOCOPY JTF_VARCHAR2_TABLE_100
30 );
31 ------- added the below procedures for isupport porject----------------------------------
32 PROCEDURE call_create_org_contact(p_user_id IN NUMBER,
33 p_Subject_Id IN NUMBER,
34 p_Object_Id IN SYSTEM.ibu_num_tbl_type,
35 p_Subject_Table_name IN VARCHAR2,
36 p_Object_Table_name IN VARCHAR2,
37 p_Subject_Type IN VARCHAR2,
38 p_Object_Type IN VARCHAR2,
39 p_Relationship_Code IN VARCHAR2,
40 p_Relationship_Type IN VARCHAR2,
41 p_Start_Date IN DATE,
42 p_End_Date IN DATE,
43 p_Status IN VARCHAR2,
44 p_created_by_module IN VARCHAR2,
45 p_application_id IN NUMBER,
46 x_return_status OUT NOCOPY VARCHAR2,
47 x_msg_count OUT NOCOPY NUMBER,
48 x_msg_data OUT NOCOPY VARCHAR2
49 );
50
51 procedure check_relationship(p_Subject_Id IN NUMBER,
52 p_Object_Id IN NUMBER,
53 x_party_id OUT NOCOPY NUMBER,
54 x_status OUT NOCOPY VARCHAR2
55 );
56
57 Procedure create_ibu_multi_parties(p_user_id IN NUMBER,
58 p_party_id IN NUMBER,
59 p_enable_flag IN VARCHAR2,
60 p_current_party IN VARCHAR2,
61 p_end_date IN DATE,
62 p_created_by IN NUMBER,
63 p_creation_date IN DATE,
64 p_last_updated_by IN NUMBER,
65 p_last_update_date IN DATE,
66 p_last_update_login IN NUMBER,
67 x_insert_status OUT NOCOPY VARCHAR2
68 );
69
70 Procedure update_ibu_multi_parties(p_user_id IN NUMBER,
71 p_loggedin_user_id IN NUMBER,
72 p_party_id IN SYSTEM.IBU_NUM_TBL_TYPE,
73 p_enable_flag IN system.IBU_VAR_3_TBL_TYPE,
74 x_update_status OUT NOCOPY VARCHAR2
75 );
76
77 /*added for 12.1.2 enhancement bug8245975*/
78 function return_primary(party_site_id IN NUMBER) return varchar2;
79 ------------------------------------------------------------------------------------------------
80 END IBU_SR_UTIL; -- Package Specification IBU_SR_UTIL