SE REALIZÓ SCRIPT PARA PODER FILTRAR QC EN LA PANTALLA DE MANT DE ORDENES DE TEST


ESTOS SON TRES VERSIONES:


SELECT PET.CODPETICION CODPETICION, Pet.Tipordfab TIPORDFAB, BULTO.BULTO QC, PET.ORDENORI ORDENORI, ORIGEN.DESCLI DESORIGEN, PET.SWTPLANIFICACION SWTPLANIFICACION, to_char(to_date(PET.FECDISTRIBU, 'J'), 'dd-mm-yy') FECDISTRIBU, PET.CODCLASEFAMILIA TIPOESPECIFICACION, PET.CODESPECIFICACION CODESPECIFICACION, ESPE.DESESPECIFICACION DESCRIPCIONESP, PET.VERSION VERSION, ESPE.COMPLETA COMPLETA, ESPE.NUMREDUCIDA NUMREDUCIDA, PET.CODESPECIFICACION CODART,

       PET.CODLOTFAB CODLOTFAB, PET.STATUS ESTADO, COUNT(ENS.CODPETICION) ENSAYOS, (SELECT COUNT(CODPETICION) FROM IPLPETMUEENSAYO WHERE Codpeticion=PET.CODPETICION AND CODOPEFIRMA IS NOT NULL )FINLAIZADOS, PET.DIAGNOSTICO DIAGNOSTICO, '' NODIST

       FROM IPLPETICION PET 

       INNER JOIN IPLPETBULTOSMUE BULTO ON PET.CODPETICION=BULTO.CODPETICION

       INNER JOIN IPDIRECCIONES ORIGEN ON PET.CODORIGEN=ORIGEN.CODCLI

       INNER JOIN IPLESPECIFICACION ESPE ON ESPE.CODESPECIFICACION=PET.CODESPECIFICACION AND ESPE.VERSION=PET.VERSION

       INNER JOIN IPLPETMUEENSAYO ENS ON ENS.CODPETICION=PET.CODPETICION

       WHERE PET.STATUS NOT IN(400, 13000) AND Pet.Tipordfab IN('LIMS','CAL')

       GROUP BY PET.CODPETICION,Pet.Tipordfab,BULTO.BULTO,PET.ORDENORI,PET.SWTPLANIFICACION, ORIGEN.DESCLI,PET.FECDISTRIBU,PET.CODCLASEFAMILIA,ESPE.DESESPECIFICACION,PET.VERSION,ESPE.COMPLETA,ESPE.NUMREDUCIDA,PET.CODESPECIFICACION,PET.CODLOTFAB,PET.DIAGNOSTICO,PET.STATUS,pet.horamodif

       ORDER BY  Pet.Fecdistribu desc, pet.codpeticion desc;

       

       

SELECT PET.CODPETICION CODPETICION, Pet.Tipordfab TIPORDFAB, BULTO.BULTO QC, PET.ORDENORI ORDENORI, ORIGEN.DESCLI DESORIGEN, PET.SWTPLANIFICACION SWTPLANIFICACION, PET.FECDISTRIBU FECDISTRIBU, PET.CODCLASEFAMILIA TIPOESPECIFICACION, PET.CODESPECIFICACION CODESPECIFICACION, ESPE.DESESPECIFICACION DESCRIPCIONESP, PET.VERSION VERSION, ESPE.COMPLETA COMPLETA,

          ESPE.NUMREDUCIDA NUMREDUCIDA, PET.CODESPECIFICACION CODART,PET.CODLOTFAB CODLOTFAB, PET.STATUS ESTADO, COUNT(ENS.CODPETICION) ENSAYOS,

          (SELECT COUNT(CODPETICION) FROM IPLPETMUEENSAYO WHERE Codpeticion=PET.CODPETICION AND CODOPEFIRMA IS NOT NULL )FINLAIZADOS, PET.DIAGNOSTICO DIAGNOSTICO

       FROM IPLPETMUEENSAYO ENS, IPLPETICION PET , IPLPETBULTOSMUE BULTO, IPDIRECCIONES ORIGEN, IPLESPECIFICACION ESPE 

       WHERE PET.STATUS NOT IN(400, 13000) AND PET.CODPETICION=BULTO.CODPETICION

       AND PET.CODORIGEN=ORIGEN.CODCLI

       AND ESPE.CODESPECIFICACION=PET.CODESPECIFICACION AND ESPE.VERSION=PET.VERSION

       AND ENS.CODPETICION=PET.CODPETICION

       AND (:CODPETICION IS NULL OR PET.CODPETICION LIKE :CODPETICION)

       GROUP BY PET.CODPETICION,Pet.Tipordfab,BULTO.BULTO,PET.ORDENORI,PET.SWTPLANIFICACION, ORIGEN.DESCLI,PET.FECDISTRIBU,PET.CODCLASEFAMILIA,ESPE.DESESPECIFICACION,PET.VERSION,ESPE.COMPLETA,ESPE.NUMREDUCIDA,PET.CODESPECIFICACION,PET.CODLOTFAB,PET.DIAGNOSTICO,PET.STATUS,pet.horamodif

       ORDER BY  Pet.Fecdistribu desc, pet.codpeticion desc; 

       

SELECT PET.CODPETICION CODPETICION, Pet.Tipordfab TIPORDFAB, BULTO.BULTO QC, PET.ORDENORI ORDENORI, ORIGEN.DESCLI DESORIGEN, PET.SWTPLANIFICACION SWTPLANIFICACION, PET.FECDISTRIBU FECDISTRIBU, PET.CODCLASEFAMILIA TIPOESPECIFICACION, PET.CODESPECIFICACION CODESPECIFICACION, ESPE.DESESPECIFICACION DESCRIPCIONESP, PET.VERSION VERSION, ESPE.COMPLETA COMPLETA, ESPE.NUMREDUCIDA NUMREDUCIDA, PET.CODESPECIFICACION CODART,PET.CODLOTFAB CODLOTFAB, PET.STATUS ESTADO, COUNT(ENS.CODPETICION) ENSAYOS,          (SELECT COUNT(CODPETICION) FROM IPLPETMUEENSAYO WHERE Codpeticion=PET.CODPETICION AND CODOPEFIRMA IS NOT NULL )FINLAIZADOS, PET.DIAGNOSTICO DIAGNOSTICO       FROM IPLPETICION PET , IPLPETBULTOSMUE BULTO, IPDIRECCIONES ORIGEN, IPLESPECIFICACION ESPE, IPLPETMUEENSAYO ENS  WHERE PET.STATUS NOT IN(400, 13000) AND PET.CODPETICION=BULTO.CODPETICION AND PET.CODORIGEN=ORIGEN.CODCLI AND ESPE.CODESPECIFICACION=PET.CODESPECIFICACION AND ESPE.VERSION=PET.VERSION AND ENS.CODPETICION=PET.CODPETICION       AND (:CODPETICION IS NULL OR PET.CODPETICION LIKE :CODPETICION) GROUP BY PET.CODPETICION,Pet.Tipordfab,BULTO.BULTO,PET.ORDENORI,PET.SWTPLANIFICACION, ORIGEN.DESCLI,PET.FECDISTRIBU,PET.CODCLASEFAMILIA,ESPE.DESESPECIFICACION,PET.VERSION,ESPE.COMPLETA,ESPE.NUMREDUCIDA,PET.CODESPECIFICACION,PET.CODLOTFAB,PET.DIAGNOSTICO,PET.STATUS,pet.horamodifORDERBY=Pet.Fecdistribu desc, pet.codpeticion desc;