[Home] [Help]
PACKAGE BODY: APPS.CSP_LOCATION_PKG
Source
1 PACKAGE BODY CSP_LOCATION_PKG AS
2 /*$Header: cspgtlob.pls 120.1 2005/09/14 16:30:17 jjalla noship $*/
3 --p_location_rec hz_location_pub.location_rec_type;
4 p_location_rec hz_location_v2pub.location_rec_type;
5 procedure csp_create_location (
6 p_api_version IN NUMBER,
7 p_init_msg_list IN VARCHAR2:= FND_API.G_FALSE,
8 p_commit IN VARCHAR2:= FND_API.G_FALSE,
9 x_ADDRESS1 VARCHAR2:= FND_API.G_FALSE,
10 x_ADDRESS2 VARCHAR2:= FND_API.G_FALSE,
11 x_ADDRESS3 VARCHAR2:= FND_API.G_FALSE,
12 x_ADDRESS4 VARCHAR2:= FND_API.G_FALSE,
13 x_CITY VARCHAR2:= FND_API.G_FALSE,
14 x_POSTAL_CODE VARCHAR2:= FND_API.G_FALSE,
15 x_STATE VARCHAR2:= FND_API.G_FALSE,
16 x_PROVINCE VARCHAR2:= FND_API.G_FALSE,
17 x_ADDRESS_STYLE VARCHAR2:= FND_API.G_FALSE,
18 x_ADDRESS_LINES_PHONETIC VARCHAR2:= FND_API.G_FALSE,
19 x_COUNTY VARCHAR2:= FND_API.G_FALSE,
20 x_COUNTRY VARCHAR2:= FND_API.G_FALSE,
21 x_DESCRIPTION VARCHAR2:= FND_API.G_FALSE,
22 x_return_status OUT NOCOPY VARCHAR2,
23 x_msg_count OUT NOCOPY NUMBER,
24 x_msg_data OUT NOCOPY VARCHAR2,
25 x_location_id OUT NOCOPY NUMBER,
26 p_validation_level IN NUMBER:= FND_API.G_VALID_LEVEL_FULL
27 ) Is
28 l_return_status VARCHAR2(1):='S';
29 l_msg_count NUMBER;
30 l_msg_data VARCHAR2(240);
31 l_location_id NUMBER;
32
33 Begin
34
35 p_location_rec.country := x_country;
36 p_location_rec.address1 := x_address1;
37 p_location_rec.address2 := x_address2;
38 p_location_rec.address3 := x_address3;
39 p_location_rec.address4 := x_address4;
40 p_location_rec.city := x_city;
41 p_location_rec.postal_code := x_postal_code;
42 p_location_rec.state := x_state;
43 p_location_rec.province := x_province;
44 p_location_rec.county := x_county;
45 p_location_rec.address_style := x_address_style;
46 p_location_rec.address_lines_phonetic := x_address_lines_phonetic;
47 p_location_rec.description := x_description;
48
49 /*hz_location_pub.create_location (
50 p_api_version ,
51 p_init_msg_list ,
52 p_commit ,
53 p_location_rec ,
54 l_return_status ,
55 l_msg_count ,
56 l_msg_data ,
57 l_location_id ,
58 p_validation_level
59 );*/
60 hz_location_v2pub.create_location (
61 p_init_msg_list ,
62 p_location_rec ,
63 l_location_id ,
64 l_return_status ,
65 l_msg_count ,
66 l_msg_data
67 );
68
69 x_return_status := l_return_status;
70 x_msg_count := l_msg_count;
71 x_msg_data := l_msg_data;
72 x_location_id := l_location_id;
73
74 End;
75
76 procedure csp_update_location (
77 p_api_version IN NUMBER,
78 p_init_msg_list IN VARCHAR2:= FND_API.G_FALSE,
79 p_commit IN VARCHAR2:= FND_API.G_FALSE,
80 x_location_id NUMBER,
81 x_ADDRESS1 VARCHAR2:= FND_API.G_FALSE,
82 x_ADDRESS2 VARCHAR2:= FND_API.G_FALSE,
83 x_ADDRESS3 VARCHAR2:= FND_API.G_FALSE,
84 x_ADDRESS4 VARCHAR2:= FND_API.G_FALSE,
85 x_CITY VARCHAR2:= FND_API.G_FALSE,
86 x_POSTAL_CODE VARCHAR2:= FND_API.G_FALSE,
87 x_STATE VARCHAR2:= FND_API.G_FALSE,
88 x_PROVINCE VARCHAR2:= FND_API.G_FALSE,
89 x_ADDRESS_STYLE VARCHAR2:= FND_API.G_FALSE,
90 x_ADDRESS_LINES_PHONETIC VARCHAR2:= FND_API.G_FALSE,
91 x_COUNTY VARCHAR2:= FND_API.G_FALSE,
92 x_COUNTRY VARCHAR2:= FND_API.G_FALSE,
93 x_DESCRIPTION VARCHAR2:= FND_API.G_FALSE,
94 x_return_status OUT NOCOPY VARCHAR2,
95 x_msg_count OUT NOCOPY NUMBER,
96 x_msg_data OUT NOCOPY VARCHAR2,
97 p_validation_level IN NUMBER:= FND_API.G_VALID_LEVEL_FULL
98 ) Is
99 l_return_status VARCHAR2(1):='S';
100 l_msg_count NUMBER;
101 l_msg_data VARCHAR2(240);
102 l_location_id NUMBER;
103 l_last_update_date DATE := trunc(sysdate);
104 p_object_version_number NUMBER;
105 Begin
106
107 p_location_rec.location_id := x_location_id;
108 p_location_rec.country := x_country;
109 p_location_rec.address1 := x_address1;
110 p_location_rec.address2 := x_address2;
111 p_location_rec.address3 := x_address3;
112 p_location_rec.address4 := x_address4;
113 p_location_rec.city := x_city;
114 p_location_rec.postal_code := x_postal_code;
115 p_location_rec.state := x_state;
116 p_location_rec.province := x_province;
117 p_location_rec.county := x_county;
118 p_location_rec.address_style := x_address_style;
119 p_location_rec.address_lines_phonetic := x_address_lines_phonetic;
120 p_location_rec.description := x_description;
121 /* hz_location_pub.update_location (
122 p_api_version,
123 p_init_msg_list,
124 p_commit,
125 p_location_rec,
126 l_last_update_date,
127 l_return_status,
128 l_msg_count,
129 l_msg_data,
130 p_validation_level
131 );*/
132 hz_location_v2pub.update_location (p_init_msg_list,
133 p_location_rec,
134 p_object_version_number,
135 l_return_status,
136 l_msg_count,
137 l_msg_data);
138
139 x_return_status := l_return_status;
140 x_msg_count := l_msg_count;
141 x_msg_data := l_msg_data;
142
143
144 End;
145
146 End;