eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.AST_PARTY_LOCATIONS_V2PUB

Source


1 PACKAGE BODY AST_PARTY_LOCATIONS_V2PUB AS
2  /* $Header: astcul2b.pls 120.3 2005/10/26 12:13:29 rkumares ship $ */
3 
4  PROCEDURE Create_Address (
5      p_address_rec       IN   AST_API_RECORDS_V2PKG.ADDRESS_REC_TYPE,
6      x_msg_count         OUT NOCOPY  NUMBER,
7      x_msg_data          OUT NOCOPY  VARCHAR2,
8      x_return_status     OUT NOCOPY  VARCHAR2,
9      x_location_id       OUT NOCOPY  NUMBER) Is
10 
11    l_location_rec HZ_LOCATION_V2PUB.LOCATION_REC_TYPE;
12    l_return_status VARCHAR2(1);
13    l_msg_count NUMBER;
14    l_msg_data  VARCHAR2(2000);
15    l_location_id NUMBER;
16    l_loc_id      NUMBER;
17    l_created_by_module VARCHAR2(150);
18    l_application_id NUMBER;
19    l_addr_val_level VARCHAR2(30);
20    l_addr_val_status VARCHAR2(30);
21    l_addr_warn_msg VARCHAR2(2000);
22  Begin
23    l_location_rec.address1 := p_address_rec.address1;
24    l_location_rec.address2 := p_address_rec.address2;
25    l_location_rec.address3 := p_address_rec.address3;
26    l_location_rec.address4 := p_address_rec.address4;
27    l_location_rec.city     := p_address_rec.city;
28    l_location_rec.state    := p_address_rec.state;
29    l_location_rec.county   := p_address_rec.county;
30    l_location_rec.country  := p_address_rec.country;
31    l_location_rec.postal_code := p_address_rec.postal_code;
32    l_location_rec.province := p_address_rec.province;
33    l_location_rec.attribute_category := p_address_rec.Attribute_Category;
34    l_location_rec.attribute1 := p_address_rec.Attribute1;
35    l_location_rec.attribute2 := p_address_rec.Attribute2;
36    l_location_rec.attribute3 := p_address_rec.Attribute3;
37    l_location_rec.attribute4 := p_address_rec.Attribute4;
38    l_location_rec.attribute5 := p_address_rec.Attribute5;
39    l_location_rec.attribute6 := p_address_rec.Attribute6;
40    l_location_rec.attribute7 := p_address_rec.Attribute7;
41    l_location_rec.attribute8 := p_address_rec.Attribute8;
42    l_location_rec.attribute9 := p_address_rec.Attribute9;
43    l_location_rec.attribute10 := p_address_rec.Attribute10;
44    l_location_rec.attribute11 := p_address_rec.Attribute11;
45    l_location_rec.attribute12 := p_address_rec.Attribute12;
46    l_location_rec.attribute13 := p_address_rec.Attribute13;
47    l_location_rec.attribute14 := p_address_rec.Attribute14;
48    l_location_rec.attribute15 := p_address_rec.Attribute15;
49    l_location_rec.attribute16 := p_address_rec.Attribute16;
50    l_location_rec.attribute17 := p_address_rec.Attribute17;
51    l_location_rec.attribute18 := p_address_rec.Attribute18;
52    l_location_rec.attribute19 := p_address_rec.Attribute19;
53    l_location_rec.attribute20 := p_address_rec.Attribute20;
54    l_location_rec.address_lines_phonetic := p_address_rec.Address_lines_phonetic;
55    l_location_rec.po_box_number          := p_address_rec.Po_box_number;
56    l_location_rec.house_number           := p_address_rec.House_number;
57    l_location_rec.street_suffix          := p_address_rec.Street_suffix;
58    l_location_rec.street                 := p_address_rec.Street;
59    l_location_rec.street_number          := p_address_rec.Street_number;
60    l_location_rec.floor                  := p_address_rec.Floor;
61    l_location_rec.suite                  := p_address_rec.Suite;
62    l_location_rec.timezone_id            := p_address_rec.Timezone_id;
63    l_location_rec.address_effective_date := p_address_rec.address_effective_date;
64    l_location_rec.address_expiration_date := p_address_rec.address_expiration_date;
65    l_location_rec.address_style := p_address_rec.address_style;
66    l_location_rec.created_by_module      := p_address_rec.created_by_module;
67    l_location_rec.application_id         := p_address_rec.application_id;
68    l_created_by_module                   := p_address_rec.created_by_module;
69    l_application_id                      := p_address_rec.application_id;
70 
71      HZ_LOCATION_V2PUB.create_location (
72      p_init_msg_list     => FND_API.G_FALSE,
73      p_location_rec      => l_location_rec,
74      x_location_id       => l_location_id,
75      x_return_status     => l_return_status,
76      x_msg_count         => l_msg_count,
77      x_msg_data          => l_msg_data
78 	);
79 
80      x_return_status := l_return_status;
81      x_msg_count     := l_msg_count;
82      x_msg_data      := l_msg_data;
83 
84      If x_return_status = FND_API.G_RET_STS_SUCCESS Then
85           x_location_id   := l_location_id;
86 		  /* Added for R12 Address Validation */
87 		  If (l_location_id is not null and
88 			 nvl(fnd_profile.value('AS_PERFORM_ADDRESS_VALIDATION'),'N')= 'Y') then
89 			  HZ_GNR_PUB.validateLoc(
90 			   p_location_id          => l_location_id,
91 			   p_init_msg_list        => FND_API.G_FALSE,
92 			   x_addr_val_level       => l_addr_val_level,
93 			   x_addr_warn_msg		  => l_addr_warn_msg,
94 			   x_addr_val_status      => l_addr_val_status,
95 			   x_return_status        => l_return_status,
96 			   x_msg_count            => l_msg_count,
97 			   x_msg_data             => l_msg_data);
98 
99 			   x_return_status := l_return_status;
100 			   x_msg_count     := l_msg_count;
101 			   x_msg_data      := l_msg_data;
102 		END IF;
103 	 End If;
104 
105  End Create_Address;
106 
107  PROCEDURE Update_Address (
108      p_address_rec           IN     AST_API_RECORDS_V2PKG.ADDRESS_REC_TYPE,
109      p_object_version_number IN OUT NOCOPY NUMBER,
110      x_msg_count                OUT NOCOPY NUMBER,
111      x_msg_data                 OUT NOCOPY VARCHAR2,
112      x_return_status            OUT NOCOPY VARCHAR2) Is
113 
114    l_location_rec HZ_LOCATION_V2PUB.LOCATION_REC_TYPE;
115    l_return_status VARCHAR2(1);
116    l_msg_count NUMBER;
117    l_msg_data  VARCHAR2(2000);
118    l_loc_id    NUMBER;
119    l_created_by_module VARCHAR2(150);
120    l_application_id NUMBER;
121    l_addr_val_level VARCHAR2(30);
122    l_addr_val_status VARCHAR2(30);
123    l_addr_warn_msg VARCHAR2(2000);
124  Begin
125    l_location_rec.address1 := p_address_rec.address1;
126    l_location_rec.address2 := p_address_rec.address2;
127    l_location_rec.address3 := p_address_rec.address3;
128    l_location_rec.address4 := p_address_rec.address4;
129    l_location_rec.location_id := p_address_rec.location_id;
130    l_location_rec.city     := p_address_rec.city;
131    l_location_rec.state    := p_address_rec.state;
132    l_location_rec.county   := p_address_rec.county;
133    l_location_rec.country  := p_address_rec.country;
134    l_location_rec.postal_code := p_address_rec.postal_code;
135    l_location_rec.province := p_address_rec.province;
136    l_location_rec.attribute_category := p_address_rec.Attribute_Category;
137    l_location_rec.attribute1 := p_address_rec.Attribute1;
138    l_location_rec.attribute2 := p_address_rec.Attribute2;
139    l_location_rec.attribute3 := p_address_rec.Attribute3;
140    l_location_rec.attribute4 := p_address_rec.Attribute4;
141    l_location_rec.attribute5 := p_address_rec.Attribute5;
142    l_location_rec.attribute6 := p_address_rec.Attribute6;
143    l_location_rec.attribute7 := p_address_rec.Attribute7;
144    l_location_rec.attribute8 := p_address_rec.Attribute8;
145    l_location_rec.attribute9 := p_address_rec.Attribute9;
146    l_location_rec.attribute10 := p_address_rec.Attribute10;
147    l_location_rec.attribute11 := p_address_rec.Attribute11;
148    l_location_rec.attribute12 := p_address_rec.Attribute12;
149    l_location_rec.attribute13 := p_address_rec.Attribute13;
150    l_location_rec.attribute14 := p_address_rec.Attribute14;
151    l_location_rec.attribute15 := p_address_rec.Attribute15;
152    l_location_rec.attribute16 := p_address_rec.Attribute16;
153    l_location_rec.attribute17 := p_address_rec.Attribute17;
154    l_location_rec.attribute18 := p_address_rec.Attribute18;
155    l_location_rec.attribute19 := p_address_rec.Attribute19;
156    l_location_rec.attribute20 := p_address_rec.Attribute20;
157    l_location_rec.address_lines_phonetic := p_address_rec.Address_lines_phonetic;
158    l_location_rec.po_box_number          := p_address_rec.Po_box_number;
159    l_location_rec.house_number           := p_address_rec.House_number;
160    l_location_rec.street_suffix          := p_address_rec.Street_suffix;
161    l_location_rec.street                 := p_address_rec.Street;
162    l_location_rec.street_number          := p_address_rec.Street_number;
163    l_location_rec.floor                  := p_address_rec.Floor;
164    l_location_rec.suite                  := p_address_rec.Suite;
165    l_location_rec.timezone_id            := p_address_rec.Timezone_id;
166    l_location_rec.address_effective_date := p_address_rec.address_effective_date;
167    l_location_rec.address_expiration_date := p_address_rec.address_expiration_date;
168    l_location_rec.address_style := p_address_rec.address_style;
169    l_location_rec.application_id          := p_address_rec.application_id;
170    l_location_rec.created_by_module       := p_address_rec.created_by_module;
171    l_created_by_module                    := p_address_rec.created_by_module;
172    l_application_id                       := p_address_rec.application_id;
173 
174      HZ_LOCATION_V2PUB.update_location (
175      p_init_msg_list         => FND_API.G_FALSE,
176      p_location_rec          => l_location_rec,
177      p_object_version_number => p_object_version_number,
178      x_return_status         => l_return_status,
179      x_msg_count             => l_msg_count,
180      x_msg_data              => l_msg_data
181 	);
182 
183      x_return_status := l_return_status;
184      x_msg_count     := l_msg_count;
185      x_msg_data      := l_msg_data;
186 	If x_return_status = FND_API.G_RET_STS_SUCCESS AND
187 		nvl(fnd_profile.value('AS_PERFORM_ADDRESS_VALIDATION'),'N')= 'Y' then
188 	   /* Added for R12 Address Validation */
189 		HZ_GNR_PUB.validateLoc(
190            p_location_id          => l_location_rec.location_id,
191            p_init_msg_list        => FND_API.G_FALSE,
192            x_addr_val_level       => l_addr_val_level,
193 		   x_addr_warn_msg		  => l_addr_warn_msg,
194            x_addr_val_status      => l_addr_val_status,
195            x_return_status        => l_return_status,
196            x_msg_count            => l_msg_count,
197            x_msg_data             => l_msg_data);
198 
199 		   x_return_status := l_return_status;
200 		   x_msg_count     := l_msg_count;
201 		   x_msg_data      := l_msg_data;
202 	END IF;
203 End Update_Address;
204 
205 END AST_PARTY_LOCATIONS_V2PUB;