        ____________591

 ,   ,     WISQL  -
 .      

EXECUTE PROCEDURE <>;

    :   WISQL,  -
,            .. -
  .

    ,   , 


DROP PROCEDURE <>;

     .  
,           -
,  , ,   .   
    .      Getinf -
 ,    .    
:  , ,    ,  .
       ,     
 0,     ,  , -
   .

         -
   :

CREATE PROCEDURE Getinf (pFam char(20), pNam char(20), pPar char(20))

RETURNS (pYear integer, pDep char(15),pSex char(l))
AS
BEGIN

pYear=0;

SELECT Year_b, Dep, Sex From Pers WHERE
(Fam=:pFam)and(Nani=:pNam)and(Par=:pPar)
INTO pYear, pDep, pSex;

END;-'

  ,   ,    
    ,    -
,       .    
     .  -
       RETURNS.  -
       ,  , ,  -
.         
     .

      .     -
   pYear,  .   Select 
,     Fam, Nam  Par    -
  ,    ( pFam, pNam 
pPar).    ,    pYear, pDep  pSex (
   Into)    Year_b, Dep  Sex, -
    Select.    Select ... Into -
     .    -
   ,  Select     . , 
  pYear  0,   -
.     ,   ,  -
 .

    WISQL    :

EXECUTE PROCEDURE GETINF("","","")