PACKAGE BODY: APPS.IBY_BEPLANGS_PKG

Source

1 package body iby_beplangs_pkg as
2 /*$Header: ibybeplb.pls 115.8 2002/10/02 22:23:38 jleybovi ship $*/
3 
4 /*
5 ** Procedure: createBEPLangs
6 ** Purpose:  creates the beplang information,
7 **           replace previous entries, if any
8 **
9 */
10 procedure createBEPLangs( i_bepid in iby_beplangs.bepid%type,
11                           i_preNLSLang in iby_beplangs.beplang%type,
12                           i_opt1NLSLang in iby_beplangs.beplang%type,
13                           i_opt2NLSLang in iby_beplangs.beplang%type)
14 is
15 begin
16 /*
17 ** delete all the rows that blong to this bep.
18 */
19     delete from iby_beplangs
20     where bepid = i_bepid;
21 /*
22 ** insert preferred language entry in the table.
23 */
24     insert into iby_beplangs( bepid, beplang, preferred,
25 	last_update_date, last_updated_by,
26 	creation_date, created_by,
27 	last_update_login, object_version_number)
28     values (i_bepid, i_preNLSLang, 0,
29 	 sysdate, fnd_global.user_id,
30 	 sysdate, fnd_global.user_id,
31 	fnd_global.login_id, 1);
32 
33 /*
34 ** insert optional language 1 entry in the table.
35 */
36     insert into iby_beplangs( bepid, beplang, preferred,
37 	last_update_date, last_updated_by,
38 	creation_date, created_by,
39 	last_update_login, object_version_number)
40     values (i_bepid, i_opt1NLSLang, 1,
41 	 sysdate, fnd_global.user_id,
42 	 sysdate, fnd_global.user_id,
43 	fnd_global.login_id, 1);
44 /*
45 ** insert optional language 2 entry in the table.
46 */
47     insert into iby_beplangs( bepid, beplang, preferred,
48 	last_update_date, last_updated_by,
49 	creation_date, created_by,
50 	last_update_login, object_version_number)
51     values (i_bepid, i_opt2NLSLang, 2,
52 	 sysdate, fnd_global.user_id,
53 	 sysdate, fnd_global.user_id,
54 	fnd_global.login_id, 1);
55 
56     commit;
57 end createBEPLangs;
58 
59 end iby_beplangs_pkg;