12: BEGIN
13:
14: IF p_alt_name is NOT NULL then
15: IF p_site_use_id is null then
16: DELETE ar_customer_alt_names
17: WHERE customer_id = p_customer_id
18: and alt_name = p_alt_name;
19:
20: ELSE
17: WHERE customer_id = p_customer_id
18: and alt_name = p_alt_name;
19:
20: ELSE
21: DELETE ar_customer_alt_names
22: WHERE customer_id = p_customer_id
23: AND site_use_id = p_site_use_id
24: AND alt_name = p_alt_name;
25: END IF;
24: AND alt_name = p_alt_name;
25: END IF;
26: ELSE
27: IF p_site_use_id is null then
28: DELETE ar_customer_alt_names
29: WHERE customer_id = p_customer_id;
30: ELSE
31: DELETE ar_customer_alt_names
32: WHERE customer_id = p_customer_id
27: IF p_site_use_id is null then
28: DELETE ar_customer_alt_names
29: WHERE customer_id = p_customer_id;
30: ELSE
31: DELETE ar_customer_alt_names
32: WHERE customer_id = p_customer_id
33: AND site_use_id = p_site_use_id;
34: END IF;
35: END IF;
53: l_user_id NUMBER;
54:
55: CURSOR c1 IS
56: SELECT 1
57: FROM ar_customer_alt_names
58: WHERE customer_id = p_customer_id
59: AND alt_name = p_alt_name
60: AND decode(site_use_id,'',-1,site_use_id) = decode(p_site_use_id,'',-1,p_site_use_id);
61:
67: fetch c1 into l_dummy;
68:
69: IF not c1%FOUND THEN
70:
71: SELECT ar_customer_alt_names_s.nextval
72: INTO l_alt_name_id
73: FROM dual;
74:
75: INSERT INTO ar_customer_alt_names (
71: SELECT ar_customer_alt_names_s.nextval
72: INTO l_alt_name_id
73: FROM dual;
74:
75: INSERT INTO ar_customer_alt_names (
76: alt_name_id,
77: alt_name,
78: customer_id,
79: site_use_id,
116: l_user_id NUMBER;
117:
118: CURSOR c1 IS
119: SELECT alt_name_id
120: FROM ar_customer_alt_names
121: WHERE customer_id = p_customer_id
122: AND decode(site_use_id,'',-1,site_use_id) = decode(p_site_use_id,'',-1,p_site_use_id)
123: FOR UPDATE;
124:
130: fetch c1 into l_alt_name_id;
131:
132: IF c1%FOUND THEN
133:
134: UPDATE ar_customer_alt_names
135: SET term_id = p_term_id,
136: last_update_date = sysdate,
137: last_update_login = l_user_id,
138: last_updated_by = l_user_id
159:
160: IF p_site_use_id is null then
161: SELECT 1
162: INTO p_status
163: FROM ar_customer_alt_names
164: WHERE customer_id = p_customer_id
165: FOR UPDATE OF alt_name_id NOWAIT;
166:
167: ELSE
166:
167: ELSE
168: SELECT 1
169: INTO p_status
170: FROM ar_customer_alt_names
171: WHERE customer_id = p_customer_id
172: AND site_use_id = p_site_use_id
173: FOR UPDATE OF alt_name_id NOWAIT;
174: