This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
********** | |
Ejemplo de tipos de datos | |
********** | |
CREATE OR REPLACE TYPE pk_licencia AS OBJECT | |
( | |
cod_tipo_licencia VARCHAR2(10) | |
, num_licencia VARCHAR2(8) | |
, CONSTRUCTOR FUNCTION pk_licencia(licencia VARCHAR2) RETURN SELF AS RESULT | |
) | |
INSTANTIABLE FINAL; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
CREATE OR REPLACE PACKAGE BODY AEGPA_EP.mod_licencias IS | |
PROCEDURE entrada (name_array IN OUT OWA.vc_arr, | |
value_array IN OUT OWA.vc_arr) | |
IS | |
submitAction VARCHAR2(255) := pspgen_parameter.get_value(name_array, value_array, 'submitAction'); | |
BEGIN | |
IF submitAction IS NOT NULL THEN | |
mod_licencias_validators.entrada(name_array, value_array); | |
IF pspgen_parameter.get_value(name_array, value_array, '_form_action') IS NOT NULL THEN |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
CREATE OR REPLACE PACKAGE BODY AEGPA_EP.mod_licencias_test IS | |
v_numero_test mod_licencias_test_results.numero_test%TYPE; | |
v_nombre_funcion mod_licencias_test_results.nombre_funcion%TYPE; | |
v_descripcion_test mod_licencias_test_results.descripcion_test%TYPE; | |
v_resultado mod_licencias_test_results.resultado%TYPE; | |
v_resultado_esperado mod_licencias_test_results.resultado_esperado%TYPE; | |
v_test_ok mod_licencias_test_results.test_ok%TYPE; | |
PROCEDURE inicializar_test IS | |
BEGIN |