/* Печать сокращённой заявки на кассовый расход 8н (0531851). */
create or replace procedure P_BANKDOCS_XLS_ZR2
(

/*nvl(TA2.AGNNAME, */A2.AGNNAME/*)*/ AGENT_TO,

TA2 -- это

AGNLIST        TA2,

соединённый

and T2.AGNRN         = TA2.RN(+)

с

AGNTREAS       T2,

соединённый по условию

and AC2.AGNTREAS     = T2.RN(+)

and B.AGENT_TO_ACC   = AC2.RN(+)

а B -- это

BANKDOCS       B,

А A2 присоединён по условию

and B.AGENT_TO       = A2.RN(+)

Строка 269: убрать префикс

sDOCNUMB  := /*ltrim(doc.BANK_DOCPREF)||*/ltrim(doc.BANK_DOCNUMB);

Строка 305:

p_bite_line( doc.AGNTREAS, 60, sH_TREAS1, sH_TREAS2 );
/*--ra-20100802: Изменил алгоритм разбиения на строки
if (doc.AGNTREAS is not null) and (length(doc.AGNTREAS) > 60) then
sH_TREAS1 := substr(doc.AGNTREAS,1,60);
sH_TREAS2 := substr(doc.AGNTREAS,61);
else
sH_TREAS1 := doc.AGNTREAS;
end if;
--Этот код больше не нужен*/

Строка 515: в ячейку даты писать 0, если в номере 0

if '0' = doc.NOM_OSN3 then --ra mod
PRSG_EXCEL.CELL_VALUE_WRITE( DAT_OSN3, '''0' );
else
PRSG_EXCEL.CELL_VALUE_WRITE( DAT_OSN3, doc.DAT_OSN3 );
end if;

Строка 549 (конец процедуры): не текущая дата, а дата банковского документа

--PRSG_EXCEL.CELL_VALUE_WRITE( B_DAY,     to_char(sysdate, 'DD') );
--PRSG_EXCEL.CELL_VALUE_WRITE( B_MONTH,   F_GET_MONTH(D_MONTH(sysdate), 1) );
--PRSG_EXCEL.CELL_VALUE_WRITE( B_YEAR,    substr(to_char(sysdate, 'YYYY'),3) );
PRSG_EXCEL.CELL_VALUE_WRITE( B_DAY,       sH_DAY );
PRSG_EXCEL.CELL_VALUE_WRITE( B_MONTH,     sH_MONTH );
PRSG_EXCEL.CELL_VALUE_WRITE( B_YEAR,      sH_YEAR );

Выводимые переменные определены на строке 289: