Форум: "Базы";
Текущий архив: 2004.12.19;
Скачать: [xml.tar.bz2];
Вниз
Хранимая процедура Найти похожие ветки
← →
Dush (2004-11-19 14:04) [0]Доброго времени суток!
Создал такую процедуру:CREATE PROCEDURE INF_INST
RETURNS (
NAME_GROUP VARCHAR(20),
SUM_NACH_INST NUMERIC(9, 2),
SUM_OPL_INST NUMERIC(9, 2)
)
AS
Declare variable SN NUMERIC(9, 2);
Declare variable SO NUMERIC(9, 2);
Declare variable ID_St integer;
Declare variable ID_Gr integer;
BEGIN
for select id_group, Name from Groups Order by ID_Group into :ID_Gr, :Name_Group
do
begin
Sum_Nach_Inst=0;
Sum_Opl_Inst=0;
for select id_stud from stud where id_group = :ID_Gr into :ID_St
do
begin
select Sum(Sum_Nach_Stud), Sum(Sum_Opl_Stud) FROM Nach_Stud where ID_Stud=:ID_St into :SN, :SO;
Sum_Nach_Inst=:Sum_Nach_Inst+:SN;
Sum_Opl_Inst=:Sum_Opl_Inst+:SO;
end
suspend;
end
END;
Она должна выбирать имя группы, начисления и оплаты по группам и возвращать в основную программу. Но в программе я вижу значения только 2 первых параметров (NAME_GROUP и SUM_NACH_INST). Может кто знает в чем дело?
← →
Johnmen © (2004-11-19 14:12) [1]Очки запотели ?
← →
HSolo © (2004-11-19 14:14) [2]Ошибка в 17-й строке (с) :)
Как смОтрите?
← →
Dush (2004-11-19 14:46) [3]2Johnmen
раз 30 протирал - не помогло
2HSolo
и где там ошибка?
← →
Johnmen © (2004-11-19 14:53) [4]>Dush (19.11.04 14:46) [3]
>2Johnmen
> раз 30 протирал - не помогло
Это ошибка ! Надо 333 раза.
:)
← →
HSolo © (2004-11-19 15:12) [5]Процедура выглядит нормально. Значит - не то (или не там) смотрите. А где ошибка - не знаю, мне Вашего экрана не видно :)
← →
Dush (2004-11-19 15:19) [6]ну и на том спасибо :)
← →
stud © (2004-11-19 16:01) [7]
>CREATE PROCEDURE INF_INST
>RETURNS (
> NAME_GROUP VARCHAR(20),
> SUM_NACH_INST NUMERIC(9, 2),
> SUM_OPL_INST NUMERIC(9, 2)
>)
>AS
>Declare variable SN NUMERIC(9, 2);
>Declare variable SO NUMERIC(9, 2);
>Declare variable ID_St integer;
>Declare variable ID_Gr integer;
>BEGIN
> for select id_group, Name from Groups Order by
>ID_Group into :ID_Gr, :Name_Group
> do
> begin
> Sum_Nach_Inst=0;
> Sum_Opl_Inst=0;
> for select id_stud from stud where id_group =
>:ID_Gr into :ID_St
> do
> begin
> select Sum(Sum_Nach_Stud), Sum(Sum_Opl_Stud) FROM
>Nach_Stud where ID_Stud=:ID_St into :SN, :SO;
> Sum_Nach_Inst=:Sum_Nach_Inst+:SN;
> Sum_Opl_Inst=:Sum_Opl_Inst+:SO;
suspend;
> end
/* suspend; */
> end
> END;
← →
Desdechado © (2004-11-19 16:02) [8]Sum_Nach_Inst=:Sum_Nach_Inst+:SN;
Sum_Opl_Inst=:Sum_Opl_Inst+:SO;
двоеточия поубирай
← →
Johnmen © (2004-11-21 02:33) [9]>Desdechado © (19.11.04 16:02) [8]
А смысл ?
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2004.12.19;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.158 c