©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
DGQPTQ5 ; SLC/PKS - Functions for Patient Selection Lists. ; 6/5/01 12:37pm
Source file <DGQPTQ5.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| COMBNM(DGQVAL) | ; Returns name of "Combination" source entry, ^OR(100.24 file.
|
|
| PTSCOMBO(DGQTYP,DGQPTR) | ; Write ^TMP("DG",$J,"PATIENTS","B") patient entries.
|
|
| COMBDISP(DGQDUZ,DGQPTR) | ; Display user's "Combination" pt selection sources.
|
|
| ID(DGQPIEN) | ; Return short ID for patient ID.
; (Copied from DGQPT routine and modified.) |
| Name | Field # of Occurrence |
|---|---|
| $$FMTE^XLFDT | PTSCOMBO+62, PTSCOMBO+79 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(42 - [#42] | COMBNM+25, PTSCOMBO+32 |
| ^DIC(45.7 - [#45.7] | COMBNM+33, PTSCOMBO+34 |
| ^DPT - [#2] | PTSCOMBO+62, PTSCOMBO+65, ID+5, ID+7 |
| ^OR(100.21 - [#100.21] | COMBNM+37, PTSCOMBO+35 |
| ^OR(100.24 - [#100.24] | COMBDISP+22, COMBDISP+26 |
| ^SC - [#44] | COMBNM+41, PTSCOMBO+36 |
| ^TMP("DG" | COMBDISP+20!, COMBDISP+32*, COMBDISP+37, COMBDISP+38, PTSCOMBO+89*, PTSCOMBO+93*, PTSCOMBO+96* |
| ^TMP("OR" | COMBDISP+40! |
| ^VA(200 - [#200] | COMBNM+29, PTSCOMBO+33 |
| Name | Line Occurrences |
|---|---|
| $$COMBNM | COMBDISP+29 |
| $$ID | PTSCOMBO+59 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DGQCNT | COMBDISP+10~, COMBDISP+13*, COMBDISP+14, COMBDISP+15, COMBDISP+16, COMBDISP+17, COMBDISP+28*, COMBDISP+35, COMBDISP+42, PTSCOMBO+28* , PTSCOMBO+49, PTSCOMBO+98* |
| DGQDOB | PTSCOMBO+24~, PTSCOMBO+52*, PTSCOMBO+62*, PTSCOMBO+89, PTSCOMBO+93, PTSCOMBO+96 |
| DGQDONE | PTSCOMBO+24~, PTSCOMBO+27*, PTSCOMBO+49, PTSCOMBO+55* |
| DGQDUZ | COMBDISP~, COMBDISP+14, COMBDISP+16 |
| DGQFILE | COMBNM+17~, COMBNM+22*, COMBNM+24, COMBNM+28, COMBNM+32, COMBNM+36, COMBNM+40 |
| DGQIDT | PTSCOMBO+24~, PTSCOMBO+52*, PTSCOMBO+77*, PTSCOMBO+89, PTSCOMBO+93, PTSCOMBO+96 |
| DGQMORE | PTSCOMBO+24~, PTSCOMBO+52*, PTSCOMBO+65*, PTSCOMBO+68, PTSCOMBO+69, PTSCOMBO+70*, PTSCOMBO+71*, PTSCOMBO+75*, PTSCOMBO+76*, PTSCOMBO+77 , PTSCOMBO+78*, PTSCOMBO+79*, PTSCOMBO+89, PTSCOMBO+93, PTSCOMBO+96 |
| >> DGQPDAT | PTSCOMBO+48*, PTSCOMBO+49*, PTSCOMBO+54, PTSCOMBO+56, PTSCOMBO+76 |
| DGQPIEN | PTSCOMBO+52*, PTSCOMBO+54*, PTSCOMBO+55, PTSCOMBO+59, PTSCOMBO+62, PTSCOMBO+65, PTSCOMBO+84, PTSCOMBO+89, PTSCOMBO+93, PTSCOMBO+96 , ID~, ID+5, ID+7 |
| >> DGQPNM | PTSCOMBO+52*, PTSCOMBO+56*, PTSCOMBO+89, PTSCOMBO+93, PTSCOMBO+96, ID+9 |
| DGQPTR | COMBDISP~, COMBDISP+15, COMBDISP+17, COMBDISP+22, COMBDISP+26, COMBNM+17~, COMBNM+21*, COMBNM+25, COMBNM+29, COMBNM+33 , COMBNM+37, COMBNM+41, PTSCOMBO~, PTSCOMBO+32, PTSCOMBO+33, PTSCOMBO+34, PTSCOMBO+35, PTSCOMBO+36, PTSCOMBO+89, PTSCOMBO+93 , PTSCOMBO+96 |
| DGQRTN | COMBNM+17~, COMBNM+18, COMBNM+20*, COMBNM+24, COMBNM+25*, COMBNM+26*, COMBNM+28, COMBNM+29*, COMBNM+30*, COMBNM+32 , COMBNM+33*, COMBNM+34*, COMBNM+36, COMBNM+37*, COMBNM+38*, COMBNM+40, COMBNM+41*, COMBNM+42*, COMBNM+45 |
| DGQSNM | PTSCOMBO+24~, PTSCOMBO+43*, PTSCOMBO+44*, PTSCOMBO+45*, PTSCOMBO+89, PTSCOMBO+93, PTSCOMBO+96 |
| DGQSNM4 | PTSCOMBO+24~, PTSCOMBO+31*, PTSCOMBO+32*, PTSCOMBO+33*, PTSCOMBO+34*, PTSCOMBO+35*, PTSCOMBO+36*, PTSCOMBO+39*, PTSCOMBO+40*, PTSCOMBO+45 |
| DGQSRC | COMBDISP+10~, COMBDISP+21*, COMBDISP+22*, COMBDISP+26 |
| DGQSSN | PTSCOMBO+24~, PTSCOMBO+52*, PTSCOMBO+59*, PTSCOMBO+89, PTSCOMBO+93, PTSCOMBO+96 |
| DGQTXT | COMBDISP+10~, COMBDISP+25*, COMBDISP+26*, COMBDISP+27, COMBDISP+29*, COMBDISP+32, COMBDISP+36*, COMBDISP+37*, COMBDISP+38 |
| DGQTYP | PTSCOMBO~, PTSCOMBO+32, PTSCOMBO+33, PTSCOMBO+34, PTSCOMBO+35, PTSCOMBO+36, PTSCOMBO+44, PTSCOMBO+74, PTSCOMBO+88, PTSCOMBO+92 |
| DGQVAL | COMBNM~, COMBNM+18, COMBNM+21, COMBNM+22 |
| >> DGY( | PTSCOMBO+49 |
| ID | ID+3~, ID+5*, ID+6, ID+7*, ID+9 |
| >> ORQSRC | COMBDISP+22 |
| >> SORT | PTSCOMBO+88, PTSCOMBO+92 |
| U | COMBDISP+32, COMBNM+26, COMBNM+30, COMBNM+34, COMBNM+38, COMBNM+42, PTSCOMBO+39, PTSCOMBO+54, PTSCOMBO+56, PTSCOMBO+62 , PTSCOMBO+65, PTSCOMBO+76, PTSCOMBO+79, PTSCOMBO+89, PTSCOMBO+93, PTSCOMBO+96, ID+5, ID+7 |