select s.segrips, s.segfecha, s.seghora,
iif(s.segnota is null, '', s.segnota)||
iif((s.sistolica||'/'||s.distolica) is null, '', ' Presión Arterial: '||s.sistolica||'/'||s.distolica||' mmgh')||
iif(s.fr is null, '', ' Frecuencia Respiratoria: '||s.fr||' fr/min')||
iif(s.fc is null, '', ' Frecuencia Cardiaca: '||s.fc||' fc/min')||
iif(s.peso is null, '', ' Peso: '||s.peso||' Kg')||
iif(s.temp is null, '', ' Temperatura: ' ||s.temp||'°C')||
iif((s.examenfisico is null) or (char_length(s.examenfisico) < 10) , '', ' Detalle Examen Físico: '||s.examenfisico)
,
iif(s.segnota is null, '', s.segnota),
iif((s.examenfisico is null) or (char_length(s.examenfisico) < 10) , '', s.examenfisico),
iif((s.sistolica||'/'||s.distolica) is null, '', ' Presión Arterial: '||s.sistolica||'/'||s.distolica||' mmgh')||
iif(s.fr is null, '', ' Frecuencia Respiratoria: '||s.fr||' fr/min')||
iif(s.fc is null, '', ' Frecuencia Cardiaca: '||s.fc||' fc/min')||
iif(s.peso is null, '', ' Peso: '||s.peso||' Kg')||
iif(s.temp is null, '', ' Temperatura: ' ||s.temp||'°C'),
s.segdxdes, s.ide,
pr.procc, pr.prorm, pr.pronombre, ep.espnombre, s.servicio, pr.firma
from segtable s, protable pr, esptable ep where
s.segprocodigo = pr.proidentidad and pr.proespecialidad = ep.espcodigo
