Scripts Select Unilab

Quando clientes pedirem relatórios específicos e for desenvolvido um sql para ele, vcs podem armazenar aqui para utilização futura. Colocar apenas Select! O Gerente do Suporte deverá ser comunicado toda vez que incluírem um select aqui ou forem rodar em algum cliente.

Exame com Equipamentos

SELECT CCODIEXAM, EX.CNOMEEXAM,  EX.CCODIEQUI, CNOMEEQUI FROM 
LB_EXAM EX
  JOIN lb_equi EQ
    ON EX.CCODIEQUI = EQ.CCODIEQUI
where EX.ccodiequi is not null AND EX.ccodiequi <> '';

Clientes ativos DC

SELECT CCODICLIE, CEMAICLIE, CSISTCLIE FROM un_clie WHERE NVALOEQUICLIE <> 0 AND CSISTCLIE = 'LABWIN' ;

Ver imagens dos pacientes a serem transmitidas para o posto

select * from lb_imagens
 where ccentraltran > (select cvalocosi from lb_cosi
  where ccodicosi = 'CCENTRALTRAN01');

Relatório de comparação de tabela de CH

SELECT EXAM.CCODIEXAM CODIGO,
        EXAM.CNOMEEXAM EXAME,
        TABE.CCODITABE,
        TABE.CNOMETABE,
        TAEX.CEFETTAEX EFETUA,
        TAEX.NINDICEPORTE INDICE,
        TAEX.CCODIPORTE PORTE,
        TAEX.NVALOPORTE VALOR_PORTE,
        TAEX.NCH__TAEX VALOR_DE_CH,
        TAEX.NFILMETAEX FILME,
        TAEX.CCEXATAEX CODIGO
        LABO.CNOMELABO APOIO
   FROM LB_TABE TABE
   JOIN LB_TAEX TAEX
     ON TAEX.CCODITABE = TABE.CCODITABE
   JOIN LB_EXAM EXAM
     ON EXAM.CCODIEXAM = TAEX.CCODIEXAM
   LEFT JOIN LB_LABO LABO
     ON EXAM.CCODILABO = LABO.CCODILABO
  WHERE TABE.CCODITABE IN ('COD_TABELA1', 'COD_TABELA2')
        AND EXAM.CPRONTOEXAM = 'S'
  ORDER BY EXAM.CCODIEXAM,
        IF(TABE.CCODITABE ='COD_TABELA1', 0, 1)

Relatório Exames com Erro Unimed

SELECT CONCAT(PD.CCODIPEDI, PD.CCODIPOST) PEDIDO,
        PD.DENTRPEDI DATA_ENTRADA,
        PD.CHRENPEDI HORA_ENTRADA,
        CASE WHEN PD.CCODIPACI IN ('APOIOF',
                                   'APOIOM',
                                   'APOIOI')
   THEN PD.CNOMEPACIAPOIOPEDI                  
   ELSE PC.CNOMEPACI                           
        END PACIENTE,
        UWS.CDESCERROUNIMEDWS ERRO,
        EX.CCODIEXAM MNEMONICO,
        EX.CNOMEEXAM EXAME,
        CV.CCODICONV CODIGO_CONVENIO,
        CV.CNOMECONV NOME_CONVENIO
   FROM LB_UNIMEDWS UWS
   JOIN LB_EXPR PR
     ON PR.CCODIPOST = UWS.CCODIPOST           
    AND PR.CCODIEXPR = UWS.CCODIEXPR
   JOIN LB_PEDI PD                             
     ON PD.CCODIPOST = PR.CCODIPOST            
    AND PD.CCODIPEDI = PR.CCODIPEDI            
   JOIN LB_PACI PC                             
     ON PC.CCODIPOST = PD.CCODIPOSTPACI        
    AND PC.CCODIPACI = PD.CCODIPACI            
   JOIN LB_EXAM EX                             
     ON EX.CCODIEXAM = PR.CCODIEXAM            
   JOIN LB_CONV CV                             
     ON CV.CCODICONV = PD.CCODICONV
  WHERE TIMESTAMP(CONCAT(
        DATE(PD.DENTRPEDI),' ',PD.CHRENPEDI))
BETWEEN '2010-01-01 00:00:00' AND '2018-01-01 00:00:00'
    AND ESTATUSUNIMEDWS = 'E'
  ORDER BY PD.DENTRPEDI,
           PD.CHRENPEDI,
           PD.CCODIPOST,
           PD.CCODIPEDI;

Relatório clientes que usam lab de apoio

SELECT CCODIADM_CLIENTE, CNOME_RECURSO FROM uw_cli_recursos CLRE
JOIN uw_recursos RE
  ON CLRE.NID_RECURSO = RE.NID_RECURSO
WHERE RE.nid_recurso = 101

Ver a versão do Pardini utilizada

