|Tabela Personal Med|Conteúdo| | ------ | ------ | |Clini01/02 (dentro do arquivo mdf)|Dados de cadastro dos Clientes da Clínica| |Clini06|Prescrições de Receitas, Textos diversos e Solicitação de exames| |CO12_1|Checar, pois há clientes que salvam dados de consulta aqui| |Me|Checar, pois há clientes que salvam dados de consulta aqui| |Clini04|Foto dos pacientes| |CO28|Evolução dos Pacientes (Dados dos diversos atendimentos realizados para cada paciente)| |AGE04/03|Agendamentos – (Existem muitos agendamentos futuros)| |CO12_2|Diagnóstico – Registro da patologia dos pacientes de acordo com a data de atendimento| |Clini08+LabExam+Labs|Resultado de Exames laboratoriais dos pacientes por data de realização| |Clini05+Carrier+Fin51|Convênio dos Pacientes e nº de registro no convênio| |CO43|Cirurgias| |TISS001/002+CO63 e outras tabelas mais.....|Guias TISS emitidas por paciente (VER TODO O CONJUNTO DE TABELAS TISS + “PASTA XMLTISS, DENTRO DO DIRETÓRIO PERSONAL MED”, ONDE ESTÃO ARMAZENADOS OS ARQUIVOS XML ENVIADOS PARA OS CONVÊNIOS. VER TAMBÉM O CONJUNTO DE TABELAS “SYS....” ONDE EXISTEM OUTRAS CONFIGURAÇÕES DA TISS| ```SQL /************************************************************************ * CADASTRO DE PACIENTES * ************************************************************************/ DISABLE TRIGGER Medsync_Clientes ON SWClientes INSERT INTO swclientes(Código, Nome, Endereço, Bairro, Cidade, CEP, Estado, [Data de Nascimento], [Telefone 1], [Telefone 2], [Telefone 3], [E-Mail], Sexo, [Estado Civil], CNS, CPF, Responsavel, Pai, Apagado, RG) SELECT PCod, SUBSTRING(Name, 1, 70), SUBSTRING([Address], 1, 255), SUBSTRING(District, 1, 70), SUBSTRING(City, 1, 70), SUBSTRING(Zip, 1, 9), [State], BirthDate, SUBSTRING(Phone, 1, 14), SUBSTRING(FAX, 1, 14), SUBSTRING(Cellular, 1, 14), EMail, Sex, CivilStatus, CNS, Clini_01_CPF, Mother, Father, 0, ID FROM PersonalMed_GCS.dbo.Clini_01 WHERE ATIVO = 'T' ENABLE TRIGGER Medsync_Clientes ON SWClientes /************************************************************************ * AJUSTE PRÓXIMO CÓDIGO DE CLIENTE * ************************************************************************/ SELECT MAX(Código) from swclientes INSERT INTO sgcfind (Tipo, Código, Descrição) VALUES(3, 39148131, 'Próximo código de cliente') /************************************************************************ * PRESCRIÇÕES/ROTINAS/LAUDOS/TEXTOS PADRÕES * ************************************************************************/ INSERT INTO swconsim ([Código da Consulta], Descrição, Tipo, Texto, [Código do Usuário]) SELECT PCOD, DATEINSERT, CASE WHEN MODELTYPE = 3 THEN 'R' WHEN MODELTYPE = 1 THEN 'I' ELSE 'T' END, CONTENTS, 1 FROM PersonalMed_GCS.dbo.CLINI_06 UPDATE swconsim SET Descrição = SUBSTRING(Descrição, 1, 5) + '0' + SUBSTRING(Descrição, 6, 4) WHERE SUBSTRING(Descrição, 7, 1) = '/' UPDATE swconsim SET Descrição = SUBSTRING(Descrição, 1, 8) + '0' + SUBSTRING(Descrição, 9, 1) + ' 00:00:00' WHERE CONVERT(INTEGER, SUBSTRING(Descrição, 9, 2)) < 10 UPDATE swconsim SET Descrição = REPLACE(Descrição, '00:00:00', '') UPDATE swconsim SET Descrição = Descrição + ' 00:00:00' UPDATE swconsim SET Descrição = REPLACE(Descrição, ' ', ' ') SELECT * FROM swconsim /*********************************************************************************************************** * CONSULTAS * *********************************************************************************************************** * * * 1. CRIAR UMA NOVA CONSULTA NO MEDSYSTEM * * 2. ADICIONAR UM OU MAIS ITENS NA CONSULTA * * 3. MODIFICAR O CAMPO "CÓDIGO" DA TABELA SWCONSULTAS PARA AUTOINCREMENTO * * 4. CRIAR UM OU MAIS CAMPOS DE DADOS (TIPO TEXT) NA TABELA SWCONSULTAS PARA AUXILIAR NA CONVERSÃO * * 5. REALIZAR UMA CONSULTA PARA UM PACIENTE TESTE NA AVALIAÇÃO CRIADA * * 6. REALIZAR UMA CONSULTA SQL NA TABELA SWITENS PARA PEGAR OS 'CRCS' GERADOS PELO SISTEMA * * 7. PERSONAL MED POSSUI 3 TABELAS QUE ARMAZENAM REGISTROS DE CONSULTAS (CO28, ME, CO12_1, CO43) * * 8. HÁ AINDA UMA TABELA DE CIRURGIAS QUE TAMBÉM DEVE SER ARMAZENADA, COMO UMA NOVA CONSULTA * * * ***********************************************************************************************************/ SELECT TOP 1 * FROM swconsultas ORDER BY Código DESC INSERT INTO swconsultas( [Código do Cliente], [Código do Usuário], Data, Hora, Especialidade, [Avaliação Básica], [Avaliação], Esp, Res, Dados1, Finalizada ) SELECT PCOD, 1, DATAINSERT, GETDATE(), 5, 1, 7, 0, 0, OBSERVATION, 1 FROM PersonalMed_GCS.dbo.CO28 INSERT INTO swconsultas( [Código do Cliente], [Código do Usuário], Data, Hora, Especialidade, [Avaliação Básica], [Avaliação], Esp, Res, Dados1, Finalizada ) SELECT PCOD, 1, ISNULL(DATA_CRIACAO, GETDATE()), GETDATE(), 5, 1, 7, 0, 0, Contents, 1 FROM PersonalMed_GCS.dbo.CO12_1 WHERE Contents IS NOT NULL INSERT INTO swconsultas( [Código do Cliente], [Código do Usuário], Data, Hora, Especialidade, [Avaliação Básica], [Avaliação], Esp, Res, Dados1, Dados2, Finalizada ) SELECT PCOD, 1, ISNULL(DATA_CRIACAO, GETDATE()), GETDATE(), 5, 1, 7, 0, 0, Contents1, Contents2, 1 FROM PersonalMed_GCS.dbo.ME INSERT INTO swconsultas( [Código do Cliente], [Código do Usuário], Data, Hora, Especialidade, [Avaliação Básica], [Avaliação], Esp, Res, Dados1, Dados2, Dados3, Finalizada ) SELECT PCOD, 1, DATA, GETDATE(), 5, 1, 8, 0, 0, Equipe, Descricao, Procedimento, 1 FROM PersonalMed_GCS.dbo.CO43 WHERE Ativo = 'T' INSERT INTO switens ([Código da Consulta], [Código do Item], Código, Dados, CRC, UniqueCod) SELECT Código, 50, 0, Dados3, '-4967862', 2 FROM swconsultas WHERE [Código] > 99862 /************************************************************************ * AJUSTE PRÓXIMO CÓDIGO DE CONSULTA * ************************************************************************/ SELECT MAX(Código) from swconsultas UPDATE sgcfind SET Código = 99900 WHERE Tipo = 4 /************************************************************************ * CONVÊNIOS * ************************************************************************/ INSERT INTO convenio (Code, Name) SELECT CarrierCod, Name FROM PersonalMed_GCS.dbo.Carrier /************************************************************************ * AJUSTE PRÓXIMO CÓDIGO DE CONVÊNIO * ************************************************************************/ SELECT * FROM convenio UPDATE INDICE SET CODE = 25 WHERE TYPE = 4 /************************************************************************ * ATUALIZA CÓDIGO DO CONVÊNIO TABELA DE PACIENTES * ************************************************************************/ DISABLE TRIGGER Medsync_Clientes ON SWClientes UPDATE swclientes SET CodConvenio = ( SELECT Top 1 CarrierCod FROM PersonalMed_GCS.dbo.clini_05 WHERE PCod = swclientes.Código ) ENABLE TRIGGER Medsync_Clientes ON SWClientes ```