[Home] [Help]
1882: IF p_attribute_id in (46, 49) AND l_old_cc_number IS NULL AND l_old_cc_code IS NULL THEN
1883: BEGIN
1884: SELECT instrid
1885: INTO l_old_instrument_id
1886: FROM iby_creditcard_h
1887: WHERE card_history_change_id = l_old_instrument_id;
1888: EXCEPTION WHEN NO_DATA_FOUND THEN
1889: l_old_instrument_id := null;
1890: END;
1895:
1896: BEGIN
1897: SELECT instrid
1898: INTO l_new_instrument_id
1899: FROM iby_creditcard_h
1900: WHERE card_history_change_id = l_new_instrument_id;
1901: EXCEPTION WHEN NO_DATA_FOUND THEN
1902: l_new_instrument_id := null;
1903: END;
1974: -- AND (l_old_cc_code is null and l_new_cc_code is null)
1975: -- THEN
1976: l_old_sql_stmt := 'select '
1977: || l_column_name
1978: || ' from iby_creditcard_h'
1979: || ' where card_history_change_id = :x ';
1980: ELSE
1981: l_old_sql_stmt := 'select '
1982: || l_column_name
1987:
1988: IF (l_new_cc_code is null and l_new_cc_code is null) THEN
1989: l_new_sql_stmt := 'select '
1990: || l_column_name
1991: || ' from iby_creditcard_h'
1992: || ' where card_history_change_id = :x ';
1993: ELSE
1994: l_new_sql_stmt := 'select '
1995: || l_column_name
2046:
2047: IF p_instr_flag = 'N' THEN
2048: l_sql_stmt := 'select '
2049: || l_column_name
2050: || ' from iby_creditcard_h'
2051: || ' where card_history_change_id = :x ';
2052:
2053: ELSE
2054: l_sql_stmt := 'select '