Colompack

SE MODIFICO DOCUMENTO CERTIFICADO DE ESPECIFICACIONES, TANTO EN SU ESTRUCUTRA COMO EN LA PRESENTAICON DE LAS FIRMAS:

ESTE ES EL SCRIP GENERAL, EN DONSE DE CONTEMPLAN LOS DATOS DE LA CABECERA DEL DOCUMENTO, Y LAS FIRMAS

->FALTARIA AJUSTAR UN FORMATO O TABLA DE VERISON DE CAMBIO DE ESPECIFICAICONES

->LA PERIODICIDAD AL MOMENTO DE LA FECHA DE APROBACION 1 AÑOS DESPUES BY NO A 5 AÑOS COMO ESTA EN EL SISTEMA LINS IP6

SELECT DISTINCT

 NVL((SELECT TRAD.TRADUCIDO FROM IPTRADUCCION TRAD WHERE ESP.CODESPECIFICACION= TRAD.ORIGINAL AND ESP.CODCOMEN=TRAD.CODTRADUCCION AND TRAD.IDIOMA='ESP'),ESP.CODESPECIFICACION) CODESPECIFICACION,

 NVL((SELECT TRAD.TRADUCIDO FROM IPTRADUCCION TRAD WHERE ESP.DESESPECIFICACION= TRAD.ORIGINAL AND ESP.CODCOMEN=TRAD.CODTRADUCCION AND TRAD.IDIOMA='ESP'),ESP.DESESPECIFICACION) DESESPECIFICACION,

       ESP.NUMEDICION,

       ESP.VERSION,

       ESP.NUMREDUCIDA,

       NVL(TO_CHAR(TO_DATE(ESP.FECHAREVISION, 'J'), 'DD-MM-YY'),'SIN FECHA') FECHAREVISION,

 NVL((SELECT TRAD.TRADUCIDO FROM IPTRADUCCION TRAD WHERE STT.DESSTATUS= TRAD.ORIGINAL AND ESP.CODCOMEN=TRAD.CODTRADUCCION AND TRAD.IDIOMA='ESP'),STT.DESSTATUS) DESSTATUS,TO_CHAR(TO_DATE(FECHASYS, 'J'), 'DD-MM-YY') FECHAHOY,

 SUBSTR( HORASYS,1,5) HORA,NVL((SELECT

 Usr.Infocliextra

 FROM IPLESPFIRMA FIR, IPGRUPO GRP,IPLESPECIFICACION ESP, IPUSUARIO USR 

 WHERE FIR.CODESPECIFICACION =$P{CODESPECIFICACION} 

 AND FIR.VERSION =$P{VERSION}  

 AND FIR.CODOPE = GRP.CODGRUPO 

 AND FIR.CODESPECIFICACION=ESP.CODESPECIFICACION 

 AND FIR.VERSION=ESP.VERSION  

 AND USR.NOMBRE=FIR.NOMBRE

 AND GRP.DESGRUPO ='ANALISTAS'

 ),'SIN FIRMA')FIRMAA,NVL((SELECT

 NVL(TO_CHAR(TO_DATE(FIR.FECFIRMA, 'J'), 'DD-MM-YY'),'SIN FIRMA')FECFIRMAA  

 FROM IPLESPFIRMA FIR, IPGRUPO GRP,IPLESPECIFICACION ESP, IPUSUARIO USR 

 WHERE FIR.CODESPECIFICACION =$P{CODESPECIFICACION} 

 AND FIR.VERSION =$P{VERSION}  

 AND FIR.CODOPE = GRP.CODGRUPO 

 AND FIR.CODESPECIFICACION=ESP.CODESPECIFICACION 

 AND FIR.VERSION=ESP.VERSION  

 AND USR.NOMBRE=FIR.NOMBRE

 AND GRP.DESGRUPO ='ANALISTAS'),'SIN FECHA')FECFIRMAA,NVL((SELECT

 Usr.Infocliextra

 FROM IPLESPFIRMA FIR, IPGRUPO GRP,IPLESPECIFICACION ESP, IPUSUARIO USR 

 WHERE FIR.CODESPECIFICACION =$P{CODESPECIFICACION} 

 AND FIR.VERSION =$P{VERSION}  

 AND FIR.CODOPE = GRP.CODGRUPO 

 AND FIR.CODESPECIFICACION=ESP.CODESPECIFICACION 

 AND FIR.VERSION=ESP.VERSION  

 AND USR.NOMBRE=FIR.NOMBRE

 AND GRP.DESGRUPO ='COORDINACION'),'SIN FIRMA')FIRMAC,NVL((SELECT

 NVL(TO_CHAR(TO_DATE(FIR.FECFIRMA, 'J'), 'DD-MM-YY'),'SIN FIRMA')FECFIRMAC

 FROM IPLESPFIRMA FIR, IPGRUPO GRP,IPLESPECIFICACION ESP, IPUSUARIO USR 

 WHERE FIR.CODESPECIFICACION =$P{CODESPECIFICACION} 

 AND FIR.VERSION =$P{VERSION}  

 AND FIR.CODOPE = GRP.CODGRUPO 

 AND FIR.CODESPECIFICACION=ESP.CODESPECIFICACION 

 AND FIR.VERSION=ESP.VERSION  

 AND USR.NOMBRE=FIR.NOMBRE

 AND GRP.DESGRUPO ='COORDINACION'),'SIN FECHA')FECFIRMAC,

 (SELECT DISTINCT NVL(VALOR, '')VALOR FROM IPLESPTERMDATOSCOMPESP WHERE Codespecificacion=$P{CODESPECIFICACION} AND Version=$P{VERSION} and Descripcion='DATOS DE METODOLOGIA-ESP' and Propiedad='Especificación - Versión')DATCOMESPEVER

  FROM IPLESPECIFICACION ESP, IPSTATUS STT

 WHERE ESP.CODESPECIFICACION =$P{CODESPECIFICACION}

 AND ESP.VERSION =$P{VERSION}

 AND ESP.STATUS = STT.STATUS AND STT.TIPOSTATUS = 'ESP'

