1867: end if;
1868: --
1869: statem := 'BEGIN '||range_proc||'(:pactid, :sqlstr); END;';
1870: --
1871: sql_cur := dbms_sql.open_cursor;
1872: dbms_sql.parse(sql_cur,
1873: statem,
1874: dbms_sql.v7);
1875: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
1868: --
1869: statem := 'BEGIN '||range_proc||'(:pactid, :sqlstr); END;';
1870: --
1871: sql_cur := dbms_sql.open_cursor;
1872: dbms_sql.parse(sql_cur,
1873: statem,
1874: dbms_sql.v7);
1875: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
1876: dbms_sql.bind_variable(sql_cur, ':sqlstr', sqlstr, max_dynsql_len);
1870: --
1871: sql_cur := dbms_sql.open_cursor;
1872: dbms_sql.parse(sql_cur,
1873: statem,
1874: dbms_sql.v7);
1875: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
1876: dbms_sql.bind_variable(sql_cur, ':sqlstr', sqlstr, max_dynsql_len);
1877: ignore := dbms_sql.execute(sql_cur);
1878: dbms_sql.variable_value(sql_cur, ':sqlstr', sqlstr);
1871: sql_cur := dbms_sql.open_cursor;
1872: dbms_sql.parse(sql_cur,
1873: statem,
1874: dbms_sql.v7);
1875: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
1876: dbms_sql.bind_variable(sql_cur, ':sqlstr', sqlstr, max_dynsql_len);
1877: ignore := dbms_sql.execute(sql_cur);
1878: dbms_sql.variable_value(sql_cur, ':sqlstr', sqlstr);
1879: dbms_sql.close_cursor(sql_cur);
1872: dbms_sql.parse(sql_cur,
1873: statem,
1874: dbms_sql.v7);
1875: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
1876: dbms_sql.bind_variable(sql_cur, ':sqlstr', sqlstr, max_dynsql_len);
1877: ignore := dbms_sql.execute(sql_cur);
1878: dbms_sql.variable_value(sql_cur, ':sqlstr', sqlstr);
1879: dbms_sql.close_cursor(sql_cur);
1880: --
1873: statem,
1874: dbms_sql.v7);
1875: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
1876: dbms_sql.bind_variable(sql_cur, ':sqlstr', sqlstr, max_dynsql_len);
1877: ignore := dbms_sql.execute(sql_cur);
1878: dbms_sql.variable_value(sql_cur, ':sqlstr', sqlstr);
1879: dbms_sql.close_cursor(sql_cur);
1880: --
1881: return;
1874: dbms_sql.v7);
1875: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
1876: dbms_sql.bind_variable(sql_cur, ':sqlstr', sqlstr, max_dynsql_len);
1877: ignore := dbms_sql.execute(sql_cur);
1878: dbms_sql.variable_value(sql_cur, ':sqlstr', sqlstr);
1879: dbms_sql.close_cursor(sql_cur);
1880: --
1881: return;
1882: --
1875: dbms_sql.bind_variable(sql_cur, ':pactid', pactid);
1876: dbms_sql.bind_variable(sql_cur, ':sqlstr', sqlstr, max_dynsql_len);
1877: ignore := dbms_sql.execute(sql_cur);
1878: dbms_sql.variable_value(sql_cur, ':sqlstr', sqlstr);
1879: dbms_sql.close_cursor(sql_cur);
1880: --
1881: return;
1882: --
1883: exception
1881: return;
1882: --
1883: exception
1884: when others then
1885: if (dbms_sql.is_open(sql_cur)) then
1886: dbms_sql.close_cursor(sql_cur);
1887: end if;
1888: raise;
1889: end archive_range;
1882: --
1883: exception
1884: when others then
1885: if (dbms_sql.is_open(sql_cur)) then
1886: dbms_sql.close_cursor(sql_cur);
1887: end if;
1888: raise;
1889: end archive_range;
1890: --
1975: p_assignment_id =>:p_assignment_id,
1976: p_effective_date => :p_effective_date,
1977: p_local_unit_id => :l_local_unit_id); end;';
1978: --
1979: sql_cursor := dbms_sql.open_cursor;
1980: dbms_sql.parse(sql_cursor, plsql_state, dbms_sql.v7);
1981: dbms_sql.bind_variable(sql_cursor, 'p_assignment_id', p_assignment_id);
1982: dbms_sql.bind_variable(sql_cursor, 'p_effective_date', p_effective_date);
1983: dbms_sql.bind_variable(sql_cursor, 'l_local_unit_id', l_local_unit_id);
1976: p_effective_date => :p_effective_date,
1977: p_local_unit_id => :l_local_unit_id); end;';
1978: --
1979: sql_cursor := dbms_sql.open_cursor;
1980: dbms_sql.parse(sql_cursor, plsql_state, dbms_sql.v7);
1981: dbms_sql.bind_variable(sql_cursor, 'p_assignment_id', p_assignment_id);
1982: dbms_sql.bind_variable(sql_cursor, 'p_effective_date', p_effective_date);
1983: dbms_sql.bind_variable(sql_cursor, 'l_local_unit_id', l_local_unit_id);
1984: l_rows := dbms_sql.execute(sql_cursor);
1977: p_local_unit_id => :l_local_unit_id); end;';
1978: --
1979: sql_cursor := dbms_sql.open_cursor;
1980: dbms_sql.parse(sql_cursor, plsql_state, dbms_sql.v7);
1981: dbms_sql.bind_variable(sql_cursor, 'p_assignment_id', p_assignment_id);
1982: dbms_sql.bind_variable(sql_cursor, 'p_effective_date', p_effective_date);
1983: dbms_sql.bind_variable(sql_cursor, 'l_local_unit_id', l_local_unit_id);
1984: l_rows := dbms_sql.execute(sql_cursor);
1985: if (l_rows = 1) then
1978: --
1979: sql_cursor := dbms_sql.open_cursor;
1980: dbms_sql.parse(sql_cursor, plsql_state, dbms_sql.v7);
1981: dbms_sql.bind_variable(sql_cursor, 'p_assignment_id', p_assignment_id);
1982: dbms_sql.bind_variable(sql_cursor, 'p_effective_date', p_effective_date);
1983: dbms_sql.bind_variable(sql_cursor, 'l_local_unit_id', l_local_unit_id);
1984: l_rows := dbms_sql.execute(sql_cursor);
1985: if (l_rows = 1) then
1986: dbms_sql.variable_value(sql_cursor, 'l_local_unit_id',
1979: sql_cursor := dbms_sql.open_cursor;
1980: dbms_sql.parse(sql_cursor, plsql_state, dbms_sql.v7);
1981: dbms_sql.bind_variable(sql_cursor, 'p_assignment_id', p_assignment_id);
1982: dbms_sql.bind_variable(sql_cursor, 'p_effective_date', p_effective_date);
1983: dbms_sql.bind_variable(sql_cursor, 'l_local_unit_id', l_local_unit_id);
1984: l_rows := dbms_sql.execute(sql_cursor);
1985: if (l_rows = 1) then
1986: dbms_sql.variable_value(sql_cursor, 'l_local_unit_id',
1987: l_local_unit_id);
1980: dbms_sql.parse(sql_cursor, plsql_state, dbms_sql.v7);
1981: dbms_sql.bind_variable(sql_cursor, 'p_assignment_id', p_assignment_id);
1982: dbms_sql.bind_variable(sql_cursor, 'p_effective_date', p_effective_date);
1983: dbms_sql.bind_variable(sql_cursor, 'l_local_unit_id', l_local_unit_id);
1984: l_rows := dbms_sql.execute(sql_cursor);
1985: if (l_rows = 1) then
1986: dbms_sql.variable_value(sql_cursor, 'l_local_unit_id',
1987: l_local_unit_id);
1988: dbms_sql.close_cursor(sql_cursor);
1982: dbms_sql.bind_variable(sql_cursor, 'p_effective_date', p_effective_date);
1983: dbms_sql.bind_variable(sql_cursor, 'l_local_unit_id', l_local_unit_id);
1984: l_rows := dbms_sql.execute(sql_cursor);
1985: if (l_rows = 1) then
1986: dbms_sql.variable_value(sql_cursor, 'l_local_unit_id',
1987: l_local_unit_id);
1988: dbms_sql.close_cursor(sql_cursor);
1989: --
1990: else
1984: l_rows := dbms_sql.execute(sql_cursor);
1985: if (l_rows = 1) then
1986: dbms_sql.variable_value(sql_cursor, 'l_local_unit_id',
1987: l_local_unit_id);
1988: dbms_sql.close_cursor(sql_cursor);
1989: --
1990: else
1991: l_local_unit_id := null;
1992: dbms_sql.close_cursor(sql_cursor);
1988: dbms_sql.close_cursor(sql_cursor);
1989: --
1990: else
1991: l_local_unit_id := null;
1992: dbms_sql.close_cursor(sql_cursor);
1993: end if;
1994: end if;
1995:
1996: --
2146: p_assignment_id =>:p_assignment_id,
2147: p_effective_date => :p_effective_date,
2148: p_tax_unit_id => :l_tax_unit_id); end;';
2149: --
2150: sql_cursor := dbms_sql.open_cursor;
2151: dbms_sql.parse(sql_cursor, plsql_state, dbms_sql.v7);
2152: dbms_sql.bind_variable(sql_cursor, 'p_assignment_id', p_assignment_id);
2153: dbms_sql.bind_variable(sql_cursor, 'p_effective_date', p_effective_date);
2154: dbms_sql.bind_variable(sql_cursor, 'l_tax_unit_id', l_tax_unit_id);
2147: p_effective_date => :p_effective_date,
2148: p_tax_unit_id => :l_tax_unit_id); end;';
2149: --
2150: sql_cursor := dbms_sql.open_cursor;
2151: dbms_sql.parse(sql_cursor, plsql_state, dbms_sql.v7);
2152: dbms_sql.bind_variable(sql_cursor, 'p_assignment_id', p_assignment_id);
2153: dbms_sql.bind_variable(sql_cursor, 'p_effective_date', p_effective_date);
2154: dbms_sql.bind_variable(sql_cursor, 'l_tax_unit_id', l_tax_unit_id);
2155: l_rows := dbms_sql.execute(sql_cursor);
2148: p_tax_unit_id => :l_tax_unit_id); end;';
2149: --
2150: sql_cursor := dbms_sql.open_cursor;
2151: dbms_sql.parse(sql_cursor, plsql_state, dbms_sql.v7);
2152: dbms_sql.bind_variable(sql_cursor, 'p_assignment_id', p_assignment_id);
2153: dbms_sql.bind_variable(sql_cursor, 'p_effective_date', p_effective_date);
2154: dbms_sql.bind_variable(sql_cursor, 'l_tax_unit_id', l_tax_unit_id);
2155: l_rows := dbms_sql.execute(sql_cursor);
2156: if (l_rows = 1) then
2149: --
2150: sql_cursor := dbms_sql.open_cursor;
2151: dbms_sql.parse(sql_cursor, plsql_state, dbms_sql.v7);
2152: dbms_sql.bind_variable(sql_cursor, 'p_assignment_id', p_assignment_id);
2153: dbms_sql.bind_variable(sql_cursor, 'p_effective_date', p_effective_date);
2154: dbms_sql.bind_variable(sql_cursor, 'l_tax_unit_id', l_tax_unit_id);
2155: l_rows := dbms_sql.execute(sql_cursor);
2156: if (l_rows = 1) then
2157: dbms_sql.variable_value(sql_cursor, 'l_tax_unit_id',
2150: sql_cursor := dbms_sql.open_cursor;
2151: dbms_sql.parse(sql_cursor, plsql_state, dbms_sql.v7);
2152: dbms_sql.bind_variable(sql_cursor, 'p_assignment_id', p_assignment_id);
2153: dbms_sql.bind_variable(sql_cursor, 'p_effective_date', p_effective_date);
2154: dbms_sql.bind_variable(sql_cursor, 'l_tax_unit_id', l_tax_unit_id);
2155: l_rows := dbms_sql.execute(sql_cursor);
2156: if (l_rows = 1) then
2157: dbms_sql.variable_value(sql_cursor, 'l_tax_unit_id',
2158: l_tax_unit_id);
2151: dbms_sql.parse(sql_cursor, plsql_state, dbms_sql.v7);
2152: dbms_sql.bind_variable(sql_cursor, 'p_assignment_id', p_assignment_id);
2153: dbms_sql.bind_variable(sql_cursor, 'p_effective_date', p_effective_date);
2154: dbms_sql.bind_variable(sql_cursor, 'l_tax_unit_id', l_tax_unit_id);
2155: l_rows := dbms_sql.execute(sql_cursor);
2156: if (l_rows = 1) then
2157: dbms_sql.variable_value(sql_cursor, 'l_tax_unit_id',
2158: l_tax_unit_id);
2159: dbms_sql.close_cursor(sql_cursor);
2153: dbms_sql.bind_variable(sql_cursor, 'p_effective_date', p_effective_date);
2154: dbms_sql.bind_variable(sql_cursor, 'l_tax_unit_id', l_tax_unit_id);
2155: l_rows := dbms_sql.execute(sql_cursor);
2156: if (l_rows = 1) then
2157: dbms_sql.variable_value(sql_cursor, 'l_tax_unit_id',
2158: l_tax_unit_id);
2159: dbms_sql.close_cursor(sql_cursor);
2160: --
2161: else
2155: l_rows := dbms_sql.execute(sql_cursor);
2156: if (l_rows = 1) then
2157: dbms_sql.variable_value(sql_cursor, 'l_tax_unit_id',
2158: l_tax_unit_id);
2159: dbms_sql.close_cursor(sql_cursor);
2160: --
2161: else
2162: l_tax_unit_id := null;
2163: dbms_sql.close_cursor(sql_cursor);
2159: dbms_sql.close_cursor(sql_cursor);
2160: --
2161: else
2162: l_tax_unit_id := null;
2163: dbms_sql.close_cursor(sql_cursor);
2164: end if;
2165:
2166: end if;
2167: --