[Home] [Help]
190: l_sql VARCHAR2(4000);
191: l_count NUMBER;
192:
193: BEGIN
194: l_sql := 'SELECT 1 FROM DUAL WHERE EXISTS (SELECT 1 FROM ' || UPPER(p_table_name);
195: l_sql := l_sql || ' WHERE ' || UPPER(p_pk_name) || ' = :b1';
196:
197: IF p_additional_where_clause IS NOT NULL THEN
198: -- given time, incorporate bind_parse
251: , p_lookup_code => p_lookup_code
252: , p_view_application_id => 530
253: );
254: ELSE
255: l_sql := 'SELECT 1 FROM DUAL WHERE EXISTS (SELECT 1 FROM ' || p_lookup_table_name;
256: l_sql := l_sql || ' WHERE LOOKUP_TYPE = :b1';
257: l_sql := l_sql || ' AND LOOKUP_CODE = :b2';
258: l_sql := l_sql || ' AND ENABLED_FLAG = ''Y'')';
259:
352: l_bind_tbl col_val_tbl;
353:
354: BEGIN
355:
356: l_sql := 'SELECT 1 FROM DUAL WHERE EXISTS (SELECT 1 FROM ' || UPPER(p_table_name);
357: -- l_sql := l_sql || ' WHERE ' || p_where_clause;
358:
359: bind_parse (p_where_clause, l_bind_tbl);
360:
537:
538: CURSOR c_log_seq IS
539: SELECT ams_act_logs_s.NEXTVAL,
540: ams_act_logs_transaction_id_s.NEXTVAL
541: FROM DUAL;
542:
543: CURSOR c_log(l_my_log_id VARCHAR2) IS
544: SELECT rowid
545: FROM ams_act_logs
1957: -- org_id cursor
1958: CURSOR c_org_cur
1959: IS
1960: SELECT (TO_NUMBER(SUBSTRB(USERENV('CLIENT_INFO'), 1, 10)))
1961: FROM dual;
1962: --
1963: BEGIN
1964: OPEN c_org_cur;
1965: FETCH c_org_cur INTO l_org_id;
2142: -- org_id cursor
2143: CURSOR c_org_cur
2144: IS
2145: SELECT (TO_NUMBER(SUBSTRB(USERENV('CLIENT_INFO'), 1, 10)))
2146: FROM dual;
2147: BEGIN
2148: -- Initialize return status.
2149: x_return_status := fnd_api.g_ret_sts_success;
2150:
2541: )
2542: RETURN VARCHAR2
2543: IS
2544: CURSOR c_stat_det IS
2545: SELECT 1 FROM DUAL
2546: WHERE EXISTS (SELECT * FROM ams_status_order_rules
2547: WHERE current_status_code = p_current_status
2548: AND next_status_code = p_next_status
2549: AND system_status_type = p_status_type ) ;