74: 'p_party_type',p_party_type);
75: return;
76: end if;
77:
78: l_CursorID := DBMS_SQL.OPEN_CURSOR;
79: DBMS_SQL.PARSE(l_CursorID, l_Select, DBMS_SQL.V7);
80: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':party_id', p_party_id);
81: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':party_site_id',
82: p_party_site_id);
75: return;
76: end if;
77:
78: l_CursorID := DBMS_SQL.OPEN_CURSOR;
79: DBMS_SQL.PARSE(l_CursorID, l_Select, DBMS_SQL.V7);
80: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':party_id', p_party_id);
81: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':party_site_id',
82: p_party_site_id);
83: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_org_id);
76: end if;
77:
78: l_CursorID := DBMS_SQL.OPEN_CURSOR;
79: DBMS_SQL.PARSE(l_CursorID, l_Select, DBMS_SQL.V7);
80: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':party_id', p_party_id);
81: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':party_site_id',
82: p_party_site_id);
83: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_org_id);
84: l_result := DBMS_SQL.EXECUTE(l_CursorID);
77:
78: l_CursorID := DBMS_SQL.OPEN_CURSOR;
79: DBMS_SQL.PARSE(l_CursorID, l_Select, DBMS_SQL.V7);
80: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':party_id', p_party_id);
81: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':party_site_id',
82: p_party_site_id);
83: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_org_id);
84: l_result := DBMS_SQL.EXECUTE(l_CursorID);
85: IF DBMS_SQL.FETCH_ROWS(l_CursorID) <> 0 THEN
79: DBMS_SQL.PARSE(l_CursorID, l_Select, DBMS_SQL.V7);
80: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':party_id', p_party_id);
81: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':party_site_id',
82: p_party_site_id);
83: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_org_id);
84: l_result := DBMS_SQL.EXECUTE(l_CursorID);
85: IF DBMS_SQL.FETCH_ROWS(l_CursorID) <> 0 THEN
86: DBMS_SQL.COLUMN_VALUE(l_CursorID, 1, p_org_id);
87: END IF;
80: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':party_id', p_party_id);
81: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':party_site_id',
82: p_party_site_id);
83: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_org_id);
84: l_result := DBMS_SQL.EXECUTE(l_CursorID);
85: IF DBMS_SQL.FETCH_ROWS(l_CursorID) <> 0 THEN
86: DBMS_SQL.COLUMN_VALUE(l_CursorID, 1, p_org_id);
87: END IF;
88: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
81: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':party_site_id',
82: p_party_site_id);
83: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_org_id);
84: l_result := DBMS_SQL.EXECUTE(l_CursorID);
85: IF DBMS_SQL.FETCH_ROWS(l_CursorID) <> 0 THEN
86: DBMS_SQL.COLUMN_VALUE(l_CursorID, 1, p_org_id);
87: END IF;
88: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
89: end if;
82: p_party_site_id);
83: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_org_id);
84: l_result := DBMS_SQL.EXECUTE(l_CursorID);
85: IF DBMS_SQL.FETCH_ROWS(l_CursorID) <> 0 THEN
86: DBMS_SQL.COLUMN_VALUE(l_CursorID, 1, p_org_id);
87: END IF;
88: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
89: end if;
90:
84: l_result := DBMS_SQL.EXECUTE(l_CursorID);
85: IF DBMS_SQL.FETCH_ROWS(l_CursorID) <> 0 THEN
86: DBMS_SQL.COLUMN_VALUE(l_CursorID, 1, p_org_id);
87: END IF;
88: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
89: end if;
90:
91: exception
92: when others then
147: 'p_address_type',p_info_type);
148: return;
149: end if;
150:
151: l_CursorID := DBMS_SQL.OPEN_CURSOR;
152: DBMS_SQL.PARSE(l_CursorID, l_Select, DBMS_SQL.V7);
153: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':location_code_ext',
154: p_location_code_ext);
155: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_entity_address_id);
148: return;
149: end if;
150:
151: l_CursorID := DBMS_SQL.OPEN_CURSOR;
152: DBMS_SQL.PARSE(l_CursorID, l_Select, DBMS_SQL.V7);
153: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':location_code_ext',
154: p_location_code_ext);
155: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_entity_address_id);
156: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 2, p_org_id);
149: end if;
150:
151: l_CursorID := DBMS_SQL.OPEN_CURSOR;
152: DBMS_SQL.PARSE(l_CursorID, l_Select, DBMS_SQL.V7);
153: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':location_code_ext',
154: p_location_code_ext);
155: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_entity_address_id);
156: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 2, p_org_id);
157: l_result := DBMS_SQL.EXECUTE(l_CursorID);
151: l_CursorID := DBMS_SQL.OPEN_CURSOR;
152: DBMS_SQL.PARSE(l_CursorID, l_Select, DBMS_SQL.V7);
153: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':location_code_ext',
154: p_location_code_ext);
155: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_entity_address_id);
156: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 2, p_org_id);
157: l_result := DBMS_SQL.EXECUTE(l_CursorID);
158: IF DBMS_SQL.FETCH_ROWS(l_CursorID) <> 0 THEN
159: DBMS_SQL.COLUMN_VALUE(l_CursorID, 1, p_entity_address_id);
152: DBMS_SQL.PARSE(l_CursorID, l_Select, DBMS_SQL.V7);
153: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':location_code_ext',
154: p_location_code_ext);
155: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_entity_address_id);
156: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 2, p_org_id);
157: l_result := DBMS_SQL.EXECUTE(l_CursorID);
158: IF DBMS_SQL.FETCH_ROWS(l_CursorID) <> 0 THEN
159: DBMS_SQL.COLUMN_VALUE(l_CursorID, 1, p_entity_address_id);
160: DBMS_SQL.COLUMN_VALUE(l_CursorID, 2, p_org_id);
153: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':location_code_ext',
154: p_location_code_ext);
155: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_entity_address_id);
156: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 2, p_org_id);
157: l_result := DBMS_SQL.EXECUTE(l_CursorID);
158: IF DBMS_SQL.FETCH_ROWS(l_CursorID) <> 0 THEN
159: DBMS_SQL.COLUMN_VALUE(l_CursorID, 1, p_entity_address_id);
160: DBMS_SQL.COLUMN_VALUE(l_CursorID, 2, p_org_id);
161: END IF;
154: p_location_code_ext);
155: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_entity_address_id);
156: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 2, p_org_id);
157: l_result := DBMS_SQL.EXECUTE(l_CursorID);
158: IF DBMS_SQL.FETCH_ROWS(l_CursorID) <> 0 THEN
159: DBMS_SQL.COLUMN_VALUE(l_CursorID, 1, p_entity_address_id);
160: DBMS_SQL.COLUMN_VALUE(l_CursorID, 2, p_org_id);
161: END IF;
162: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
155: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 1, p_entity_address_id);
156: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 2, p_org_id);
157: l_result := DBMS_SQL.EXECUTE(l_CursorID);
158: IF DBMS_SQL.FETCH_ROWS(l_CursorID) <> 0 THEN
159: DBMS_SQL.COLUMN_VALUE(l_CursorID, 1, p_entity_address_id);
160: DBMS_SQL.COLUMN_VALUE(l_CursorID, 2, p_org_id);
161: END IF;
162: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
163:
156: DBMS_SQL.DEFINE_COLUMN(l_CursorID, 2, p_org_id);
157: l_result := DBMS_SQL.EXECUTE(l_CursorID);
158: IF DBMS_SQL.FETCH_ROWS(l_CursorID) <> 0 THEN
159: DBMS_SQL.COLUMN_VALUE(l_CursorID, 1, p_entity_address_id);
160: DBMS_SQL.COLUMN_VALUE(l_CursorID, 2, p_org_id);
161: END IF;
162: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
163:
164:
158: IF DBMS_SQL.FETCH_ROWS(l_CursorID) <> 0 THEN
159: DBMS_SQL.COLUMN_VALUE(l_CursorID, 1, p_entity_address_id);
160: DBMS_SQL.COLUMN_VALUE(l_CursorID, 2, p_org_id);
161: END IF;
162: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
163:
164:
165: if p_entity_address_id is NULL
166: then
325: fnd_profile.value_specific(
326: name=>:l_profile,user_id=>0,responsibility_id=>20420,
327: application_id=>174,org_id=>null,server_id=>null);
328: END;';
329: l_CursorID := DBMS_SQL.OPEN_CURSOR;
330: DBMS_SQL.PARSE(l_CursorID, l_String, DBMS_SQL.V7);
331: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':l_profile', l_profile);
332: /* Bug# 2243620 - email_address default length is 0 and the email
333: address returned is null unless bind_out_value is specified to be 2000*/
326: name=>:l_profile,user_id=>0,responsibility_id=>20420,
327: application_id=>174,org_id=>null,server_id=>null);
328: END;';
329: l_CursorID := DBMS_SQL.OPEN_CURSOR;
330: DBMS_SQL.PARSE(l_CursorID, l_String, DBMS_SQL.V7);
331: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':l_profile', l_profile);
332: /* Bug# 2243620 - email_address default length is 0 and the email
333: address returned is null unless bind_out_value is specified to be 2000*/
334: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':email_address', email_address, 2000);
327: application_id=>174,org_id=>null,server_id=>null);
328: END;';
329: l_CursorID := DBMS_SQL.OPEN_CURSOR;
330: DBMS_SQL.PARSE(l_CursorID, l_String, DBMS_SQL.V7);
331: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':l_profile', l_profile);
332: /* Bug# 2243620 - email_address default length is 0 and the email
333: address returned is null unless bind_out_value is specified to be 2000*/
334: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':email_address', email_address, 2000);
335: l_result := DBMS_SQL.EXECUTE(l_CursorID);
330: DBMS_SQL.PARSE(l_CursorID, l_String, DBMS_SQL.V7);
331: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':l_profile', l_profile);
332: /* Bug# 2243620 - email_address default length is 0 and the email
333: address returned is null unless bind_out_value is specified to be 2000*/
334: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':email_address', email_address, 2000);
335: l_result := DBMS_SQL.EXECUTE(l_CursorID);
336: DBMS_SQL.VARIABLE_VALUE(l_CursorID, ':email_address', email_address);
337: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
338: ELSE
331: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':l_profile', l_profile);
332: /* Bug# 2243620 - email_address default length is 0 and the email
333: address returned is null unless bind_out_value is specified to be 2000*/
334: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':email_address', email_address, 2000);
335: l_result := DBMS_SQL.EXECUTE(l_CursorID);
336: DBMS_SQL.VARIABLE_VALUE(l_CursorID, ':email_address', email_address);
337: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
338: ELSE
339: email_address := wf_core.translate('ECX_SYS_ADMIN_EMAIL');
332: /* Bug# 2243620 - email_address default length is 0 and the email
333: address returned is null unless bind_out_value is specified to be 2000*/
334: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':email_address', email_address, 2000);
335: l_result := DBMS_SQL.EXECUTE(l_CursorID);
336: DBMS_SQL.VARIABLE_VALUE(l_CursorID, ':email_address', email_address);
337: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
338: ELSE
339: email_address := wf_core.translate('ECX_SYS_ADMIN_EMAIL');
340: END IF;
333: address returned is null unless bind_out_value is specified to be 2000*/
334: DBMS_SQL.BIND_VARIABLE(l_CursorID, ':email_address', email_address, 2000);
335: l_result := DBMS_SQL.EXECUTE(l_CursorID);
336: DBMS_SQL.VARIABLE_VALUE(l_CursorID, ':email_address', email_address);
337: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
338: ELSE
339: email_address := wf_core.translate('ECX_SYS_ADMIN_EMAIL');
340: END IF;
341: