Ошибка преобразования трафарета.
Информация для администратора:
OCI Oracle error #20103 (-1) "ORA-20103: Не найдена запись отчета/подотчета 11326436/(нет)
ORA-06512: at "PARUS.F_BLREPORTS_DESCRIBE_ALL", line 86
ORA-06512: at line 154".
Reason: StatementExecute
/* describeAll */
declare
nRN number;
nDATA_TYPE number;
sSTR_VALUE varchar2(240);
nNUM_WIDTH number;
nNUM_VALUE number;
dDATE_VALUE date;
nPROC number;
sTEXT varchar2(4000);
nIDENT number;
nREPORT number;
nSUBREPORT number;
nTEMPLATE number;
nINDEX number;
nVALUE number;
dDATE date;
sAUTHID varchar2(240);
nPURPOSE number;
nTABLE number;
nROWID number;
begin
nPROC := null;
begin
P_OPTIONS_GET_VALUES(
'DescribeBalanceReport',
:SYS$OUTER$PARAM0,
nDATA_TYPE,
sSTR_VALUE,
nNUM_WIDTH,
nNUM_VALUE,
dDATE_VALUE);
select RN
into nPROC
from USERPROCS
where CODE = sSTR_VALUE;
exception
when OTHERS then
nPROC := null;
end;
nREPORT := :SYS$OUTER$PARAM1 ;
nSUBREPORT := :SYS$OUTER$PARAM2;
nTEMPLATE := :SYS$OUTER$PARAM3 ;
nINDEX := :SYS$OUTER$PARAM4;
nVALUE := :SYS$OUTER$PARAM5;
nTABLE := :SYS$OUTER$PARAM6;
nROWID := :SYS$OUTER$PARAM7;
dDATE := to_date(:SYS$OUTER$PARAM8, 'dd.mm.yyyy hh24:mi:ss');
sAUTHID := :SYS$OUTER$PARAM9;
nPURPOSE := :SYS$OUTER$PARAM10 ;
if nREPORT is null then
begin
select PRN
into nREPORT
from BLSUBREPORTS
where RN = nSUBREPORT;
exception
when NO_DATA_FOUND then
null;
end;
end if;
if nINDEX is not null then
begin
select BALANCEINDEXES
into nINDEX
from BLTABLESIND
where RN = nINDEX;
exception
when NO_DATA_FOUND then
null;
end;
end if;
if nINDEX is not null and nTABLE is not null and nROWID is not null and nVALUE is null then
begin
select V.RN
into nVALUE
from BLTBLVALUES V
inner join BLTBLROWS R on R.RN = V.PRN
inner join BLTABLESIND TI on TI.RN = V.BLTABLESIND
where R.PRN = nSUBREPORT
and TI.BALANCEINDEXES = nINDEX
and R.NUMB = nROWID
and R.BLTABLES = nTABLE;
exception
when NO_DATA_FOUND then
null;
end;
end if;
if nPROC is not null then
nIDENT := gen_ident;
for C in (select RN, PARAMNAME from USERPROCSPARAMS where PRN = nPROC) loop
if upper(C.PARAMNAME) = 'NCOMPANY' then
P_USERPROCSPARAMSBUF_INSERT(C.RN, nIDENT, null, :SYS$OUTER$PARAM11, null, null, null, nRN);
elsif upper(C.PARAMNAME) = 'NREPORT' then
P_USERPROCSPARAMSBUF_INSERT(C.RN, nIDENT, null, nREPORT, null, null, null, nRN);
elsif upper(C.PARAMNAME) = 'NSUBREPORT' then
P_USERPROCSPARAMSBUF_INSERT(C.RN, nIDENT, null, nSUBREPORT, null, null, null, nRN);
elsif upper(C.PARAMNAME) = 'NTEMPLATE' then
P_USERPROCSPARAMSBUF_INSERT(C.RN, nIDENT, null, nTEMPLATE, null, null, null, nRN);
elsif upper(C.PARAMNAME) = 'NINDEX' then
P_USERPROCSPARAMSBUF_INSERT(C.RN, nIDENT, null, nINDEX, null, null, null, nRN);
elsif upper(C.PARAMNAME) = 'NVALUE' then
P_USERPROCSPARAMSBUF_INSERT(C.RN, nIDENT, null, nVALUE, null, null, null, nRN);
elsif upper(C.PARAMNAME) = 'DDATE' then
P_USERPROCSPARAMSBUF_INSERT(C.RN, nIDENT, null, null, dDATE, null, null, nRN);
elsif upper(C.PARAMNAME) = 'SAUTHID' then
P_USERPROCSPARAMSBUF_INSERT(C.RN, nIDENT, sAUTHID, null, null, null, null, nRN);
elsif upper(C.PARAMNAME) = 'NPURPOSE' then
P_USERPROCSPARAMSBUF_INSERT(C.RN, nIDENT, null, nPURPOSE, null, null, null, nRN);
elsif upper(C.PARAMNAME) = 'SRESULT' then
P_USERPROCSPARAMSBUF_INSERT(C.RN, nIDENT, null, null, null, null, null, nRN);
end if;
end loop;
begin
P_USERPROCS_EXECUTE(nPROC, nIDENT, :SYS$OUTER$PARAM12);
select B.STRINGVALUE
into sTEXT
from USERPROCSPARAMSBUF B
inner join USERPROCSPARAMS P on P.RN = B.PRN
where upper(P.PARAMNAME) = 'SRESULT'
and B.IDENT = nIDENT;
exception
when OTHERS then
sTEXT := sqlerrm;
end;
P_USERPROCSPARAMSBUF_CLEAR(nIDENT);
end if;
if sTEXT is null then
sTEXT := F_BLREPORTS_DESCRIBE_ALL(:SYS$OUTER$PARAM13,
nREPORT, nSUBREPORT, nTEMPLATE,
nINDEX, nVALUE, dDATE, sAUTHID, nPURPOSE);
end if;
:TEXT := sTEXT;
end;
SYS$OUTER$PARAM0(Unknown, SQLT:1):
SYS$OUTER$PARAM1(OleStr, SQLT:1):"11326436"
SYS$OUTER$PARAM2(Unknown, SQLT:1):
SYS$OUTER$PARAM3(OleStr, SQLT:1):"4170710"
SYS$OUTER$PARAM4(Unknown, SQLT:1):
SYS$OUTER$PARAM5(Unknown, SQLT:1):
SYS$OUTER$PARAM6(Unknown, SQLT:1):
SYS$OUTER$PARAM7(Unknown, SQLT:1):
SYS$OUTER$PARAM8(Unknown, SQLT:1):
SYS$OUTER$PARAM9(Unknown, SQLT:1):
SYS$OUTER$PARAM10(OleStr, SQLT:1):"3"
SYS$OUTER$PARAM11(Unknown, SQLT:1):
SYS$OUTER$PARAM12(Unknown, SQLT:1):
SYS$OUTER$PARAM13(Unknown, SQLT:1):
TEXT(Unknown, SQLT:112):.