824: v_cursor1 NUMBER;
825: v_cursor2 NUMBER;
826: v_BatchSize INTEGER := 1000;
827: v_NumRows INTEGER;
828: v_customer_id DBMS_SQL.NUMBER_TABLE;
829: v_site_use_id DBMS_SQL.NUMBER_TABLE;
830: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
831: v_trx_date DBMS_SQL.DATE_TABLE;
832: v_amount DBMS_SQL.NUMBER_TABLE;
825: v_cursor2 NUMBER;
826: v_BatchSize INTEGER := 1000;
827: v_NumRows INTEGER;
828: v_customer_id DBMS_SQL.NUMBER_TABLE;
829: v_site_use_id DBMS_SQL.NUMBER_TABLE;
830: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
831: v_trx_date DBMS_SQL.DATE_TABLE;
832: v_amount DBMS_SQL.NUMBER_TABLE;
833: v_cust_trx_id DBMS_SQL.NUMBER_TABLE;
826: v_BatchSize INTEGER := 1000;
827: v_NumRows INTEGER;
828: v_customer_id DBMS_SQL.NUMBER_TABLE;
829: v_site_use_id DBMS_SQL.NUMBER_TABLE;
830: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
831: v_trx_date DBMS_SQL.DATE_TABLE;
832: v_amount DBMS_SQL.NUMBER_TABLE;
833: v_cust_trx_id DBMS_SQL.NUMBER_TABLE;
834: v_return_code INTEGER;
827: v_NumRows INTEGER;
828: v_customer_id DBMS_SQL.NUMBER_TABLE;
829: v_site_use_id DBMS_SQL.NUMBER_TABLE;
830: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
831: v_trx_date DBMS_SQL.DATE_TABLE;
832: v_amount DBMS_SQL.NUMBER_TABLE;
833: v_cust_trx_id DBMS_SQL.NUMBER_TABLE;
834: v_return_code INTEGER;
835: text_select VARCHAR2(4000);
828: v_customer_id DBMS_SQL.NUMBER_TABLE;
829: v_site_use_id DBMS_SQL.NUMBER_TABLE;
830: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
831: v_trx_date DBMS_SQL.DATE_TABLE;
832: v_amount DBMS_SQL.NUMBER_TABLE;
833: v_cust_trx_id DBMS_SQL.NUMBER_TABLE;
834: v_return_code INTEGER;
835: text_select VARCHAR2(4000);
836: text_update VARCHAR2(4000);
829: v_site_use_id DBMS_SQL.NUMBER_TABLE;
830: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
831: v_trx_date DBMS_SQL.DATE_TABLE;
832: v_amount DBMS_SQL.NUMBER_TABLE;
833: v_cust_trx_id DBMS_SQL.NUMBER_TABLE;
834: v_return_code INTEGER;
835: text_select VARCHAR2(4000);
836: text_update VARCHAR2(4000);
837: begin
872: and SITE_USE_ID = :site_use_id
873: and CURRENCY = :currency_code
874: and AS_OF_DATE = :trx_date';
875:
876: v_cursor1 := dbms_sql.open_cursor;
877: v_cursor2 := dbms_sql.open_cursor;
878:
879: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
880: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
873: and CURRENCY = :currency_code
874: and AS_OF_DATE = :trx_date';
875:
876: v_cursor1 := dbms_sql.open_cursor;
877: v_cursor2 := dbms_sql.open_cursor;
878:
879: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
880: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
881:
875:
876: v_cursor1 := dbms_sql.open_cursor;
877: v_cursor2 := dbms_sql.open_cursor;
878:
879: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
880: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
881:
882: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
883: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
876: v_cursor1 := dbms_sql.open_cursor;
877: v_cursor2 := dbms_sql.open_cursor;
878:
879: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
880: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
881:
882: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
883: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
884: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
878:
879: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
880: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
881:
882: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
883: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
884: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
885: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
886: dbms_sql.define_array(v_cursor1,5,v_amount,v_BatchSize,1);
879: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
880: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
881:
882: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
883: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
884: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
885: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
886: dbms_sql.define_array(v_cursor1,5,v_amount,v_BatchSize,1);
887: dbms_sql.define_array(v_cursor1,6,v_cust_trx_id,v_BatchSize,1);
880: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
881:
882: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
883: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
884: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
885: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
886: dbms_sql.define_array(v_cursor1,5,v_amount,v_BatchSize,1);
887: dbms_sql.define_array(v_cursor1,6,v_cust_trx_id,v_BatchSize,1);
888:
881:
882: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
883: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
884: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
885: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
886: dbms_sql.define_array(v_cursor1,5,v_amount,v_BatchSize,1);
887: dbms_sql.define_array(v_cursor1,6,v_cust_trx_id,v_BatchSize,1);
888:
889: v_return_code := dbms_sql.execute(v_cursor1);
882: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
883: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
884: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
885: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
886: dbms_sql.define_array(v_cursor1,5,v_amount,v_BatchSize,1);
887: dbms_sql.define_array(v_cursor1,6,v_cust_trx_id,v_BatchSize,1);
888:
889: v_return_code := dbms_sql.execute(v_cursor1);
890:
883: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
884: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
885: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
886: dbms_sql.define_array(v_cursor1,5,v_amount,v_BatchSize,1);
887: dbms_sql.define_array(v_cursor1,6,v_cust_trx_id,v_BatchSize,1);
888:
889: v_return_code := dbms_sql.execute(v_cursor1);
890:
891: --This is the fetch loop. Each call to FETCH_ROWS will retrive v_BatchSize
885: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
886: dbms_sql.define_array(v_cursor1,5,v_amount,v_BatchSize,1);
887: dbms_sql.define_array(v_cursor1,6,v_cust_trx_id,v_BatchSize,1);
888:
889: v_return_code := dbms_sql.execute(v_cursor1);
890:
891: --This is the fetch loop. Each call to FETCH_ROWS will retrive v_BatchSize
892: --rows of data. The loop is over when FETCH_ROWS returns a value< v_BatchSize.
893:
899: v_trx_date.delete;
900: v_cust_trx_id.delete;
901: v_amount.delete;
902:
903: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
904: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
905: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
906: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
907: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
900: v_cust_trx_id.delete;
901: v_amount.delete;
902:
903: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
904: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
905: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
906: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
907: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
908: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_amount);
901: v_amount.delete;
902:
903: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
904: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
905: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
906: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
907: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
908: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_amount);
909: DBMS_SQL.COLUMN_VALUE(v_cursor1,6,v_cust_trx_id);
902:
903: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
904: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
905: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
906: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
907: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
908: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_amount);
909: DBMS_SQL.COLUMN_VALUE(v_cursor1,6,v_cust_trx_id);
910:
903: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
904: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
905: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
906: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
907: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
908: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_amount);
909: DBMS_SQL.COLUMN_VALUE(v_cursor1,6,v_cust_trx_id);
910:
911: --The special case of v_NumRows = 0 needs to be checked here. This
904: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
905: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
906: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
907: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
908: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_amount);
909: DBMS_SQL.COLUMN_VALUE(v_cursor1,6,v_cust_trx_id);
910:
911: --The special case of v_NumRows = 0 needs to be checked here. This
912: --means that the previous fetch returned all the remaining rows and
905: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
906: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
907: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
908: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_amount);
909: DBMS_SQL.COLUMN_VALUE(v_cursor1,6,v_cust_trx_id);
910:
911: --The special case of v_NumRows = 0 needs to be checked here. This
912: --means that the previous fetch returned all the remaining rows and
913: --therefore we are done with the loop.
918:
919: --Use BIND_ARRAYS to specify the input variables for the insert.
920: --only elements 1..V_NumRows will be used.
921:
922: DBMS_SQL.BIND_ARRAY(v_cursor2,':amount',v_amount);
923: DBMS_SQL.BIND_ARRAY(v_cursor2,':cust_trx_id',v_cust_trx_id);
924: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
925: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
926: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
919: --Use BIND_ARRAYS to specify the input variables for the insert.
920: --only elements 1..V_NumRows will be used.
921:
922: DBMS_SQL.BIND_ARRAY(v_cursor2,':amount',v_amount);
923: DBMS_SQL.BIND_ARRAY(v_cursor2,':cust_trx_id',v_cust_trx_id);
924: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
925: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
926: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
927: DBMS_SQL.BIND_ARRAY(v_cursor2,':trx_date',v_trx_date);
920: --only elements 1..V_NumRows will be used.
921:
922: DBMS_SQL.BIND_ARRAY(v_cursor2,':amount',v_amount);
923: DBMS_SQL.BIND_ARRAY(v_cursor2,':cust_trx_id',v_cust_trx_id);
924: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
925: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
926: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
927: DBMS_SQL.BIND_ARRAY(v_cursor2,':trx_date',v_trx_date);
928:
921:
922: DBMS_SQL.BIND_ARRAY(v_cursor2,':amount',v_amount);
923: DBMS_SQL.BIND_ARRAY(v_cursor2,':cust_trx_id',v_cust_trx_id);
924: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
925: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
926: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
927: DBMS_SQL.BIND_ARRAY(v_cursor2,':trx_date',v_trx_date);
928:
929: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
922: DBMS_SQL.BIND_ARRAY(v_cursor2,':amount',v_amount);
923: DBMS_SQL.BIND_ARRAY(v_cursor2,':cust_trx_id',v_cust_trx_id);
924: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
925: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
926: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
927: DBMS_SQL.BIND_ARRAY(v_cursor2,':trx_date',v_trx_date);
928:
929: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
930:
923: DBMS_SQL.BIND_ARRAY(v_cursor2,':cust_trx_id',v_cust_trx_id);
924: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
925: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
926: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
927: DBMS_SQL.BIND_ARRAY(v_cursor2,':trx_date',v_trx_date);
928:
929: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
930:
931: EXIT WHEN v_NumRows < v_BatchSize;
925: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
926: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
927: DBMS_SQL.BIND_ARRAY(v_cursor2,':trx_date',v_trx_date);
928:
929: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
930:
931: EXIT WHEN v_NumRows < v_BatchSize;
932: COMMIT;
933: END LOOP;
931: EXIT WHEN v_NumRows < v_BatchSize;
932: COMMIT;
933: END LOOP;
934: COMMIT;
935: DBMS_SQL.CLOSE_CURSOR(v_cursor1);
936: DBMS_SQL.CLOSE_CURSOR(v_cursor2);
937:
938: END;
939:
932: COMMIT;
933: END LOOP;
934: COMMIT;
935: DBMS_SQL.CLOSE_CURSOR(v_cursor1);
936: DBMS_SQL.CLOSE_CURSOR(v_cursor2);
937:
938: END;
939:
940:
949: v_cursor1 NUMBER;
950: v_cursor2 NUMBER;
951: v_BatchSize INTEGER := 1000;
952: v_NumRows INTEGER;
953: v_customer_id DBMS_SQL.NUMBER_TABLE;
954: v_site_use_id DBMS_SQL.NUMBER_TABLE;
955: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
956: v_trx_date DBMS_SQL.DATE_TABLE;
957: v_cum_balance DBMS_SQL.NUMBER_TABLE;
950: v_cursor2 NUMBER;
951: v_BatchSize INTEGER := 1000;
952: v_NumRows INTEGER;
953: v_customer_id DBMS_SQL.NUMBER_TABLE;
954: v_site_use_id DBMS_SQL.NUMBER_TABLE;
955: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
956: v_trx_date DBMS_SQL.DATE_TABLE;
957: v_cum_balance DBMS_SQL.NUMBER_TABLE;
958: v_return_code INTEGER;
951: v_BatchSize INTEGER := 1000;
952: v_NumRows INTEGER;
953: v_customer_id DBMS_SQL.NUMBER_TABLE;
954: v_site_use_id DBMS_SQL.NUMBER_TABLE;
955: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
956: v_trx_date DBMS_SQL.DATE_TABLE;
957: v_cum_balance DBMS_SQL.NUMBER_TABLE;
958: v_return_code INTEGER;
959: text_select VARCHAR2(4000);
952: v_NumRows INTEGER;
953: v_customer_id DBMS_SQL.NUMBER_TABLE;
954: v_site_use_id DBMS_SQL.NUMBER_TABLE;
955: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
956: v_trx_date DBMS_SQL.DATE_TABLE;
957: v_cum_balance DBMS_SQL.NUMBER_TABLE;
958: v_return_code INTEGER;
959: text_select VARCHAR2(4000);
960: text_update VARCHAR2(4000);
953: v_customer_id DBMS_SQL.NUMBER_TABLE;
954: v_site_use_id DBMS_SQL.NUMBER_TABLE;
955: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
956: v_trx_date DBMS_SQL.DATE_TABLE;
957: v_cum_balance DBMS_SQL.NUMBER_TABLE;
958: v_return_code INTEGER;
959: text_select VARCHAR2(4000);
960: text_update VARCHAR2(4000);
961: begin
1040: and SITE_USE_ID = :site_use_id
1041: and CURRENCY = :currency_code
1042: and AS_OF_DATE = :as_of_date';
1043:
1044: v_cursor1 := dbms_sql.open_cursor;
1045: v_cursor2 := dbms_sql.open_cursor;
1046:
1047: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
1048: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
1041: and CURRENCY = :currency_code
1042: and AS_OF_DATE = :as_of_date';
1043:
1044: v_cursor1 := dbms_sql.open_cursor;
1045: v_cursor2 := dbms_sql.open_cursor;
1046:
1047: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
1048: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
1049:
1043:
1044: v_cursor1 := dbms_sql.open_cursor;
1045: v_cursor2 := dbms_sql.open_cursor;
1046:
1047: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
1048: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
1049:
1050: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
1051: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
1044: v_cursor1 := dbms_sql.open_cursor;
1045: v_cursor2 := dbms_sql.open_cursor;
1046:
1047: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
1048: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
1049:
1050: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
1051: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
1052: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
1046:
1047: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
1048: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
1049:
1050: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
1051: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
1052: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
1053: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
1054: dbms_sql.define_array(v_cursor1,5,v_cum_balance,v_BatchSize,1);
1047: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
1048: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
1049:
1050: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
1051: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
1052: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
1053: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
1054: dbms_sql.define_array(v_cursor1,5,v_cum_balance,v_BatchSize,1);
1055:
1048: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
1049:
1050: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
1051: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
1052: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
1053: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
1054: dbms_sql.define_array(v_cursor1,5,v_cum_balance,v_BatchSize,1);
1055:
1056: v_return_code := dbms_sql.execute(v_cursor1);
1049:
1050: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
1051: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
1052: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
1053: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
1054: dbms_sql.define_array(v_cursor1,5,v_cum_balance,v_BatchSize,1);
1055:
1056: v_return_code := dbms_sql.execute(v_cursor1);
1057:
1050: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
1051: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
1052: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
1053: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
1054: dbms_sql.define_array(v_cursor1,5,v_cum_balance,v_BatchSize,1);
1055:
1056: v_return_code := dbms_sql.execute(v_cursor1);
1057:
1058: --This is the fetch loop. Each call to FETCH_ROWS will retrive v_BatchSize
1052: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
1053: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
1054: dbms_sql.define_array(v_cursor1,5,v_cum_balance,v_BatchSize,1);
1055:
1056: v_return_code := dbms_sql.execute(v_cursor1);
1057:
1058: --This is the fetch loop. Each call to FETCH_ROWS will retrive v_BatchSize
1059: --rows of data. The loop is over when FETCH_ROWS returns a value< v_BatchSize.
1060:
1065: v_currency_code.delete;
1066: v_trx_date.delete;
1067: v_cum_balance.delete;
1068:
1069: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
1070: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
1071: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
1072: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
1073: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
1066: v_trx_date.delete;
1067: v_cum_balance.delete;
1068:
1069: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
1070: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
1071: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
1072: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
1073: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
1074: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_cum_balance);
1067: v_cum_balance.delete;
1068:
1069: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
1070: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
1071: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
1072: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
1073: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
1074: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_cum_balance);
1075:
1068:
1069: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
1070: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
1071: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
1072: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
1073: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
1074: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_cum_balance);
1075:
1076: --The special case of v_NumRows = 0 needs to be checked here. This
1069: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
1070: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
1071: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
1072: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
1073: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
1074: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_cum_balance);
1075:
1076: --The special case of v_NumRows = 0 needs to be checked here. This
1077: --means that the previous fetch returned all the remaining rows and
1070: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
1071: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
1072: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
1073: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
1074: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_cum_balance);
1075:
1076: --The special case of v_NumRows = 0 needs to be checked here. This
1077: --means that the previous fetch returned all the remaining rows and
1078: --therefore we are done with the loop.
1083:
1084: --Use BIND_ARRAYS to specify the input variables for the insert.
1085: --only elements 1..V_NumRows will be used.
1086:
1087: DBMS_SQL.BIND_ARRAY(v_cursor2,':cum_balance',v_cum_balance);
1088: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
1089: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
1090: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
1091: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
1084: --Use BIND_ARRAYS to specify the input variables for the insert.
1085: --only elements 1..V_NumRows will be used.
1086:
1087: DBMS_SQL.BIND_ARRAY(v_cursor2,':cum_balance',v_cum_balance);
1088: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
1089: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
1090: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
1091: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
1092: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
1085: --only elements 1..V_NumRows will be used.
1086:
1087: DBMS_SQL.BIND_ARRAY(v_cursor2,':cum_balance',v_cum_balance);
1088: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
1089: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
1090: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
1091: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
1092: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
1093:
1086:
1087: DBMS_SQL.BIND_ARRAY(v_cursor2,':cum_balance',v_cum_balance);
1088: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
1089: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
1090: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
1091: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
1092: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
1093:
1094: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
1087: DBMS_SQL.BIND_ARRAY(v_cursor2,':cum_balance',v_cum_balance);
1088: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
1089: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
1090: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
1091: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
1092: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
1093:
1094: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
1095:
1088: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
1089: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
1090: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
1091: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
1092: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
1093:
1094: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
1095:
1096: EXIT WHEN v_NumRows < v_BatchSize;
1090: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
1091: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
1092: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
1093:
1094: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
1095:
1096: EXIT WHEN v_NumRows < v_BatchSize;
1097: COMMIT;
1098: END LOOP;
1096: EXIT WHEN v_NumRows < v_BatchSize;
1097: COMMIT;
1098: END LOOP;
1099: COMMIT;
1100: DBMS_SQL.CLOSE_CURSOR(v_cursor1);
1101: DBMS_SQL.CLOSE_CURSOR(v_cursor2);
1102:
1103: end;
1104: ELSE
1097: COMMIT;
1098: END LOOP;
1099: COMMIT;
1100: DBMS_SQL.CLOSE_CURSOR(v_cursor1);
1101: DBMS_SQL.CLOSE_CURSOR(v_cursor2);
1102:
1103: end;
1104: ELSE
1105: /*
2030: v_cursor1 NUMBER;
2031: v_cursor2 NUMBER;
2032: v_BatchSize INTEGER := 1000;
2033: v_NumRows INTEGER;
2034: v_customer_id DBMS_SQL.NUMBER_TABLE;
2035: v_site_use_id DBMS_SQL.NUMBER_TABLE;
2036: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
2037: v_trx_date DBMS_SQL.DATE_TABLE;
2038: v_amount DBMS_SQL.NUMBER_TABLE;
2031: v_cursor2 NUMBER;
2032: v_BatchSize INTEGER := 1000;
2033: v_NumRows INTEGER;
2034: v_customer_id DBMS_SQL.NUMBER_TABLE;
2035: v_site_use_id DBMS_SQL.NUMBER_TABLE;
2036: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
2037: v_trx_date DBMS_SQL.DATE_TABLE;
2038: v_amount DBMS_SQL.NUMBER_TABLE;
2039: v_cust_trx_id DBMS_SQL.NUMBER_TABLE;
2032: v_BatchSize INTEGER := 1000;
2033: v_NumRows INTEGER;
2034: v_customer_id DBMS_SQL.NUMBER_TABLE;
2035: v_site_use_id DBMS_SQL.NUMBER_TABLE;
2036: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
2037: v_trx_date DBMS_SQL.DATE_TABLE;
2038: v_amount DBMS_SQL.NUMBER_TABLE;
2039: v_cust_trx_id DBMS_SQL.NUMBER_TABLE;
2040: v_return_code INTEGER;
2033: v_NumRows INTEGER;
2034: v_customer_id DBMS_SQL.NUMBER_TABLE;
2035: v_site_use_id DBMS_SQL.NUMBER_TABLE;
2036: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
2037: v_trx_date DBMS_SQL.DATE_TABLE;
2038: v_amount DBMS_SQL.NUMBER_TABLE;
2039: v_cust_trx_id DBMS_SQL.NUMBER_TABLE;
2040: v_return_code INTEGER;
2041: text_select VARCHAR2(4000);
2034: v_customer_id DBMS_SQL.NUMBER_TABLE;
2035: v_site_use_id DBMS_SQL.NUMBER_TABLE;
2036: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
2037: v_trx_date DBMS_SQL.DATE_TABLE;
2038: v_amount DBMS_SQL.NUMBER_TABLE;
2039: v_cust_trx_id DBMS_SQL.NUMBER_TABLE;
2040: v_return_code INTEGER;
2041: text_select VARCHAR2(4000);
2042: text_update VARCHAR2(4000);
2035: v_site_use_id DBMS_SQL.NUMBER_TABLE;
2036: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
2037: v_trx_date DBMS_SQL.DATE_TABLE;
2038: v_amount DBMS_SQL.NUMBER_TABLE;
2039: v_cust_trx_id DBMS_SQL.NUMBER_TABLE;
2040: v_return_code INTEGER;
2041: text_select VARCHAR2(4000);
2042: text_update VARCHAR2(4000);
2043:
2090: and SITE_USE_ID = :site_use_id
2091: and CURRENCY = :currency_code
2092: and AS_OF_DATE = :trx_date';
2093:
2094: v_cursor1 := dbms_sql.open_cursor;
2095: v_cursor2 := dbms_sql.open_cursor;
2096:
2097: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
2098: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
2091: and CURRENCY = :currency_code
2092: and AS_OF_DATE = :trx_date';
2093:
2094: v_cursor1 := dbms_sql.open_cursor;
2095: v_cursor2 := dbms_sql.open_cursor;
2096:
2097: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
2098: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
2099:
2093:
2094: v_cursor1 := dbms_sql.open_cursor;
2095: v_cursor2 := dbms_sql.open_cursor;
2096:
2097: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
2098: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
2099:
2100: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
2101: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2094: v_cursor1 := dbms_sql.open_cursor;
2095: v_cursor2 := dbms_sql.open_cursor;
2096:
2097: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
2098: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
2099:
2100: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
2101: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2102: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
2096:
2097: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
2098: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
2099:
2100: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
2101: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2102: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
2103: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
2104: dbms_sql.define_array(v_cursor1,5,v_amount,v_BatchSize,1);
2097: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
2098: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
2099:
2100: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
2101: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2102: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
2103: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
2104: dbms_sql.define_array(v_cursor1,5,v_amount,v_BatchSize,1);
2105: dbms_sql.define_array(v_cursor1,6,v_cust_trx_id,v_BatchSize,1);
2098: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
2099:
2100: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
2101: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2102: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
2103: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
2104: dbms_sql.define_array(v_cursor1,5,v_amount,v_BatchSize,1);
2105: dbms_sql.define_array(v_cursor1,6,v_cust_trx_id,v_BatchSize,1);
2106:
2099:
2100: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
2101: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2102: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
2103: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
2104: dbms_sql.define_array(v_cursor1,5,v_amount,v_BatchSize,1);
2105: dbms_sql.define_array(v_cursor1,6,v_cust_trx_id,v_BatchSize,1);
2106:
2107: v_return_code := dbms_sql.execute(v_cursor1);
2100: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
2101: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2102: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
2103: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
2104: dbms_sql.define_array(v_cursor1,5,v_amount,v_BatchSize,1);
2105: dbms_sql.define_array(v_cursor1,6,v_cust_trx_id,v_BatchSize,1);
2106:
2107: v_return_code := dbms_sql.execute(v_cursor1);
2108:
2101: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2102: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
2103: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
2104: dbms_sql.define_array(v_cursor1,5,v_amount,v_BatchSize,1);
2105: dbms_sql.define_array(v_cursor1,6,v_cust_trx_id,v_BatchSize,1);
2106:
2107: v_return_code := dbms_sql.execute(v_cursor1);
2108:
2109: --This is the fetch loop. Each call to FETCH_ROWS will retrive v_BatchSize
2103: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
2104: dbms_sql.define_array(v_cursor1,5,v_amount,v_BatchSize,1);
2105: dbms_sql.define_array(v_cursor1,6,v_cust_trx_id,v_BatchSize,1);
2106:
2107: v_return_code := dbms_sql.execute(v_cursor1);
2108:
2109: --This is the fetch loop. Each call to FETCH_ROWS will retrive v_BatchSize
2110: --rows of data. The loop is over when FETCH_ROWS returns a value< v_BatchSize.
2111:
2117: v_trx_date.delete;
2118: v_cust_trx_id.delete;
2119: v_amount.delete;
2120:
2121: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
2122: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
2123: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
2124: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
2125: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
2118: v_cust_trx_id.delete;
2119: v_amount.delete;
2120:
2121: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
2122: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
2123: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
2124: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
2125: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
2126: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_amount);
2119: v_amount.delete;
2120:
2121: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
2122: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
2123: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
2124: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
2125: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
2126: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_amount);
2127: DBMS_SQL.COLUMN_VALUE(v_cursor1,6,v_cust_trx_id);
2120:
2121: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
2122: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
2123: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
2124: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
2125: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
2126: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_amount);
2127: DBMS_SQL.COLUMN_VALUE(v_cursor1,6,v_cust_trx_id);
2128:
2121: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
2122: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
2123: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
2124: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
2125: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
2126: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_amount);
2127: DBMS_SQL.COLUMN_VALUE(v_cursor1,6,v_cust_trx_id);
2128:
2129: --The special case of v_NumRows = 0 needs to be checked here. This
2122: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
2123: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
2124: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
2125: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
2126: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_amount);
2127: DBMS_SQL.COLUMN_VALUE(v_cursor1,6,v_cust_trx_id);
2128:
2129: --The special case of v_NumRows = 0 needs to be checked here. This
2130: --means that the previous fetch returned all the remaining rows and
2123: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
2124: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
2125: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
2126: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_amount);
2127: DBMS_SQL.COLUMN_VALUE(v_cursor1,6,v_cust_trx_id);
2128:
2129: --The special case of v_NumRows = 0 needs to be checked here. This
2130: --means that the previous fetch returned all the remaining rows and
2131: --therefore we are done with the loop.
2136:
2137: --Use BIND_ARRAYS to specify the input variables for the insert.
2138: --only elements 1..V_NumRows will be used.
2139:
2140: DBMS_SQL.BIND_ARRAY(v_cursor2,':amount',v_amount);
2141: DBMS_SQL.BIND_ARRAY(v_cursor2,':cust_trx_id',v_cust_trx_id);
2142: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
2143: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
2144: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
2137: --Use BIND_ARRAYS to specify the input variables for the insert.
2138: --only elements 1..V_NumRows will be used.
2139:
2140: DBMS_SQL.BIND_ARRAY(v_cursor2,':amount',v_amount);
2141: DBMS_SQL.BIND_ARRAY(v_cursor2,':cust_trx_id',v_cust_trx_id);
2142: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
2143: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
2144: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
2145: DBMS_SQL.BIND_ARRAY(v_cursor2,':trx_date',v_trx_date);
2138: --only elements 1..V_NumRows will be used.
2139:
2140: DBMS_SQL.BIND_ARRAY(v_cursor2,':amount',v_amount);
2141: DBMS_SQL.BIND_ARRAY(v_cursor2,':cust_trx_id',v_cust_trx_id);
2142: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
2143: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
2144: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
2145: DBMS_SQL.BIND_ARRAY(v_cursor2,':trx_date',v_trx_date);
2146:
2139:
2140: DBMS_SQL.BIND_ARRAY(v_cursor2,':amount',v_amount);
2141: DBMS_SQL.BIND_ARRAY(v_cursor2,':cust_trx_id',v_cust_trx_id);
2142: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
2143: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
2144: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
2145: DBMS_SQL.BIND_ARRAY(v_cursor2,':trx_date',v_trx_date);
2146:
2147: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
2140: DBMS_SQL.BIND_ARRAY(v_cursor2,':amount',v_amount);
2141: DBMS_SQL.BIND_ARRAY(v_cursor2,':cust_trx_id',v_cust_trx_id);
2142: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
2143: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
2144: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
2145: DBMS_SQL.BIND_ARRAY(v_cursor2,':trx_date',v_trx_date);
2146:
2147: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
2148:
2141: DBMS_SQL.BIND_ARRAY(v_cursor2,':cust_trx_id',v_cust_trx_id);
2142: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
2143: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
2144: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
2145: DBMS_SQL.BIND_ARRAY(v_cursor2,':trx_date',v_trx_date);
2146:
2147: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
2148:
2149: EXIT WHEN v_NumRows < v_BatchSize;
2143: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
2144: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
2145: DBMS_SQL.BIND_ARRAY(v_cursor2,':trx_date',v_trx_date);
2146:
2147: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
2148:
2149: EXIT WHEN v_NumRows < v_BatchSize;
2150:
2151: END LOOP;
2148:
2149: EXIT WHEN v_NumRows < v_BatchSize;
2150:
2151: END LOOP;
2152: DBMS_SQL.CLOSE_CURSOR(v_cursor1);
2153: DBMS_SQL.CLOSE_CURSOR(v_cursor2);
2154:
2155: IF PG_DEBUG in ('Y','C')
2156: THEN
2149: EXIT WHEN v_NumRows < v_BatchSize;
2150:
2151: END LOOP;
2152: DBMS_SQL.CLOSE_CURSOR(v_cursor1);
2153: DBMS_SQL.CLOSE_CURSOR(v_cursor2);
2154:
2155: IF PG_DEBUG in ('Y','C')
2156: THEN
2157: arp_standard.debug('ar_trx_summary_pkg.load_largest_inv_info()-');
2162: v_cursor1 NUMBER;
2163: v_cursor2 NUMBER;
2164: v_BatchSize INTEGER := 1000;
2165: v_NumRows INTEGER;
2166: v_customer_id DBMS_SQL.NUMBER_TABLE;
2167: v_site_use_id DBMS_SQL.NUMBER_TABLE;
2168: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
2169: v_trx_date DBMS_SQL.DATE_TABLE;
2170: v_cum_balance DBMS_SQL.NUMBER_TABLE;
2163: v_cursor2 NUMBER;
2164: v_BatchSize INTEGER := 1000;
2165: v_NumRows INTEGER;
2166: v_customer_id DBMS_SQL.NUMBER_TABLE;
2167: v_site_use_id DBMS_SQL.NUMBER_TABLE;
2168: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
2169: v_trx_date DBMS_SQL.DATE_TABLE;
2170: v_cum_balance DBMS_SQL.NUMBER_TABLE;
2171: v_return_code INTEGER;
2164: v_BatchSize INTEGER := 1000;
2165: v_NumRows INTEGER;
2166: v_customer_id DBMS_SQL.NUMBER_TABLE;
2167: v_site_use_id DBMS_SQL.NUMBER_TABLE;
2168: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
2169: v_trx_date DBMS_SQL.DATE_TABLE;
2170: v_cum_balance DBMS_SQL.NUMBER_TABLE;
2171: v_return_code INTEGER;
2172: text_select VARCHAR2(4000);
2165: v_NumRows INTEGER;
2166: v_customer_id DBMS_SQL.NUMBER_TABLE;
2167: v_site_use_id DBMS_SQL.NUMBER_TABLE;
2168: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
2169: v_trx_date DBMS_SQL.DATE_TABLE;
2170: v_cum_balance DBMS_SQL.NUMBER_TABLE;
2171: v_return_code INTEGER;
2172: text_select VARCHAR2(4000);
2173: text_update VARCHAR2(4000);
2166: v_customer_id DBMS_SQL.NUMBER_TABLE;
2167: v_site_use_id DBMS_SQL.NUMBER_TABLE;
2168: v_currency_code DBMS_SQL.VARCHAR2_TABLE;
2169: v_trx_date DBMS_SQL.DATE_TABLE;
2170: v_cum_balance DBMS_SQL.NUMBER_TABLE;
2171: v_return_code INTEGER;
2172: text_select VARCHAR2(4000);
2173: text_update VARCHAR2(4000);
2174:
2268: and SITE_USE_ID = :site_use_id
2269: and CURRENCY = :currency_code
2270: and AS_OF_DATE = :as_of_date';
2271:
2272: v_cursor1 := dbms_sql.open_cursor;
2273: v_cursor2 := dbms_sql.open_cursor;
2274:
2275: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
2276: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
2269: and CURRENCY = :currency_code
2270: and AS_OF_DATE = :as_of_date';
2271:
2272: v_cursor1 := dbms_sql.open_cursor;
2273: v_cursor2 := dbms_sql.open_cursor;
2274:
2275: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
2276: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
2277:
2271:
2272: v_cursor1 := dbms_sql.open_cursor;
2273: v_cursor2 := dbms_sql.open_cursor;
2274:
2275: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
2276: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
2277:
2278: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
2279: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2272: v_cursor1 := dbms_sql.open_cursor;
2273: v_cursor2 := dbms_sql.open_cursor;
2274:
2275: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
2276: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
2277:
2278: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
2279: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2280: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
2274:
2275: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
2276: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
2277:
2278: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
2279: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2280: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
2281: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
2282: dbms_sql.define_array(v_cursor1,5,v_cum_balance,v_BatchSize,1);
2275: dbms_sql.parse(v_cursor1,text_select,DBMS_SQL.V7);
2276: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
2277:
2278: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
2279: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2280: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
2281: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
2282: dbms_sql.define_array(v_cursor1,5,v_cum_balance,v_BatchSize,1);
2283:
2276: dbms_sql.parse(v_cursor2,text_update,DBMS_SQL.V7);
2277:
2278: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
2279: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2280: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
2281: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
2282: dbms_sql.define_array(v_cursor1,5,v_cum_balance,v_BatchSize,1);
2283:
2284: v_return_code := dbms_sql.execute(v_cursor1);
2277:
2278: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
2279: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2280: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
2281: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
2282: dbms_sql.define_array(v_cursor1,5,v_cum_balance,v_BatchSize,1);
2283:
2284: v_return_code := dbms_sql.execute(v_cursor1);
2285:
2278: dbms_sql.define_array(v_cursor1,1,v_customer_id,v_BatchSize,1);
2279: dbms_sql.define_array(v_cursor1,2,v_site_use_id,v_BatchSize,1);
2280: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
2281: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
2282: dbms_sql.define_array(v_cursor1,5,v_cum_balance,v_BatchSize,1);
2283:
2284: v_return_code := dbms_sql.execute(v_cursor1);
2285:
2286: --This is the fetch loop. Each call to FETCH_ROWS will retrive v_BatchSize
2280: dbms_sql.define_array(v_cursor1,3,v_currency_code,v_BatchSize,1);
2281: dbms_sql.define_array(v_cursor1,4,v_trx_date,v_BatchSize,1);
2282: dbms_sql.define_array(v_cursor1,5,v_cum_balance,v_BatchSize,1);
2283:
2284: v_return_code := dbms_sql.execute(v_cursor1);
2285:
2286: --This is the fetch loop. Each call to FETCH_ROWS will retrive v_BatchSize
2287: --rows of data. The loop is over when FETCH_ROWS returns a value< v_BatchSize.
2288:
2293: v_currency_code.delete;
2294: v_trx_date.delete;
2295: v_cum_balance.delete;
2296:
2297: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
2298: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
2299: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
2300: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
2301: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
2294: v_trx_date.delete;
2295: v_cum_balance.delete;
2296:
2297: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
2298: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
2299: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
2300: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
2301: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
2302: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_cum_balance);
2295: v_cum_balance.delete;
2296:
2297: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
2298: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
2299: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
2300: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
2301: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
2302: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_cum_balance);
2303:
2296:
2297: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
2298: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
2299: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
2300: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
2301: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
2302: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_cum_balance);
2303:
2304: --The special case of v_NumRows = 0 needs to be checked here. This
2297: v_NumRows := DBMS_SQL.FETCH_ROWS(v_cursor1);
2298: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
2299: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
2300: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
2301: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
2302: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_cum_balance);
2303:
2304: --The special case of v_NumRows = 0 needs to be checked here. This
2305: --means that the previous fetch returned all the remaining rows and
2298: DBMS_SQL.COLUMN_VALUE(v_cursor1,1,v_customer_id);
2299: DBMS_SQL.COLUMN_VALUE(v_cursor1,2,v_site_use_id);
2300: DBMS_SQL.COLUMN_VALUE(v_cursor1,3,v_currency_code);
2301: DBMS_SQL.COLUMN_VALUE(v_cursor1,4,v_trx_date);
2302: DBMS_SQL.COLUMN_VALUE(v_cursor1,5,v_cum_balance);
2303:
2304: --The special case of v_NumRows = 0 needs to be checked here. This
2305: --means that the previous fetch returned all the remaining rows and
2306: --therefore we are done with the loop.
2311:
2312: --Use BIND_ARRAYS to specify the input variables for the insert.
2313: --only elements 1..V_NumRows will be used.
2314:
2315: DBMS_SQL.BIND_ARRAY(v_cursor2,':cum_balance',v_cum_balance);
2316: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
2317: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
2318: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
2319: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
2312: --Use BIND_ARRAYS to specify the input variables for the insert.
2313: --only elements 1..V_NumRows will be used.
2314:
2315: DBMS_SQL.BIND_ARRAY(v_cursor2,':cum_balance',v_cum_balance);
2316: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
2317: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
2318: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
2319: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
2320: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
2313: --only elements 1..V_NumRows will be used.
2314:
2315: DBMS_SQL.BIND_ARRAY(v_cursor2,':cum_balance',v_cum_balance);
2316: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
2317: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
2318: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
2319: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
2320: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
2321:
2314:
2315: DBMS_SQL.BIND_ARRAY(v_cursor2,':cum_balance',v_cum_balance);
2316: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
2317: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
2318: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
2319: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
2320: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
2321:
2322: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
2315: DBMS_SQL.BIND_ARRAY(v_cursor2,':cum_balance',v_cum_balance);
2316: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
2317: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
2318: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
2319: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
2320: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
2321:
2322: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
2323:
2316: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
2317: DBMS_SQL.BIND_ARRAY(v_cursor2,':customer_id',v_customer_id);
2318: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
2319: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
2320: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
2321:
2322: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
2323:
2324: EXIT WHEN v_NumRows < v_BatchSize;
2318: DBMS_SQL.BIND_ARRAY(v_cursor2,':site_use_id',v_site_use_id);
2319: DBMS_SQL.BIND_ARRAY(v_cursor2,':currency_code',v_currency_code);
2320: DBMS_SQL.BIND_ARRAY(v_cursor2,':as_of_date',v_trx_date);
2321:
2322: v_return_code := DBMS_SQL.EXECUTE(v_cursor2);
2323:
2324: EXIT WHEN v_NumRows < v_BatchSize;
2325:
2326: END LOOP;
2324: EXIT WHEN v_NumRows < v_BatchSize;
2325:
2326: END LOOP;
2327:
2328: DBMS_SQL.CLOSE_CURSOR(v_cursor1);
2329: DBMS_SQL.CLOSE_CURSOR(v_cursor2);
2330:
2331: IF PG_DEBUG in ('Y','C')
2332: THEN
2325:
2326: END LOOP;
2327:
2328: DBMS_SQL.CLOSE_CURSOR(v_cursor1);
2329: DBMS_SQL.CLOSE_CURSOR(v_cursor2);
2330:
2331: IF PG_DEBUG in ('Y','C')
2332: THEN
2333: arp_standard.debug('ar_trx_summary_pkg.load_high_watermark()-');