select *
 from lb_configsistrans
 where ccodiconfigsistrans = 'VERSAOHPIMPORTADA';

Duplicate Entry SMS

SELECT 1                     
  FROM LB_SMS                
 WHERE CCODISMS = ''1''      
   AND CCODIPOST = :CCODIPOST
 
SELECT MAX(CAST(CCODISMS AS UNSIGNED)) + 1 QTD 
  FROM LB_SMS                                  
 WHERE CCODIPOST = :CCODIPOST                
 
UPDATE LB_SMS                 
   SET CCODISMS = :CCODISMS   
 WHERE CCODISMS = ''1''       
   AND CCODIPOST = :CCODIPOST

Versão Unilab host

SELECT * FROM LB_COSI WHERE CCODICOSI = 'VERSAOUNILABHOST'

Desativar Importação automática Pardini

UPDATE LB_COSI SET CVALOCOSI = 'N'
WHERE CCODICOSI = 'APOATIVOIMPHP'

Erro Código Agrupamento Amostra - U2U

ALTER TABLE u2u_exam
 MODIFY CAGRUPAMOSTRAUEXAM VARCHAR(9)

Troca sequencia do Convênio

UPDATE ulibseq SET NINC = '1', NPROX = '300'
where cseq like '%lb_conv%'

RELATÓRIO POR BAIRRO (Nome do paciente, telefone, bairro)

SELECT cnomepaci Paciente,
cfonepaci Telefone,
ccelupaci Celular,
cotelpaci Outros_Telefones,
cbairpaci Bairro
FROM lb_paci
WHERE cbairpaci = ("NOME_BAIRRO")

RELATÓRIO POR CIDADE(Nome da Cidade, Data da impressão)

SELECT MU.CNOMEMUNI AS Municipio,
       COUNT(PR.CHRIMPREXPR) AS Impressoes
  FROM LB_EXPR PR
  JOIN LB_PEDI PE
    ON PR.CCODIPEDI = PE.CCODIPEDI
  JOIN LB_PACI PA
    ON PE.CCODIPACI = PA.CCODIPACI
  JOIN LB_MUNI MU
    ON PA.CCODIMUNI = MU.CCODIMUNI
 WHERE PR.DIMPREXPR IS NOT NULL AND
       PE.DENTRPEDI IN ('DATA_INICIAL', 'DATA_FINAL')
 GROUP BY MU.CCODIMUNI

Ver qntd Numero Amostra

SELECT MAX(CNUMAMOSTRAEXPR) MAIOR_AMOSTRA
  FROM LB_EXPR
 WHERE CPILABOEXPR = '7';

Relatório E-mail Paciente

SELECT CONCAT(CCODIPOST,CCODIPACI) AS Codigo,
       CNOMEPACI AS Paciente,
       CEMAILPACI AS Email
FROM LB_PACI
WHERE CEMAILPACI IS NOT NULL AND CEMAILPACI <>

Relatório de Estatísticas de Convênios/Pacientes/Exames

SELECT STRAIGHT_JOIN LB_PEDI.CCODICONV, LB_EXPR.CCODIEXAM,
       COUNT(LB_EXPR.CCODIEXAM) AS QTD, 0 AS NCH__EXPF,
       0 AS NVALOEXPF, LB_CONV.CNOMECONV,                  
       LB_EXAM.CNOMEEXAM, LB_TAEX.CCEXATAEX                
  FROM LB_PEDI                                             
  JOIN LB_CONV
    ON (LB_CONV.CCODICONV = LB_PEDI.CCODICONV)             
  JOIN LB_EXPE                                             
    ON (LB_PEDI.CCODIPEDI = LB_EXPE.CCODIPEDI              
   AND  LB_PEDI.CCODIPOST = LB_EXPE.CCODIPOST)             
  JOIN LB_EXPR
    ON (LB_EXPE.CCODIEXPE = LB_EXPR.CCODIEXPE              
   AND  LB_EXPE.CCODIPOST = LB_EXPR.CCODIPOST)             
   AND LB_EXPR.EORIGINALEXPR <> 'A'
  JOIN LB_EXAM
    ON (LB_EXAM.CCODIEXAM = LB_EXPR.CCODIEXAM)
  LEFT JOIN LB_TAEX
    ON (LB_TAEX.CCODIEXAM = LB_EXPR.CCODIEXAM
   AND  LB_TAEX.CCODITABE = LB_CONV.CCODITABE)
WHERE LB_PEDI.DENTRPEDI BETWEEN '2016-01-01' AND '2016-01-05' AND LB_PEDI.CCODIPOST IN ('01')
  GROUP BY LB_PEDI.CCODICONV, LB_EXPR.CCODIEXAM
  ORDER BY LB_PEDI.CCODICONV, LB_EXAM.CNOMEEXAM