第一个插入段是可以插入数据的,就是插入不全,第二个根本插不进去,大家帮忙看一下程序有问题吗?谢谢
Procedure text(result_key_ in number,
Company_ IN varchar2,
BEGIN_QUERY_YEAR_ IN varchar2,
BEGIN_QUERY_PERIOD_ IN VARCHAR2,
END_QUERY_PERIOD_ IN VARCHAR2,
WFSE_FLAG_ IN VARCHAR2,--无发生额不显示
Account_ IN VARCHAR2
)
is
BEGIN_account_ VARCHAR2(20);
END_account_ VARCHAR2(20);
ACCOUNT_CURR_ account.ACCOUNT%type;
Id_ number;
AMOUNT number;
CURR_AMOUNT_TOTAL number;
account_row_Id number;
cursor get_ged_voucher_row
is
select * from gen_led_voucher_row
where company=company_
and accounting_period between to_number(BEGIN_QUERY_PERIOD_) and to_number(END_QUERY_PERIOD_)
and account between BEGIN_account_ and END_account_
and accounting_year=BEGIN_QUERY_YEAR_
order by voucher_date;
begin
ACCOUNT_CURR_ := account_;
Id_:= 0;
account_row_Id:=0;if account_ is not null then
AMOUNT := get_account_balance(company_,ACCOUNT_CURR_,BEGIN_QUERY_YEAR_ ,BEGIN_QUERY_PERIOD_,END_QUERY_PERIOD_,'YE') ;
INSERT INTO INFO_SERVICES_RPT
(RESULT_KEY,
ROW_NO,
parent_row_no,
n1, --ID
s1, --COMPANY
s2, --COMPANY_NAME
s13, --BEGIN_QUERY_YEAR
s3, --BEGIN_QUERY_PERIOD
s4, --END_QUERY_PERIOD
s14, --BEGIN_ACCOUNT
s15, --END_ACCOUNT
s5, --account
s6, --ACOUNT_NAME
s7, --PERSON_ID
s8, --PERSON_NAME
s9, --VOUCHER_FLAG
s16, --WFSE_FLAG
d1, -- VOUCHER_DATE
s10, --VOUCHER_NO
s11, --VOUCHER_TEXT
s12, --DEBIT_CREDIT_FLAG
n2, --DEBIT_BALANCE
n3, --CREDIT_BALANCE
n4 --BALANCE
)
VALUES
( result_key_,
account_|| LPAD(account_row_Id,6,'0') ,
0,
Id_, --ID
COMPANY_, --COMPANY
'', --COMPANY_NAME
BEGIN_QUERY_YEAR_, --BEGIN_QUERY_YEAR
BEGIN_QUERY_PERIOD_, --BEGIN_QUERY_PERIOD
END_QUERY_PERIOD_, --END_QUERY_PERIOD
BEGIN_ACCOUNT_, --BEGIN_ACCOUNT
END_ACCOUNT_, --END_ACCOUNT
'', --account
'', --ACOUNT_NAME
'', --PERSON_ID
'wo', --PERSON_NAME
'', --VOUCHER_FLAG
WFSE_FLAG_, --WFSE_FLAG
'', --VOUCHER_DATE
'', --VOUCHER_NO
'', --VOUCHER_TEXT
'', --DEBIT_CREDIT_FLAG
'', --DEBIT_BALANCE
'', --CREDIT_BALANCE
AMOUNT --BALANCE
); if WFSE_FLAG_ ='否' then --不显示无发生额记录 CURR_AMOUNT_TOTAL := AMOUNT ;
FOR get_voucher_all IN get_ged_voucher_row LOOP
INSERT INTO INFO_SERVICES_RPT
(RESULT_KEY,
ROW_NO,
parent_row_no,
n1, --ID
s1, --COMPANY
s2, --COMPANY_NAME
s13, --BEGIN_QUERY_YEAR
s3, --BEGIN_QUERY_PERIOD
s4, --END_QUERY_PERIOD
s14, --BEGIN_ACCOUNT
s15, --END_ACCOUNT
s5, --account
s6, --ACOUNT_NAME
s7, --PERSON_ID
s8, --PERSON_NAME
s9, --VOUCHER_FLAG
s16, --WFSE_FLAG
d1, -- VOUCHER_DATE
s10, --VOUCHER_NO
s11, --VOUCHER_TEXT
s12, --DEBIT_CREDIT_FLAG
n2, --DEBIT_BALANCE
n3, --CREDIT_BALANCE
n4 --BALANCE
)
values
( result_key_,
account_|| LPAD(account_row_Id,6,'0') ,
0,
Id_, --ID
COMPANY_, --COMPANY
'', --COMPANY_NAME
BEGIN_QUERY_YEAR_, --BEGIN_QUERY_YEAR
BEGIN_QUERY_PERIOD_, --BEGIN_QUERY_PERIOD
END_QUERY_PERIOD_, --END_QUERY_PERIOD
BEGIN_ACCOUNT_, --BEGIN_ACCOUNT
END_ACCOUNT_, --END_ACCOUNT
get_voucher_all.account, --account
get_voucher_all.account_desc, --ACOUNT_NAME
'ddd', --
'', --
'记', --VOUCHER_FLAG
WFSE_FLAG_, --WFSE_FLAG
get_voucher_all.voucher_date, --VOUCHER_DATE
get_voucher_all.voucher_no, --VOUCHER_NO
get_voucher_all.text,
'',
get_voucher_all.debet_amount, get_voucher_all.credit_amount, AMOUNT
);
Id_:=Id_+1;
end loop;
end if;
commit;
end if;
end text;
Procedure text(result_key_ in number,
Company_ IN varchar2,
BEGIN_QUERY_YEAR_ IN varchar2,
BEGIN_QUERY_PERIOD_ IN VARCHAR2,
END_QUERY_PERIOD_ IN VARCHAR2,
WFSE_FLAG_ IN VARCHAR2,--无发生额不显示
Account_ IN VARCHAR2
)
is
BEGIN_account_ VARCHAR2(20);
END_account_ VARCHAR2(20);
ACCOUNT_CURR_ account.ACCOUNT%type;
Id_ number;
AMOUNT number;
CURR_AMOUNT_TOTAL number;
account_row_Id number;
cursor get_ged_voucher_row
is
select * from gen_led_voucher_row
where company=company_
and accounting_period between to_number(BEGIN_QUERY_PERIOD_) and to_number(END_QUERY_PERIOD_)
and account between BEGIN_account_ and END_account_
and accounting_year=BEGIN_QUERY_YEAR_
order by voucher_date;
begin
ACCOUNT_CURR_ := account_;
Id_:= 0;
account_row_Id:=0;if account_ is not null then
AMOUNT := get_account_balance(company_,ACCOUNT_CURR_,BEGIN_QUERY_YEAR_ ,BEGIN_QUERY_PERIOD_,END_QUERY_PERIOD_,'YE') ;
INSERT INTO INFO_SERVICES_RPT
(RESULT_KEY,
ROW_NO,
parent_row_no,
n1, --ID
s1, --COMPANY
s2, --COMPANY_NAME
s13, --BEGIN_QUERY_YEAR
s3, --BEGIN_QUERY_PERIOD
s4, --END_QUERY_PERIOD
s14, --BEGIN_ACCOUNT
s15, --END_ACCOUNT
s5, --account
s6, --ACOUNT_NAME
s7, --PERSON_ID
s8, --PERSON_NAME
s9, --VOUCHER_FLAG
s16, --WFSE_FLAG
d1, -- VOUCHER_DATE
s10, --VOUCHER_NO
s11, --VOUCHER_TEXT
s12, --DEBIT_CREDIT_FLAG
n2, --DEBIT_BALANCE
n3, --CREDIT_BALANCE
n4 --BALANCE
)
VALUES
( result_key_,
account_|| LPAD(account_row_Id,6,'0') ,
0,
Id_, --ID
COMPANY_, --COMPANY
'', --COMPANY_NAME
BEGIN_QUERY_YEAR_, --BEGIN_QUERY_YEAR
BEGIN_QUERY_PERIOD_, --BEGIN_QUERY_PERIOD
END_QUERY_PERIOD_, --END_QUERY_PERIOD
BEGIN_ACCOUNT_, --BEGIN_ACCOUNT
END_ACCOUNT_, --END_ACCOUNT
'', --account
'', --ACOUNT_NAME
'', --PERSON_ID
'wo', --PERSON_NAME
'', --VOUCHER_FLAG
WFSE_FLAG_, --WFSE_FLAG
'', --VOUCHER_DATE
'', --VOUCHER_NO
'', --VOUCHER_TEXT
'', --DEBIT_CREDIT_FLAG
'', --DEBIT_BALANCE
'', --CREDIT_BALANCE
AMOUNT --BALANCE
); if WFSE_FLAG_ ='否' then --不显示无发生额记录 CURR_AMOUNT_TOTAL := AMOUNT ;
FOR get_voucher_all IN get_ged_voucher_row LOOP
INSERT INTO INFO_SERVICES_RPT
(RESULT_KEY,
ROW_NO,
parent_row_no,
n1, --ID
s1, --COMPANY
s2, --COMPANY_NAME
s13, --BEGIN_QUERY_YEAR
s3, --BEGIN_QUERY_PERIOD
s4, --END_QUERY_PERIOD
s14, --BEGIN_ACCOUNT
s15, --END_ACCOUNT
s5, --account
s6, --ACOUNT_NAME
s7, --PERSON_ID
s8, --PERSON_NAME
s9, --VOUCHER_FLAG
s16, --WFSE_FLAG
d1, -- VOUCHER_DATE
s10, --VOUCHER_NO
s11, --VOUCHER_TEXT
s12, --DEBIT_CREDIT_FLAG
n2, --DEBIT_BALANCE
n3, --CREDIT_BALANCE
n4 --BALANCE
)
values
( result_key_,
account_|| LPAD(account_row_Id,6,'0') ,
0,
Id_, --ID
COMPANY_, --COMPANY
'', --COMPANY_NAME
BEGIN_QUERY_YEAR_, --BEGIN_QUERY_YEAR
BEGIN_QUERY_PERIOD_, --BEGIN_QUERY_PERIOD
END_QUERY_PERIOD_, --END_QUERY_PERIOD
BEGIN_ACCOUNT_, --BEGIN_ACCOUNT
END_ACCOUNT_, --END_ACCOUNT
get_voucher_all.account, --account
get_voucher_all.account_desc, --ACOUNT_NAME
'ddd', --
'', --
'记', --VOUCHER_FLAG
WFSE_FLAG_, --WFSE_FLAG
get_voucher_all.voucher_date, --VOUCHER_DATE
get_voucher_all.voucher_no, --VOUCHER_NO
get_voucher_all.text,
'',
get_voucher_all.debet_amount, get_voucher_all.credit_amount, AMOUNT
);
Id_:=Id_+1;
end loop;
end if;
commit;
end if;
end text;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货