Hola estimados amigos .. En primer lugar gracias por tomarte tu tiempo de leer este correo mi consulta es sobre las variables %rowtype y %type quiero sabes especificamente su uso porque quiero utilizarlo en mi stores para postgres por ejemplo algo asi... este ejemplo esta en oracle , intente crear mas de una variable %type en este formato pero postgres no me dejaba ...ademas como podrias tomas los EXEPTION para capturar mis errores. gracias.
-- * PROCEDURE SPU_CTACTE_INS_DJ(* * P_CODCONTRI --per_id IN MIGRACION2.MV_CTACTECABECERA.CODCONTRI%TYPE,* * P_CODPREDIO --pre_id IN MIGRACION2.MV_CTACTESUSTENTO.CODPREDIO%TYPE,* * P_CONGRUPO --? IN MIGRACION2.MV_CTACTESUSTENTO.CONGRUPO%TYPE,* * * * P_CONCODIGO --coc_id -- IN MIGRACION2.MV_CTACTESUSTENTO.CONCODIGO%TYPE,* * P_PREDIPSEC -- ? IN MIGRACION2.HJ_CTACTESUSREN.PREDIPSEC%TYPE,* * P_ANIO -- anio IN MIGRACION2.MV_CTACTESUSTENTO.CCS_ANIO%TYPE,* * P_INSOLUTO -- IN MIGRACION2.MV_CTACTESUSTENTO.CCS_EMISION%TYPE,* * P_TIPOINSOLUTO IN NUMBER,* * P_PERIODOINI IN MIGRACION2.MV_CTACTESUSTENTO.CCS_PERIODO%TYPE,* * P_PERIODOFIN IN MIGRACION2.MV_CTACTESUSTENTO.CCS_PERIODO%TYPE,* * P_MOTIDJCODI IN MIGRACION2.HJ_CTACTESUSREN.MOTIDJCODI%TYPE, * * P_FECSUSTENTO IN MIGRACION2.MV_CTACTESUSTENTO.CCS_FECSUSTENTO%TYPE,* * P_FECCALCULO IN MIGRACION2.MV_CTACTESUSTENTO.CCS_FECCALCULO%TYPE,* * P_RANGOSUS IN CHAR,* * P_ELID OUT MIGRACION2.RESULTADO.ELID%TYPE,* * P_MENSAJE OUT MIGRACION2.RESULTADO.MENSAJE%TYPE,* * P_ERRORID OUT MIGRACION2.RESULTADO.ERRORID%TYPE* * )* * AS* * * * V_CCC_ID MIGRACION2.MV_CTACTECABECERA.CCC_ID%TYPE :=0;* * V_CTA_ID MIGRACION2.MV_CTACTE.CTA_ID%TYPE :=0;* * V_CCS_ID MIGRACION2.MV_CTACTESUSTENTO.CCS_ID%TYPE :=0;* * V_CTD_ID MIGRACION2.MV_CTACTEDETALLE.CTD_ID%TYPE :=0;* * V_EST_ID MIGRACION2.MV_CTACTEESTADO.EST_ID%TYPE := 1;* * V_CCO_ID MIGRACION2.MV_CTACTESUSTENTO.CCO_ID%TYPE := 1 ;* * V_CST_ID MIGRACION2.MV_CTACTESUSTENTO.CST_ID%TYPE := 1 ;* * * * V_CTA_FECVEN MIGRACION2.MV_CTACTE.CTA_FECVEN%TYPE;* * V_FECPRORROGA MIGRACION2.MV_CTACTESUSTENTO.CCS_FECPRORROGA%TYPE;* * V_CODPREDIO MIGRACION2.MV_CTACTESUSTENTO.CODPREDIO%TYPE :=P_CODPREDIO;* * V_CONCODIGOP SMACONCEPTOD.CONCODIGOP%TYPE:=NULL; -- verifica si tiene concodigo padre IP, LP, PJ,SR* * V_CONCODIGOPP SMACONCEPTOD.CONCODIGOP%TYPE:=NULL; -- verifica si tiene concodigo abuelo Recojo, Recolecion* * V_CONCODIGOD SMACONCEPTOD.CONCODIGOD%TYPE; -- verifica si registra en detalle* * V_ESPCODIGO SMACONCEPTOD.ESPCODIGO%TYPE; -- indica obtener el espcodigo* * V_ESPCODIGOTIPO SMACONCEPTOD.ESPCODIGOTIPO%TYPE; -- indica que tipo de tributo es predial, arbitrios, multas* * V_FLAGPREDIO SMACONCEPTOD.FLAGPREDIO%TYPE;* * V_CTA_IDENTIF SMVCARGOCON.CTAORIGEN%TYPE;* * * * V_TIPOINSOLUTO NUMBER:=0;* * V_INSOLUTO NUMBER:=0;* * V_EMISION NUMBER:=0;* * V_CARGO NUMBER:=0;* * V_AUMENTO NUMBER:=0;* * V_DISMINUCION NUMBER:=0;* * V_PERIODO NUMBER:=0;* * V_CPERIODO SMAVENCUO.PERDEUD%TYPE; -- Periodo en caracter* * * * V_CCC_CARGO NUMBER:=0;* * V_CCC_EMISION NUMBER:=0;* * V_CCC_AUMENTO NUMBER:=0;* * V_CCC_DISMINUCION NUMBER:=0;* * V_CCS_CARGO NUMBER:=0;* * V_CCS_EMISION NUMBER:=0;* * V_CCS_AUMENTO NUMBER:=0;* * V_CCS_DISMINUCION NUMBER:=0;* * V_CTD_CARGO NUMBER:=0;* * V_CTD_EMISION NUMBER:=0;* * V_CTD_AUMENTO NUMBER:=0;* * V_CTD_DISMINUCION NUMBER:=0;* * * * V_MONBAR SMVPARARBMUN.MONBAR%TYPE; -- Monto del barrido* * V_MONRRS SMVPARARBMUN.MONRRS%TYPE; -- Monto de Residuos solidos* * V_MONLP SMVPARARBMUN.MONLP%TYPE;* * * * V_CCS_ID_RANGO_OUT VARCHAR2(300);* * V_CCS_ID_RANGO_IN VARCHAR2(300);* * V_CCS_ID_INI CHAR(2):='';* * V_CCS_ID_FIN CHAR(2):='';* * V_CCS_ID_POS NUMBER :=0;* * V_CCS_ID_D MIGRACION2.MV_CTACTESUSTENTO.CCS_ID%TYPE :=0;* * V_CCE_ITEM MIGRACION2.MV_CTACTEESTADO.CCE_ID%TYPE;* * * * V_FILAS NUMBER:=0;* * V_ELID NUMBER:=0;* * V_MENSAJE VARCHAR2(254);* * V_ERRORID NUMBER:=0;* * V_P_CURSOR CURSOR_REF;* * * * V_EXCEP_CONCODIGO EXCEPTION;* * V_EXCEP_CODCONTRI EXCEPTION;* * V_EXCEP_CODPREDIO EXCEPTION;* * V_EXCEP_CCC EXCEPTION;* * V_EXCEP_CTA EXCEPTION;* * V_EXCEP_CCS EXCEPTION;* * V_EXCEP_EST EXCEPTION;* * V_EXCEP_DET EXCEPTION;* * V_EXCEP_PARAM EXCEPTION;* -- *Atte. *Miguel Angel Marquina *rpc: **994608916* *nexteL:600 * 2100 **Email: *[email protected]