ESTOS SON LOS SCRIPT EJECUTADOS:

--- SCRIPT ACTUAL

SELECT DISTINCT

 NVL((SELECT TRAD.TRADUCIDO FROM IPTRADUCCION TRAD WHERE ESP.CODESPECIFICACION= TRAD.ORIGINAL AND ESP.CODCOMEN=TRAD.CODTRADUCCION AND TRAD.IDIOMA='ESP'),ESP.CODESPECIFICACION) CODESPECIFICACION,

 NVL((SELECT TRAD.TRADUCIDO FROM IPTRADUCCION TRAD WHERE ESP.DESESPECIFICACION= TRAD.ORIGINAL AND ESP.CODCOMEN=TRAD.CODTRADUCCION AND TRAD.IDIOMA='ESP'),ESP.DESESPECIFICACION) DESESPECIFICACION,

       ESP.NUMEDICION,

       ESP.VERSION,

       ESP.NUMREDUCIDA,

       NVL(TO_CHAR(TO_DATE(ESP.FECHAREVISION, 'J'), 'DD-MM-YY'),'SIN FECHA') FECHAREVISION,

 NVL((SELECT TRAD.TRADUCIDO FROM IPTRADUCCION TRAD WHERE STT.DESSTATUS= TRAD.ORIGINAL AND ESP.CODCOMEN=TRAD.CODTRADUCCION AND TRAD.IDIOMA='ESP'),STT.DESSTATUS) DESSTATUS,TO_CHAR(TO_DATE(FECHASYS, 'J'), 'DD-MM-YY') FECHAHOY,

 SUBSTR( HORASYS,1,5) HORA,(SELECT

 Usr.Infocliextra

 FROM IPLESPFIRMA FIR, IPGRUPO GRP,IPLESPECIFICACION ESP, IPUSUARIO USR 

 WHERE FIR.CODESPECIFICACION =:CODESPECIFICACION 

 AND FIR.VERSION =:VERSION  

 AND FIR.CODOPE = GRP.CODGRUPO 

 AND FIR.CODESPECIFICACION=ESP.CODESPECIFICACION 

 AND FIR.VERSION=ESP.VERSION  

 AND USR.NOMBRE=FIR.NOMBRE

 AND GRP.DESGRUPO ='ANALISTAS'

 )FIRMAA,(SELECT

 NVL(TO_CHAR(TO_DATE(FIR.FECFIRMA, 'J'), 'DD-MM-YY'),'SIN FIRMA')FECFIRMAA  

 FROM IPLESPFIRMA FIR, IPGRUPO GRP,IPLESPECIFICACION ESP, IPUSUARIO USR 

 WHERE FIR.CODESPECIFICACION =:CODESPECIFICACION 

 AND FIR.VERSION =:VERSION  

 AND FIR.CODOPE = GRP.CODGRUPO 

 AND FIR.CODESPECIFICACION=ESP.CODESPECIFICACION 

 AND FIR.VERSION=ESP.VERSION  

 AND USR.NOMBRE=FIR.NOMBRE

 AND GRP.DESGRUPO ='ANALISTAS')FECFIRMAA,(SELECT

 Usr.Infocliextra

 FROM IPLESPFIRMA FIR, IPGRUPO GRP,IPLESPECIFICACION ESP, IPUSUARIO USR 

 WHERE FIR.CODESPECIFICACION =:CODESPECIFICACION 

 AND FIR.VERSION =:VERSION  

 AND FIR.CODOPE = GRP.CODGRUPO 

 AND FIR.CODESPECIFICACION=ESP.CODESPECIFICACION 

 AND FIR.VERSION=ESP.VERSION  

 AND USR.NOMBRE=FIR.NOMBRE

 AND GRP.DESGRUPO ='COORDINACION')FIRMAC,(SELECT

 NVL(TO_CHAR(TO_DATE(FIR.FECFIRMA, 'J'), 'DD-MM-YY'),'SIN FIRMA')FECFIRMAC

 FROM IPLESPFIRMA FIR, IPGRUPO GRP,IPLESPECIFICACION ESP, IPUSUARIO USR 

 WHERE FIR.CODESPECIFICACION =:CODESPECIFICACION 

 AND FIR.VERSION =:VERSION  

 AND FIR.CODOPE = GRP.CODGRUPO 

 AND FIR.CODESPECIFICACION=ESP.CODESPECIFICACION 

 AND FIR.VERSION=ESP.VERSION  

 AND USR.NOMBRE=FIR.NOMBRE

 AND GRP.DESGRUPO ='COORDINACION')FECFIRMAC,

 (SELECT DISTINCT NVL(VALOR, '')VALOR FROM IPLESPTERMDATOSCOMPESP WHERE Codespecificacion=:CODESPECIFICACION AND Version=:VERSION and Descripcion='DATOS DE METODOLOGIA-ESP' and Propiedad='Especificación - Versión')DATCOMESPEVER

  FROM IPLESPECIFICACION ESP, IPSTATUS STT

 WHERE ESP.CODESPECIFICACION =:CODESPECIFICACION

 AND ESP.VERSION =:VERSION

 AND ESP.STATUS = STT.STATUS AND STT.TIPOSTATUS = 'ESP';

 SELECT

 NVL((SELECT TRAD.TRADUCIDO FROM IPTRADUCCION TRAD WHERE GRP.DESGRUPO= TRAD.ORIGINAL AND ESP.CODCOMEN=TRAD.CODTRADUCCION AND TRAD.IDIOMA='EN'),GRP.DESGRUPO) DESGRUPO,

 FIR.NOMBRE, 

 USR.APELLIDO1, 

 USR.APELLIDO2, 

 FIRMADO,Usr.Infocliextra,

 NVL(TO_CHAR(TO_DATE(FIR.FECFIRMA, 'J'), 'DD-MM-YY'),'SIN FIRMA')FECFIRMA  

 FROM IPLESPFIRMA FIR, IPGRUPO GRP,IPLESPECIFICACION ESP, IPUSUARIO USR 

 WHERE FIR.CODESPECIFICACION =:CODESPECIFICACION 

 AND FIR.VERSION =:VERSION  

 AND FIR.CODOPE = GRP.CODGRUPO 

 AND FIR.CODESPECIFICACION=ESP.CODESPECIFICACION 

 AND FIR.VERSION=ESP.VERSION  

 AND USR.NOMBRE=FIR.NOMBRE 

 ORDER BY ORDENFIRMA;

 --===== FIRMA ANALISTA 

