109: FROM xla_conditions_t
110: WHERE error_value = 0
111: FOR UPDATE of error_value;
112:
113: CURSOR c_xla_line_assgns_t IS -- cursor for xla_line_assgns_t
114: SELECT *
115: FROM xla_line_assgns_t
116: WHERE error_value = 0
117: FOR UPDATE of error_value;
111: FOR UPDATE of error_value;
112:
113: CURSOR c_xla_line_assgns_t IS -- cursor for xla_line_assgns_t
114: SELECT *
115: FROM xla_line_assgns_t
116: WHERE error_value = 0
117: FOR UPDATE of error_value;
118:
119: CURSOR c_languages IS -- cursor for installed languages
123:
124: l_xla_rules c_xla_rules_t%ROWTYPE;
125: l_xla_rule_details c_xla_rule_details_t%ROWTYPE;
126: l_xla_conditions c_xla_conditions_t%ROWTYPE;
127: l_xla_line_assgns c_xla_line_assgns_t%ROWTYPE;
128: l_base_language VARCHAR2(4);
129: l_installed_language t_array_vl4;
130: l_user_id INTEGER;
131: l_login_id INTEGER;
465: END; -- Block ends
466: END LOOP;
467: CLOSE c_xla_conditions_t;
468:
469: OPEN c_xla_line_assgns_t;
470: LOOP
471: FETCH c_xla_line_assgns_t INTO l_xla_line_assgns;
472: EXIT WHEN c_xla_line_assgns_t%NOTFOUND;
473:
467: CLOSE c_xla_conditions_t;
468:
469: OPEN c_xla_line_assgns_t;
470: LOOP
471: FETCH c_xla_line_assgns_t INTO l_xla_line_assgns;
472: EXIT WHEN c_xla_line_assgns_t%NOTFOUND;
473:
474: BEGIN -- Block begins
475: -- Insert data into xla_line_defn_adr_assgns
468:
469: OPEN c_xla_line_assgns_t;
470: LOOP
471: FETCH c_xla_line_assgns_t INTO l_xla_line_assgns;
472: EXIT WHEN c_xla_line_assgns_t%NOTFOUND;
473:
474: BEGIN -- Block begins
475: -- Insert data into xla_line_defn_adr_assgns
476: INSERT INTO xla_line_defn_adr_assgns
519: ,l_xla_line_assgns.application_id
520: ,0
521: );
522: -- Mark the row in the interface table as been processed
523: UPDATE xla_line_assgns_t
524: SET error_value = 1 -- The row has been processed with no error
525: WHERE CURRENT OF c_xla_line_assgns_t;
526: EXCEPTION
527: WHEN OTHERS THEN
521: );
522: -- Mark the row in the interface table as been processed
523: UPDATE xla_line_assgns_t
524: SET error_value = 1 -- The row has been processed with no error
525: WHERE CURRENT OF c_xla_line_assgns_t;
526: EXCEPTION
527: WHEN OTHERS THEN
528: l_error_code := SQLCODE;
529: UPDATE xla_line_assgns_t
525: WHERE CURRENT OF c_xla_line_assgns_t;
526: EXCEPTION
527: WHEN OTHERS THEN
528: l_error_code := SQLCODE;
529: UPDATE xla_line_assgns_t
530: SET error_value = l_error_code -- The row has been processed with errors
531: WHERE CURRENT OF c_xla_line_assgns_t;
532: END; -- Block ends
533: END LOOP;
527: WHEN OTHERS THEN
528: l_error_code := SQLCODE;
529: UPDATE xla_line_assgns_t
530: SET error_value = l_error_code -- The row has been processed with errors
531: WHERE CURRENT OF c_xla_line_assgns_t;
532: END; -- Block ends
533: END LOOP;
534: CLOSE c_xla_line_assgns_t;
535:
530: SET error_value = l_error_code -- The row has been processed with errors
531: WHERE CURRENT OF c_xla_line_assgns_t;
532: END; -- Block ends
533: END LOOP;
534: CLOSE c_xla_line_assgns_t;
535:
536: --END LOOP;
537: --CLOSE c_xla_rules_t;
538: