Diagosis Codes In Use
Back to Query Directory
This query returns a list of diagnoses that are currently in use in Claim Setups in OM and in DSM Profiles in CM. These are the ones that you will have to replace by the new ICD-10 diagnosis codes on or before October of 2013.
The query itself is a main query that lists diagnoses that appear in any of a bunch of fields in OM and CM and a subquery used in the WHERE clause. The subquery contains a simple query for the dxnum in each possible location, and all the simple queries are UNIONed together to get a single list.
SELECT
dxcode, dxtype, dxdesc
FROM
dx
WHERE
dxnum IN
(
SELECT dx1 FROM ptcsu
UNION
SELECT dx2 FROM ptcsu
UNION
SELECT dx3 FROM ptcsu
UNION
SELECT dx4 FROM ptcsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT dxnum FROM v_ptdsmlist WHERE dxnum <> 0
)
ORDER BY dxcode
dxcode, dxtype, dxdesc
FROM
dx
WHERE
dxnum IN
(
SELECT dx1 FROM ptcsu
UNION
SELECT dx2 FROM ptcsu
UNION
SELECT dx3 FROM ptcsu
UNION
SELECT dx4 FROM ptcsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT box67 FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT fl67i FROM ptubsu
UNION
SELECT dxnum FROM v_ptdsmlist WHERE dxnum <> 0
)
ORDER BY dxcode
CategoryQueries