SELECT

 Usr.Infocliextra

 FROM IPLESPFIRMA FIR, IPGRUPO GRP,IPLESPECIFICACION ESP, IPUSUARIO USR 

 WHERE FIR.CODESPECIFICACION =:CODESPECIFICACION 

 AND FIR.VERSION =:VERSION  

 AND FIR.CODOPE = GRP.CODGRUPO 

 AND FIR.CODESPECIFICACION=ESP.CODESPECIFICACION 

 AND FIR.VERSION=ESP.VERSION  

 AND USR.NOMBRE=FIR.NOMBRE

 AND GRP.DESGRUPO ='ANALISTAS'

 ORDER BY ORDENFIRMA;

--=== FECHA FIRMA ANALISTA

SELECT

 NVL(TO_CHAR(TO_DATE(FIR.FECFIRMA, 'J'), 'DD-MM-YY'),'SIN FIRMA')FECFIRMAA  

 FROM IPLESPFIRMA FIR, IPGRUPO GRP,IPLESPECIFICACION ESP, IPUSUARIO USR 

 WHERE FIR.CODESPECIFICACION =:CODESPECIFICACION 

 AND FIR.VERSION =:VERSION  

 AND FIR.CODOPE = GRP.CODGRUPO 

 AND FIR.CODESPECIFICACION=ESP.CODESPECIFICACION 

 AND FIR.VERSION=ESP.VERSION  

 AND USR.NOMBRE=FIR.NOMBRE

 AND GRP.DESGRUPO ='ANALISTAS'

 ORDER BY ORDENFIRMA;

 --===== FIRMA COORDINACION

