[Home] [Help]
PACKAGE: APPS.AMS_SCRIPTING_PUB
Source
1 PACKAGE ams_scripting_pub AUTHID CURRENT_USER AS
2 /* $Header: amspscrs.pls 115.3 2003/02/18 06:28:18 sanshuma noship $ */
3
4
5 -- ===============================================================
6 -- Start of Comments
7 -- Package name
8 -- ams_scripting_pub
9 -- Purpose
10 --
11 -- History
12 --
13 -- NOTE
14 --
15 -- ===============================================================
16
17
18 TYPE ams_party_rec_type IS RECORD
19 (
20 organization VARCHAR2(360),
21 country VARCHAR2(60),
22 address1 VARCHAR2(240),
23 address2 VARCHAR2(240),
24 address3 VARCHAR2(240),
25 address4 VARCHAR2(240),
26 city VARCHAR2(60),
27 county VARCHAR2(60),
28 state VARCHAR2(60),
29 postal_code VARCHAR2(60),
30 firstname VARCHAR2(150),
31 middlename VARCHAR2(60),
32 lastname VARCHAR2(150),
33 email VARCHAR2(2000),
34 dayareacode VARCHAR2(10),
35 daycountrycode VARCHAR2(10),
36 daynumber VARCHAR2(40),
37 dayextension VARCHAR2(20),
38 eveningareacode VARCHAR2(10),
39 eveningcountrycode VARCHAR2(10),
40 eveningnumber VARCHAR2(40),
41 eveningExtension VARCHAR2(20),
42 faxareacode VARCHAR2(10),
43 faxcountrycode VARCHAR2(10),
44 faxnumber VARCHAR2(40),
45 faxextension VARCHAR2(20)
46 );
47
48
49 g_miss_ams_party_rec ams_party_rec_type := NULL;
50 TYPE ams_party_tbl_type IS TABLE OF ams_party_rec_type INDEX BY BINARY_INTEGER;
51 g_miss_ams_party_tbl ams_party_tbl_type;
52
53 TYPE ams_person_profile_rec_type IS RECORD
54 (
55 date_of_birth DATE,
56 place_of_birth VARCHAR2(60),
57 gender VARCHAR2(30),
58 marital_status VARCHAR2(30),
59 marital_status_effective_date DATE,
60 personal_income NUMBER,
61 head_of_household_flag VARCHAR2(1),
62 household_income NUMBER,
63 household_size NUMBER,
64 rent_own_ind VARCHAR2(30)
65 );
66
67 g_miss_ams_person_profile_rec ams_person_profile_rec_type := NULL;
68 TYPE ams_person_profile_tbl_type IS TABLE OF ams_person_profile_rec_type INDEX BY BINARY_INTEGER;
69 g_miss_ams_person_tbl ams_person_profile_tbl_type;
70
71
72
73 PROCEDURE Create_Customer(
74 p_api_version_number IN NUMBER,
75 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
76 p_commit IN VARCHAR2 := FND_API.G_FALSE,
77 p_validation_level IN NUMBER := FND_API.g_valid_level_full,
78 x_return_status OUT NOCOPY VARCHAR2,
79 x_msg_count OUT NOCOPY NUMBER,
80 x_msg_data OUT NOCOPY VARCHAR2,
81
82 p_party_id IN OUT NOCOPY NUMBER,
83 p_b2b_flag IN VARCHAR2,
84 p_import_list_header_id IN NUMBER,
85
86 p_ams_party_rec IN ams_party_rec_type := g_miss_ams_party_rec,
87
88 x_new_party OUT NOCOPY VARCHAR2,
89 p_component_name OUT NOCOPY VARCHAR2
90 );
91
92 PROCEDURE Update_Person_Profile(
93 p_api_version_number IN NUMBER,
94 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
95 p_commit IN VARCHAR2 := FND_API.G_FALSE,
96 p_validation_level IN NUMBER := FND_API.g_valid_level_full,
97 x_return_status OUT NOCOPY VARCHAR2,
98 x_msg_count OUT NOCOPY NUMBER,
99 x_msg_data OUT NOCOPY VARCHAR2,
100
101 p_party_id IN NUMBER,
102 p_profile_id IN OUT NOCOPY NUMBER,
103 p_person_profile_rec IN ams_person_profile_rec_type := g_miss_ams_person_profile_rec,
104 p_party_object_version_number IN OUT NOCOPY NUMBER
105 );
106
107 END ams_scripting_pub;