Галактика в вопросах и ответах

Код: Выделить всё

 (DATETIME INTEGER) RETURN DATE AS  MM INTEGER; YY INTEGER; TMP INTEGER; RESULT DATE;
 BEGIN
   if DATETIME = 0 THEN
     RESULT := TO_DATE(TO_CHAR(1)||'.'||TO_CHAR(1)||'.'||TO_CHAR(1900),'DD.MM.YYYY');
   END IF;
   if DATETIME <> 0 THEN
       YY := DATETIME / 65536;
       TMP := MOD(DATETIME,65536);
       MM := TMP / 256;
       TMP := MOD(TMP,256);
       RESULT := TO_DATE(TO_CHAR(TMP)||'.'||TO_CHAR(MM)||'.'||TO_CHAR(YY),'DD.MM.YYYY');
   END IF;
   RETURN RESULT;
 END;

Код: Выделить всё

select katsopr.fnsopr, gal.to_oradate(katsopr.fdsopr) from gal.katsopr
where KATSOPR.fnsopr ='697' and katsopr.fvidsopr=201 and 
decode(katsopr.fdsopr, 0, to_date('00.00.0000', 'DD.MM.YYYY'), gal.to_oradate(katsopr.fdsopr)) = to_date('18.12.2009', 'DD.MM.YYYY');

Код: Выделить всё

select p.ffio, gala.to_oradate(ap.fappointdate) from gala.persons p, gala.appointments ap, gala.contdoc cd, gala.attrval av, gala.x$users xu
where ap.fappointdate!=0
      and p.ftabnmb=av.fvdouble
      and av.fwtable=6
      and ap.fperson=p.fnrec 
      and ap.fccont=cd.fnrec 
      and cd.ftypeoper=5
      and av.fcrec=xu.atl_nrec
      and bitand(power(2,3),xu.xu$flag)=0
      and 
      (
      GALA.TO_ORADATE(AP.FAPPOINTDATE) >= sysdate-8
      and 
      GALA.TO_ORADATE(AP.FAPPOINTDATE) <= sysdate-4
      )
      ;