Guest User

Untitled

a guest
Nov 17th, 2018
117
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.49 KB | None | 0 0
  1. --1. ESte es el caso de un %type en la declaracion del paquete
  2. CREATE OR REPLACE PACKAGE paqtype1 IS
  3. max_available_date1 DATE := LAST_DAY (ADD_MONTHS (SYSDATE, 3));
  4. last_ship_date1 max_available_date1%TYPE;
  5. END;
  6. /
  7.  
  8. --2. Este es el caso de un %type en la declaración del cuerpo del paquete
  9. CREATE OR REPLACE PACKAGE paqtype2 IS
  10.  
  11. END;
  12. /
  13.  
  14. CREATE OR REPLACE PACKAGE BODY paqtype2 IS
  15. max_available_date2 DATE := LAST_DAY (ADD_MONTHS (SYSDATE, 3));
  16. last_ship_date2 max_available_date2%TYPE;
  17. FUNCTION foo RETURN number is
  18. BEGIN
  19. RETURN 1;
  20. END;
  21. END;
  22. /
  23.  
  24.  
  25.  
  26.  
  27.  
  28. --3. Este es el caso de un %type en la declaración del cuerpo del paquete, usando una variable de la declaracion del paquete
  29. CREATE OR REPLACE PACKAGE paqtype3 IS
  30. max_available_date3 DATE := LAST_DAY (ADD_MONTHS (SYSDATE, 3));
  31. END;
  32. /
  33.  
  34. CREATE OR REPLACE PACKAGE BODY paqtype3 IS
  35. last_ship_date3 max_available_date3%TYPE;
  36. FUNCTION foo RETURN number is
  37. BEGIN
  38. RETURN 1;
  39. END;
  40. END;
  41. /
  42.  
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51. --4. Este es el caso de un %type en la declaración del cuerpo del paquete, usando una variable de la declaracion del paquete de otro paquete distinto
  52. CREATE OR REPLACE PACKAGE paqtype4 IS
  53. max_available_date4 DATE := LAST_DAY (ADD_MONTHS (SYSDATE, 3));
  54. END;
  55. /
  56.  
  57. CREATE OR REPLACE PACKAGE paqtype5 IS
  58. last_ship_date5 paqtype4.max_available_date4%TYPE;
  59. FUNCTION foo RETURN number is
  60. BEGIN
  61. RETURN 1;
  62. END;
  63. END;
  64. /
  65.  
  66.  
  67.  
  68.  
  69.  
  70.  
  71. --5. Este es el caso de un %type en la declaración del cuerpo del paquete anidado
  72.  
  73.  
  74. CREATE OR REPLACE PACKAGE paqtype6 IS
  75. max_available_date6 DATE := LAST_DAY (ADD_MONTHS (SYSDATE, 3));
  76. last_ship_date6 max_available_date6%TYPE;
  77. last_ship_date61 last_ship_date6%TYPE;
  78. last_ship_date62 last_ship_date61%TYPE;
  79. END;
  80. /
  81.  
  82.  
  83.  
  84.  
  85. --6. Este es el caso de un %type en la declaración del cuerpo del paquete anidado
  86.  
  87.  
  88. CREATE OR REPLACE PACKAGE paqtype7 IS
  89.  
  90. max_available_date7 DATE := LAST_DAY (ADD_MONTHS (SYSDATE, 3));
  91.  
  92. END;
  93. /
  94.  
  95.  
  96. CREATE OR REPLACE PACKAGE BODY paqtype7 IS
  97. last_ship_date7 max_available_date7%TYPE;
  98. last_ship_date71 last_ship_date7%TYPE;
  99. last_ship_date72 last_ship_date71%TYPE;
  100. FUNCTION foo RETURN number is
  101. BEGIN
  102. RETURN 1;
  103. END;
  104. END;
  105. /
  106.  
  107. -7. Este es el caso de un %type en la declaración de una funcion dentro de un paquete
  108. CREATE OR REPLACE PACKAGE paqtype8 IS
  109.  
  110. END;
  111. /
  112.  
  113. CREATE OR REPLACE PACKAGE BODY paqtype8 IS
  114.  
  115.  
  116. FUNCTION foo RETURN number is
  117. max_available_date8 DATE := LAST_DAY (ADD_MONTHS (SYSDATE, 3));
  118. last_ship_date8 max_available_date8%TYPE;
  119. BEGIN
  120. RETURN 1;
  121. END;
  122. END;
  123. /
  124.  
  125.  
  126. --8. Este es el caso de un %type en la declaración e instanciación de una funcion dentro de un paquete
  127. CREATE OR REPLACE PACKAGE paqtype3 IS
  128.  
  129. END;
  130. /
  131.  
  132. CREATE OR REPLACE PACKAGE BODY paqtype9 IS
  133. max_available_date9 DATE := LAST_DAY (ADD_MONTHS (SYSDATE, 3));
  134.  
  135. FUNCTION foo RETURN number is
  136. last_ship_date9 max_available_date9%TYPE;
  137. BEGIN
  138. RETURN 1;
  139. END;
  140. END;
  141. /
  142.  
  143.  
  144.  
  145. --9. Este es el caso de un %type en una funcion dentro de un paquete body y su declaración en el paquete
  146. CREATE OR REPLACE PACKAGE paqtype10 IS
  147. max_available_date10 DATE := LAST_DAY (ADD_MONTHS (SYSDATE, 3));
  148. END;
  149. /
  150.  
  151. CREATE OR REPLACE PACKAGE BODY paqtype10 IS
  152.  
  153.  
  154. FUNCTION foo RETURN number is
  155. last_ship_date10 max_available_date10%TYPE;
  156. BEGIN
  157. RETURN 1;
  158. END;
  159. END;
  160. /
Add Comment
Please, Sign In to add comment