SHARE
TWEET

Untitled

a guest Apr 23rd, 2019 67 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. DECLARE
  2.     dias NUMBER:=1025;
  3.     resultado NUMBER;
  4.     resto NUMBER;
  5.     meses NUMBER;
  6. BEGIN
  7.    /* Obtener los aƱos */
  8.    DBMS_OUTPUT.put_line(CHR(13));
  9.    DBMS_OUTPUT.put_line(CHR(13));
  10.     resultado:= (dias*1) / 365;
  11.     resultado := TRUNC(resultado, 0);
  12.     /* Obtener los meses */
  13.     resto:= dias - (resultado * 365);
  14.     meses:= resto / 30;
  15.     meses := TRUNC(meses,0);
  16.     /* Obtener los dias restantes */
  17.     resto:= resto - (meses * 30);
  18.     /* Mostrar el resultado */
  19.     DBMS_OUTPUT.PUT_LINE(dias || ' dias son: ' || resultado || ' anyos y ' || meses || ' meses y ' || resto || ' dias' );
  20. END;
  21. /
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top