CREATE OR REPLACE PACKAGE NAF47.PKG_FACT_NAF AS /****************************************************************************** NAME: PKG_FACT_NAF PURPOSE: REVISIONS: Ver Date Author Description --------- ---------- --------------- ------------------------------------ 1.0 25/05/2016 Edgar Ajanel 1. Created this package. ******************************************************************************/ FUNCTION ULTIMO_TIPOCAMBIO(Pmoneda varchar2) RETURN NUMBER; FUNCTION Existe_Cliente_Activo(pNO_CIA IN NUMBER, pNO_CLIENTE IN NUMBER) RETURN NUMBER; FUNCTION Existe_Cliente(pNO_CIA IN NUMBER, pNO_CLIENTE IN VARCHAR2, pNit VARCHAR2, pNOMBRE VARCHAR2) RETURN BOOLEAN; FUNCTION DIFERENCIAL(pcia number,pcliente number,pInstalacion number,pnotransaccion number,pValorAct number,pCodMoneda VARCHAR2) RETURN NUMBER; FUNCTION EXISTE_ENLACE_ACTIVO(pCODEMPRESA NUMBER, pCODCLIENTE NUMBER, pINSTALACION NUMBER, pNOTRANSACCION NUMBER, pCODTRANSACCION varchar2, pGrupo_fac in out number, pProducto in out number) RETURN BOOLEAN; FUNCTION SIGUENTE_CORRELATIVO(PCIA NUMBER,popcion VARCHAR2) RETURN NUMBER; PROCEDURE CREAR_CLIENTE(pNO_CIA IN VARCHAR2, pCOD_CLIENTE_SIEBEL IN VARCHAR2, pGRUPO IN VARCHAR2, pTIPO_CLIENTE IN VARCHAR2, pNOMBRE IN VARCHAR2, pNOMBRE_COMERCIAL IN VARCHAR2, pDIRECCION IN VARCHAR2, pFecha_Ingre IN DATE, pExcento_Imp IN VARCHAR2, pMONEDA_LIMITE IN VARCHAR2, pTELEFONO IN VARCHAR2, pPLAZO IN Number, pCedula IN VARCHAR2, pCLIENTE_NACIONAL IN VARCHAR2, pIND_ACEPTA_RETENCION IN VARCHAR2, pEXENTO_IVA IN VARCHAR2, pTipoPrecio IN VARCHAR2, pCentro varchar2, pBALANCEFACTURA VARCHAR2, pNOMBRE_FISCAL VARCHAR2, PDIRECCION_FACTURA VARCHAR2, pFac_ANTICIPADO VARCHAR2, pCOD_CLIENTE_NAF IN OUT NUMBER, id_resultado IN OUT NUMBER, Desc_resultado IN OUT VARCHAR2); PROCEDURE ASIGNAR_GRUPOFAC(pcia number, pcliente number, pUSUARIO_INGRESO VARCHAR2, pNOMBRE_FISCAL VARCHAR2, PDIRECCION_FACTURA VARCHAR2); PROCEDURE ACTUALIZAR_CLIENTE(pNO_CIA IN VARCHAR2, pCOD_CLIENTE IN VARCHAR2, pNOMBRE IN VARCHAR2, pNOMBRE_COMERCIAL IN VARCHAR2, pDIRECCION IN VARCHAR2, pExcento_Imp IN VARCHAR2, pMONEDA_LIMITE IN VARCHAR2, pTELEFONO IN VARCHAR2, pPLAZO IN Number, pCedula IN VARCHAR2, pCLIENTE_NACIONAL IN VARCHAR2, pIND_ACEPTA_RETENCION IN VARCHAR2, pEXENTO_IVA IN VARCHAR2, pNOMBRE_FISCAL VARCHAR2, PDIRECCION_FACTURA VARCHAR2, pFac_ANTICIPADO VARCHAR2, id_resultado IN OUT NUMBER, Desc_resultado IN OUT VARCHAR2); PROCEDURE BAJA_CLIENTE(pNO_CIA IN VARCHAR2, pNO_CLIENTE IN VARCHAR2, pFECHA_BAJA date, pMOTIVO VARCHAR2, id_resultado IN OUT NUMBER, Desc_resultado IN OUT VARCHAR2); FUNCTION OBTENER_CODANCHOBANDA(pCODEMPRESA NUMBER, pCODPRODUCTO VARCHAR2, pANCHO_BANDA VARCHAR2) return varchar2; PROCEDURE REGISTRO_DE_TRANSACCION(pCODEMPRESA NUMBER, pCODCLIENTE NUMBER, pCONTRATO NUMBER, pANEXO NUMBER, pINSTALACION_SIEBEL VARCHAR2, pNOTRANSACCION_SIEBEL VARCHAR2, pTIPOSERVICIO VARCHAR2, pCODTRANSACCION VARCHAR2, pCODMONEDA VARCHAR2, pDESCRIPCION VARCHAR2, pCANTIDAD NUMBER, pVINSTALACION NUMBER, pVMENSUAL NUMBER, pFECHA DATE, pProducto Varchar2, pPROXIMAFACTURA DATE, pUSUARIO_INGRESO VARCHAR2, pFECHA_INGRESO DATE, pCODPRODUCTO VARCHAR2, pCODANCHOBANDA VARCHAR2, pCENTRO VARCHAR2, pBODEGA VARCHAR2, pANCHO_BANDA VARCHAR2, pGEOGRAFIA_VENTA VARCHAR2, pGEOGRAFIA_PUNTO_INI VARCHAR2, pGEOGRAFIA_PUNTO_FIN VARCHAR2, pACTIVO VARCHAR2, pPUNTO_INICIO VARCHAR2, pPUNTO_FINAL VARCHAR2, pPAIS_INICIAL VARCHAR2, pPAIS_FINAL VARCHAR2, pPERIODO_INICIO NUMBER, pSPLIT VARCHAR2, -- P=padre, H=hijo, N= no aplica pINSTALACION_PADRE IN NUMBER, -- Numero de instalacion del padre cuando es split pNOTRANSACCION_PADRE IN NUMBER, --Numero de transaccion del padre cuando es split pCODEMPRESA_PADRE NUMBER, -- Codigo de empresa del padre cuand es split pCODCLIENTE_PADRE NUMBER, -- Codigo del cliente padre cuando es split pCODEMPRESA_NUEVA NUMBER, -- Nueva Empresa para la transaccion de cambio de cliente 'CC=cambio de cliente a enlace' pCODCLIENTE_NUEVO NUMBER, -- Nuevo cliente para la transaccion de cambio de cliente 'CC=cambio de cliente a enlace' pINSTALACION_NAF IN OUT NUMBER, pNOTRANSACCION_NAF IN OUT NUMBER, pId_BUNDLE VARCHAR2, pAplicaDesc varchar2, id_resultado IN OUT NUMBER, Desc_resultado IN OUT VARCHAR2, pFecha_ini_fac in out date, pIdSolucion Varchar2 Default Null); PROCEDURE BAJA_DE_ENLACE(pCODEMPRESA NUMBER, pCODCLIENTE NUMBER, pINSTALACION NUMBER, pNOTRANSACCION NUMBER, pTIPOSERVICIO VARCHAR2, pCODTRANSACCION VARCHAR2, pFECHA_BAJA DATE, pMOTIVO_BAJA VARCHAR2, pENCARGADO_BAJA VARCHAR2, id_resultado IN OUT NUMBER, Desc_resultado IN OUT VARCHAR2); FUNCTION VALIDAR_ENLACE(pCODEMPRESA NUMBER, pCODCLIENTE NUMBER, pINSTALACION NUMBER, pNOTRANSACCION NUMBER, pTIPOSERVICIO VARCHAR2, pTIPO_VALIDACION NUMBER -- 1=validar meses facturado; 2=facturas pendientes de pago ) RETURN NUMBER; PROCEDURE INFO_FACTURACION(pCODEMPRESA NUMBER, -- Codigo de la empresa pCODCLIENTE NUMBER, -- Codigo del cliente pINSTALACION NUMBER, -- Codigo del enlace pNOTRANSACCION NUMBER, -- Numero de la orden de trabajo de la instalacion del enlace pPROXIMAFACTURA IN OUT DATE, --Fecha de proxima factura en NAF pVMENSUAL IN OUT NUMBER, --Valor recurrente del enlace id_resultado IN OUT NUMBER, -- codigo del resultado de la consultado Desc_resultado IN OUT VARCHAR2 -- Descripcion del resultado de la consulta ); FUNCTION VALIDA_EXENTO_IMP(pCODEMPRESA NUMBER, pCODCLIENTE NUMBER, PCLAVE VARCHAR2, --IV=Iva Venta , IC=Iva Compra PMONTO NUMBER ) RETURN NUMBER; FUNCTION VALIDA_DIAS_GRACIA( pcia number, pfecha_ini date, pDias_Gracia NUMBER ) RETURN DATE; FUNCTION GET_MSG_DESCRIPTION(ID_RESULTADO IN NUMBER) RETURN VARCHAR2; FUNCTION VERIFICA_DET_ERROR(pCODEMPRESA NUMBER, pCODCLIENTE NUMBER, pINSTALACION NUMBER, pNOTRANSACCION NUMBER, pCODTRANSACCION varchar2, pFECHA_BAJA DATE, Desc_resultado IN OUT VARCHAR2) RETURN NUMBER; END; -- PKG_FACT_NAF; /