Да вобщем-то разницы никакой нет. Всё равно не хватает
Код: Выделить всё
execute ibeblock
AS
DECLARE VARIABLE F1 INTEGER;
DECLARE VARIABLE F2 INTEGER;
DECLARE VARIABLE F3 INTEGER;
DECLARE VARIABLE F4 VARCHAR(255);
DECLARE VARIABLE F5 VARCHAR(255);
DECLARE VARIABLE F6 VARCHAR(255);
DECLARE VARIABLE F7 VARCHAR(255);
DECLARE VARIABLE F8 VARCHAR(255);
DECLARE VARIABLE F9 VARCHAR(255);
DECLARE VARIABLE F10 VARCHAR(255);
DECLARE VARIABLE F11 VARCHAR(255);
DECLARE VARIABLE F12 VARCHAR(255);
DECLARE VARIABLE F13 VARCHAR(255);
DECLARE VARIABLE F14 VARCHAR(255);
DECLARE VARIABLE F15 VARCHAR(255);
DECLARE VARIABLE F16 VARCHAR(255);
DECLARE VARIABLE F17 VARCHAR(255);
DECLARE VARIABLE F18 VARCHAR(255);
DECLARE VARIABLE F19 VARCHAR(255);
DECLARE VARIABLE F20 VARCHAR(255);
DECLARE VARIABLE F21 VARCHAR(255);
DECLARE VARIABLE F22 VARCHAR(255);
DECLARE VARIABLE F23 VARCHAR(255);
DECLARE VARIABLE F24 VARCHAR(255);
DECLARE VARIABLE F25 VARCHAR(255);
begin
/* Procedure Text */
for select main_id, opf_id, banks_id, field1, field3, field4, field5, field6, field7, field8,field9,field10,field11,field12,field13,field14,field15,field16,field17,field18,field19,field21,field22,field23,field24
from temp_tbl, sp_opf, sp_banks
where temp_tbl.field2 = sp_opf.opf_value and temp_tbl.field20 = sp_banks.banks_value
into :F1, :F2, :F3, :F4, :F5, :F6, :F7, :F8, :F9, :F10, :F11, :F12, :F13, :F14, :F15, :F16, :F17, :F18, :F19, :F20, :F21, :F22, :F23, :F24, :F25
do
begin
insert into main_tbl values (:F1, :F2, :F3, :F4, :F5, :F6, :F7, :F8, :F9, :F10, :F11, :F12, :F13, :F14, :F15, :F16, :F17, :F18, :F19, :F20, :F21, :F22, :F23, :F24, :F25);
suspend;
end
end