SELECT

 Usr.Infocliextra

 FROM IPLESPFIRMA FIR, IPGRUPO GRP,IPLESPECIFICACION ESP, IPUSUARIO USR 

 WHERE FIR.CODESPECIFICACION =:CODESPECIFICACION 

 AND FIR.VERSION =:VERSION  

 AND FIR.CODOPE = GRP.CODGRUPO 

 AND FIR.CODESPECIFICACION=ESP.CODESPECIFICACION 

 AND FIR.VERSION=ESP.VERSION  

 AND USR.NOMBRE=FIR.NOMBRE

 AND GRP.DESGRUPO ='COORDINACION'

 ORDER BY ORDENFIRMA;

--========== FECHA FIRMA COORDINACION

SELECT

 NVL(TO_CHAR(TO_DATE(FIR.FECFIRMA, 'J'), 'DD-MM-YY'),'SIN FIRMA')FECFIRMAC  

 FROM IPLESPFIRMA FIR, IPGRUPO GRP,IPLESPECIFICACION ESP, IPUSUARIO USR 

 WHERE FIR.CODESPECIFICACION =:CODESPECIFICACION 

 AND FIR.VERSION =:VERSION  

 AND FIR.CODOPE = GRP.CODGRUPO 

 AND FIR.CODESPECIFICACION=ESP.CODESPECIFICACION 

 AND FIR.VERSION=ESP.VERSION  

 AND USR.NOMBRE=FIR.NOMBRE

 AND GRP.DESGRUPO ='COORDINACION'

 ORDER BY ORDENFIRMA;

---SCRIPT DE DATOS COMPLEMENTAIROS:

SELECT DISTINCT NVL(VALOR, '')VALOR FROM IPLESPTERMDATOSCOMPESP WHERE Codespecificacion=:CODESPECIFICACION AND Version=:VERSION and Descripcion='DATOS DE METODOLOGIA-ESP' and Propiedad='Especificación - Versión';