1: PACKAGE BODY ZX_PTP_CUST_MIG_PKG AS
2: /* $Header: zxptpcustmigb.pls 120.22 2005/07/25 07:45:36 asengupt ship $ */
3:
4:
5: l_Created_By zx_party_tax_profile.created_by%type := fnd_global.user_id;
6: l_Creation_Date zx_party_tax_profile.creation_date%type := SYSDATE;
7: l_Last_Updated_By zx_party_tax_profile.last_updated_by%type := fnd_global.user_id;
8: l_Last_Update_Date zx_party_tax_profile.last_update_date%type := SYSDATE;
9: l_Last_Update_Login zx_party_tax_profile.last_update_login%type := FND_GLOBAL.CONC_LOGIN_ID;
2: /* $Header: zxptpcustmigb.pls 120.22 2005/07/25 07:45:36 asengupt ship $ */
3:
4:
5: l_Created_By zx_party_tax_profile.created_by%type := fnd_global.user_id;
6: l_Creation_Date zx_party_tax_profile.creation_date%type := SYSDATE;
7: l_Last_Updated_By zx_party_tax_profile.last_updated_by%type := fnd_global.user_id;
8: l_Last_Update_Date zx_party_tax_profile.last_update_date%type := SYSDATE;
9: l_Last_Update_Login zx_party_tax_profile.last_update_login%type := FND_GLOBAL.CONC_LOGIN_ID;
10: l_Request_Id zx_party_tax_profile.request_id%type := FND_GLOBAL.CONC_REQUEST_ID;
3:
4:
5: l_Created_By zx_party_tax_profile.created_by%type := fnd_global.user_id;
6: l_Creation_Date zx_party_tax_profile.creation_date%type := SYSDATE;
7: l_Last_Updated_By zx_party_tax_profile.last_updated_by%type := fnd_global.user_id;
8: l_Last_Update_Date zx_party_tax_profile.last_update_date%type := SYSDATE;
9: l_Last_Update_Login zx_party_tax_profile.last_update_login%type := FND_GLOBAL.CONC_LOGIN_ID;
10: l_Request_Id zx_party_tax_profile.request_id%type := FND_GLOBAL.CONC_REQUEST_ID;
11: l_Program_Application_Id zx_party_tax_profile.program_application_id%type := 235;
4:
5: l_Created_By zx_party_tax_profile.created_by%type := fnd_global.user_id;
6: l_Creation_Date zx_party_tax_profile.creation_date%type := SYSDATE;
7: l_Last_Updated_By zx_party_tax_profile.last_updated_by%type := fnd_global.user_id;
8: l_Last_Update_Date zx_party_tax_profile.last_update_date%type := SYSDATE;
9: l_Last_Update_Login zx_party_tax_profile.last_update_login%type := FND_GLOBAL.CONC_LOGIN_ID;
10: l_Request_Id zx_party_tax_profile.request_id%type := FND_GLOBAL.CONC_REQUEST_ID;
11: l_Program_Application_Id zx_party_tax_profile.program_application_id%type := 235;
12: l_Program_Id zx_party_tax_profile.program_id%type := FND_GLOBAL.CONC_PROGRAM_ID;
5: l_Created_By zx_party_tax_profile.created_by%type := fnd_global.user_id;
6: l_Creation_Date zx_party_tax_profile.creation_date%type := SYSDATE;
7: l_Last_Updated_By zx_party_tax_profile.last_updated_by%type := fnd_global.user_id;
8: l_Last_Update_Date zx_party_tax_profile.last_update_date%type := SYSDATE;
9: l_Last_Update_Login zx_party_tax_profile.last_update_login%type := FND_GLOBAL.CONC_LOGIN_ID;
10: l_Request_Id zx_party_tax_profile.request_id%type := FND_GLOBAL.CONC_REQUEST_ID;
11: l_Program_Application_Id zx_party_tax_profile.program_application_id%type := 235;
12: l_Program_Id zx_party_tax_profile.program_id%type := FND_GLOBAL.CONC_PROGRAM_ID;
13: l_Program_Login_Id zx_party_tax_profile.program_login_id%type := FND_GLOBAL.CONC_LOGIN_ID;
6: l_Creation_Date zx_party_tax_profile.creation_date%type := SYSDATE;
7: l_Last_Updated_By zx_party_tax_profile.last_updated_by%type := fnd_global.user_id;
8: l_Last_Update_Date zx_party_tax_profile.last_update_date%type := SYSDATE;
9: l_Last_Update_Login zx_party_tax_profile.last_update_login%type := FND_GLOBAL.CONC_LOGIN_ID;
10: l_Request_Id zx_party_tax_profile.request_id%type := FND_GLOBAL.CONC_REQUEST_ID;
11: l_Program_Application_Id zx_party_tax_profile.program_application_id%type := 235;
12: l_Program_Id zx_party_tax_profile.program_id%type := FND_GLOBAL.CONC_PROGRAM_ID;
13: l_Program_Login_Id zx_party_tax_profile.program_login_id%type := FND_GLOBAL.CONC_LOGIN_ID;
14:
7: l_Last_Updated_By zx_party_tax_profile.last_updated_by%type := fnd_global.user_id;
8: l_Last_Update_Date zx_party_tax_profile.last_update_date%type := SYSDATE;
9: l_Last_Update_Login zx_party_tax_profile.last_update_login%type := FND_GLOBAL.CONC_LOGIN_ID;
10: l_Request_Id zx_party_tax_profile.request_id%type := FND_GLOBAL.CONC_REQUEST_ID;
11: l_Program_Application_Id zx_party_tax_profile.program_application_id%type := 235;
12: l_Program_Id zx_party_tax_profile.program_id%type := FND_GLOBAL.CONC_PROGRAM_ID;
13: l_Program_Login_Id zx_party_tax_profile.program_login_id%type := FND_GLOBAL.CONC_LOGIN_ID;
14:
15: ----The variables added below enable the ad_parallel_update feature to be used to imporve performance
8: l_Last_Update_Date zx_party_tax_profile.last_update_date%type := SYSDATE;
9: l_Last_Update_Login zx_party_tax_profile.last_update_login%type := FND_GLOBAL.CONC_LOGIN_ID;
10: l_Request_Id zx_party_tax_profile.request_id%type := FND_GLOBAL.CONC_REQUEST_ID;
11: l_Program_Application_Id zx_party_tax_profile.program_application_id%type := 235;
12: l_Program_Id zx_party_tax_profile.program_id%type := FND_GLOBAL.CONC_PROGRAM_ID;
13: l_Program_Login_Id zx_party_tax_profile.program_login_id%type := FND_GLOBAL.CONC_LOGIN_ID;
14:
15: ----The variables added below enable the ad_parallel_update feature to be used to imporve performance
16: l_worker_id NUMBER;
9: l_Last_Update_Login zx_party_tax_profile.last_update_login%type := FND_GLOBAL.CONC_LOGIN_ID;
10: l_Request_Id zx_party_tax_profile.request_id%type := FND_GLOBAL.CONC_REQUEST_ID;
11: l_Program_Application_Id zx_party_tax_profile.program_application_id%type := 235;
12: l_Program_Id zx_party_tax_profile.program_id%type := FND_GLOBAL.CONC_PROGRAM_ID;
13: l_Program_Login_Id zx_party_tax_profile.program_login_id%type := FND_GLOBAL.CONC_LOGIN_ID;
14:
15: ----The variables added below enable the ad_parallel_update feature to be used to imporve performance
16: l_worker_id NUMBER;
17: l_num_workers NUMBER;
57:
58:
59: INSERT ALL
60: INTO
61: ZX_PARTY_TAX_PROFILE (
62: Party_Tax_Profile_Id
63: ,Party_Id
64: ,Rep_Registration_Number --BugFix 4054814
65: ,Registration_Type_Code
96: ,OBJECT_VERSION_NUMBER
97: )
98: VALUES
99: (
100: ZX_PARTY_TAX_PROFILE_S.NEXTVAL
101: ,PARTY_ID -- Party ID
102: ,TAX_REFERENCE -- Rep Registration Number
103: ,NULL -- Registration Type
104: ,COUNTRY_CODE -- Country Code
143: HZ_PARTIES HZP
144: WHERE
145: (HZP.PARTY_TYPE = 'ORGANIZATION'
146: OR HZP.PARTY_TYPE = 'PERSON')
147: AND not exists (select 1 from zx_party_tax_profile
148: where party_id = HZP.PARTY_ID and Party_Type_Code = 'THIRD_PARTY'
149: );
150:
151:
192:
193:
194: INSERT
195: INTO
196: ZX_PARTY_TAX_PROFILE(
197: Party_Tax_Profile_Id
198: ,Party_Id
199: ,Rep_Registration_Number --BugFix 4054875
200: ,Registration_Type_Code
230: ,PROGRAM_LOGIN_ID
231: ,OBJECT_VERSION_NUMBER
232: )
233: SELECT
234: ZX_PARTY_TAX_PROFILE_S.NEXTVAL
235: ,HZPS.PARTY_SITE_ID -- Party ID
236: ,PTP.Rep_Registration_Number --- Rep Registration
237: ,NULL
238: ,PTP.COUNTRY_CODE
267: ,l_Program_Login_Id
268: ,1
269: FROM
270:
271: ZX_PARTY_TAX_PROFILE PTP,
272: HZ_PARTY_SITES HZPS
273:
274: WHERE
275: PTP.party_id = HZPS.party_id
273:
274: WHERE
275: PTP.party_id = HZPS.party_id
276: AND PTP.Party_Type_Code = 'CUSTOMER'
277: AND not exists ( select 1 from zx_party_tax_profile
278: where party_id = HZPS.Party_Site_Id
279: and Party_Type_Code = 'THIRD_PARTY_SITE');
280:
281:
504:
505: PROCEDURE ZX_PTP_CUST_MIG IS
506: BEGIN
507:
508: EXECUTE IMMEDIATE 'ALTER SEQUENCE ZX.ZX_PARTY_TAX_PROFILE_S CACHE 20000';
509:
510: arp_util_tax.debug(' ZX_PTP_CUST_MIG... (+) ' );
511:
512: arp_util_tax.debug(' Calling CREATE_LOOKUPS.. ' );
520: arp_util_tax.debug(' Calling CUSTOMER_SITE_MIGRATE.. ' );
521:
522: --ZX_PTP_CUST_MIG_PKG.CUSTOMER_SITE_MIGRATE;
523:
524: EXECUTE IMMEDIATE 'ALTER SEQUENCE ZX.ZX_PARTY_TAX_PROFILE_S CACHE 20';
525:
526: END ZX_PTP_CUST_MIG;
527:
528: