Код: Выделить всё
select main_base.nom_doc, main_base.name_cl, main_base.date_zay,
main_base.nac, main_base.nac_k, main_base.prim, base.name_tv, base.izgot, base.cena,
base.cena_k, base.kol_zav, base.kol_zak from MAIN_BASE, base
where base.nom_doc=68000 and main_base.nom_doc=68000
order by base.name_tv
Код: Выделить всё
CREATE PROCEDURE SP_PRINTZAY (
TEMP_NOM_DOC INTEGER)
RETURNS (
NOM_DOC INTEGER,
NAME_CL VARCHAR(50),
DATE_ZAY DATE,
NAC NUMERIC(15,2),
NAC_K NUMERIC(15,2),
PRIM VARCHAR(50),
NAME_TV VARCHAR(50),
IZGOT VARCHAR(40),
CENA NUMERIC(15,2),
CENA_K NUMERIC(15,2),
KOL_ZAK INTEGER,
KOL_ZAV INTEGER)
AS
begin
for
select main_base.nom_doc, main_base.name_cl, main_base.date_zay,
main_base.nac, main_base.nac_k, main_base.prim,
base.name_tv, base.izgot, base.cena, base.cena_k, base.kol_zak,
base.kol_zav from main_base, base
where main_base.nom_doc= :temp_nom_doc and base.nom_doc = :temp_nom_doc
into :nom_doc, :name_cl, :date_zay, :nac, :nac_k, :prim, :name_tv,
:izgot, :cena, :cena_k, :kol_zak, :kol_zav
do
begin
suspend;
end