GMPLENFM ; SLC/MKB/KER/TC -- Problem List Enc Form utilities ;06/12/13 09:08
Source file <GMPLENFM.m>
Package | Total | Call Graph |
---|---|---|
DRG Grouper | 2 | ($$CODECS,$$CSI,$$SAB)^ICDEX ($$ICDDATA,$$STATCHK)^ICDXCODE |
Lexicon Utility | 2 | CONFIG^LEXSET $$STATCHK^LEXSRC2 |
Problem List | 2 | GETPLIST^GMPLMGR1 ($$EXTDT,$$PROBTEXT)^GMPLX |
Kernel | 1 | $$DT^XLFDT |
VA FileMan | 1 | ^DIC |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Order Entry Results Reporting | 2 | ORWPCE ORWPCE1 |
VistA Integration Adapter | 2 | VIABRPC VIABRPC7 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ACTIVE | ; List of Active Problems for DFN
; Input variables: ; DFN Patient ID (Required) ; [GMPINDT] Date of Interest (Optional - defaults to today) ; This is the date to use for evalutation of the ; Activation status of ICD-9-CM and SNOMED CT codes |
|
SELECT | ; Select Common Problems
; Sets Global Array: ; ^TMP("IB",$J,"INTERFACES","GMP SELECT CLINIC COMMON PROBLEMS") ; Piece 1: Pointer to Clinical Lexicon ; 2: Problem Text ; 3: ICD Code (null if unknown) |
|
DSELECT | ; List of Active Problems for DFN
; Input variables: ; DFN Patient ID (Required) ; [GMPINDT] Date of Interest (Optional - defaults to today) ; This is the date to use for evalutation of the ; Activation status of ICD-9-CM and SNOMED CT codes |
|
TXFCTR(GMPL1) | ;Determine Treatment Factor, if any
|
Name | Field # of Occurrence |
---|---|
^DIC | SELECT+10 |
GETPLIST^GMPLMGR1 | ACTIVE+39, DSELECT+39 |
$$EXTDT^GMPLX | ACTIVE+59, DSELECT+60 |
$$PROBTEXT^GMPLX | ACTIVE+56, DSELECT+56 |
$$CODECS^ICDEX | ACTIVE+51, DSELECT+51 |
$$CSI^ICDEX | ACTIVE+44, DSELECT+44 |
$$SAB^ICDEX | ACTIVE+45, DSELECT+45 |
$$ICDDATA^ICDXCODE | ACTIVE+46, DSELECT+46 |
$$STATCHK^ICDXCODE | ACTIVE+47, ACTIVE+53, DSELECT+47, DSELECT+53 |
CONFIG^LEXSET | SELECT+7 |
$$STATCHK^LEXSRC2 | ACTIVE+55, DSELECT+55 |
$$DT^XLFDT | ACTIVE+36, DSELECT+36 |
FileNo | Call Tags |
---|---|
^LEX(757.01 - [#757.01] | Classic Fileman Calls |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CNT | ACTIVE+33~, ACTIVE+35*, ACTIVE+56*, ACTIVE+62, ACTIVE+63, DSELECT+34~, DSELECT+35*, DSELECT+56*, DSELECT+63, DSELECT+64 |
CODESTAT | ACTIVE+41~, ACTIVE+43*, ACTIVE+47*, ACTIVE+53*, ACTIVE+55*, ACTIVE+61, DSELECT+41~, DSELECT+43*, DSELECT+47*, DSELECT+53* , DSELECT+55*, DSELECT+62 |
>> DFN | ACTIVE+35, ACTIVE+62, ACTIVE+63, DSELECT+35 |
DIC | SELECT+7~, SELECT+9* |
DIC("A" | SELECT+9* |
DIC(0 | SELECT+9* |
GMPARAM | ACTIVE+33~, DSELECT+34~ |
GMPARAM("QUIET" | ACTIVE+37*, DSELECT+37* |
GMPARAM("REV" | ACTIVE+37*, DSELECT+37* |
GMPARAM("VER" | ACTIVE+37*, ACTIVE+57, DSELECT+37*, DSELECT+57 |
GMPCSYS | ACTIVE+41~, ACTIVE+45*, ACTIVE+46, ACTIVE+61, DSELECT+41~, DSELECT+45*, DSELECT+46, DSELECT+62 |
GMPDFN | ACTIVE+34~, ACTIVE+35*, DSELECT+34~, DSELECT+35* |
GMPDT | ACTIVE+41~, ACTIVE+44*, ACTIVE+45, ACTIVE+46, DSELECT+41~, DSELECT+44*, DSELECT+45, DSELECT+46 |
>> GMPINDT | ACTIVE+36*, ACTIVE+47, ACTIVE+53, ACTIVE+55, DSELECT+36*, DSELECT+47, DSELECT+53, DSELECT+55 |
GMPL0 | ACTIVE+41~, ACTIVE+43*, ACTIVE+44, ACTIVE+46, ACTIVE+59, DSELECT+41~, DSELECT+43*, DSELECT+44, DSELECT+46, DSELECT+60 |
GMPL1 | ACTIVE+41~, ACTIVE+43*, ACTIVE+57, ACTIVE+59, ACTIVE+61, DSELECT+41~, DSELECT+43*, DSELECT+57, DSELECT+60, DSELECT+62 , TXFCTR~, TXFCTR+3 |
GMPL800 | ACTIVE+41~, ACTIVE+43*, ACTIVE+54, DSELECT+41~, DSELECT+43*, DSELECT+54 |
GMPL802 | ACTIVE+41~, ACTIVE+43*, ACTIVE+44, ACTIVE+45, DSELECT+41~, DSELECT+43*, DSELECT+44, DSELECT+45 |
GMPLCPTR | ACTIVE+41~, ACTIVE+44*, ACTIVE+45, ACTIVE+47, DSELECT+41~, DSELECT+44*, DSELECT+45, DSELECT+47 |
GMPLIST | ACTIVE+33~, ACTIVE+39, DSELECT+34~, DSELECT+39 |
GMPLIST( | ACTIVE+40, ACTIVE+42, DSELECT+40, DSELECT+42 |
GMPLVIEW | ACTIVE+33~, ACTIVE+39, DSELECT+34~, DSELECT+39 |
GMPLVIEW("ACT" | ACTIVE+38*, DSELECT+38* |
GMPLVIEW("PROV" | ACTIVE+38*, DSELECT+38* |
GMPLVIEW("VIEW" | ACTIVE+38*, DSELECT+38* |
GMPTOTAL | ACTIVE+33~, ACTIVE+39, DSELECT+34~, DSELECT+39 |
ICDC | ACTIVE+41~, ACTIVE+46*, ACTIVE+47, ACTIVE+52*, ACTIVE+58, DSELECT+41~, DSELECT+46*, DSELECT+47, DSELECT+52*, DSELECT+59 |
ICDCSPTR | ACTIVE+49~, ACTIVE+51*, ACTIVE+53, DSELECT+49~, DSELECT+51*, DSELECT+53 |
ICDI | ACTIVE+41~, ACTIVE+48*, ACTIVE+50, DSELECT+41~, DSELECT+48*, DSELECT+50 |
ICDM0 | ACTIVE+49~, ACTIVE+50*, ACTIVE+51, DSELECT+49~, DSELECT+50*, DSELECT+51 |
ICDMC | ACTIVE+49~, ACTIVE+50*, ACTIVE+51, ACTIVE+52, ACTIVE+53, DSELECT+49~, DSELECT+50*, DSELECT+51, DSELECT+52, DSELECT+53 |
ICDMCSYS | ACTIVE+49~, ACTIVE+51*, DSELECT+49~, DSELECT+51* |
ICDMDT | ACTIVE+49~, ACTIVE+51*, DSELECT+49~, DSELECT+51* |
IFN | ACTIVE+33~, ACTIVE+42*, ACTIVE+43, ACTIVE+48, ACTIVE+50, ACTIVE+56, DSELECT+34~, DSELECT+42*, DSELECT+43, DSELECT+48 , DSELECT+50, DSELECT+56, DSELECT+58 |
NODE | ACTIVE+34~, ACTIVE+35*, ACTIVE+37, DSELECT+34~, DSELECT+35*, DSELECT+37 |
NUM | ACTIVE+33~, ACTIVE+40*, ACTIVE+42, DSELECT+34~, DSELECT+40*, DSELECT+42 |
NXTTF | TXFCTR+1~, TXFCTR+3* |
PROB | ACTIVE+33~, ACTIVE+56*, ACTIVE+57*, ACTIVE+58*, ACTIVE+59*, ACTIVE+60*, ACTIVE+61*, ACTIVE+62, SELECT+7~, SELECT+10* , SELECT+11*, SELECT+12, DSELECT+34~, DSELECT+56*, DSELECT+57*, DSELECT+58*, DSELECT+59*, DSELECT+60*, DSELECT+61*, DSELECT+62* , DSELECT+63 |
SC | ACTIVE+33~, ACTIVE+59*, ACTIVE+60, DSELECT+34~, DSELECT+60*, DSELECT+61 |
SCTC | ACTIVE+41~, ACTIVE+54*, ACTIVE+55, ACTIVE+61, DSELECT+41~, DSELECT+54*, DSELECT+55, DSELECT+62 |
SCTD | ACTIVE+41~, ACTIVE+54*, ACTIVE+61, DSELECT+41~, DSELECT+54*, DSELECT+62 |
TXFACTOR | TXFCTR+1~, TXFCTR+2*, TXFCTR+3*, TXFCTR+4 |
U | ACTIVE+37, ACTIVE+44, ACTIVE+45, ACTIVE+46, ACTIVE+50, ACTIVE+51, ACTIVE+54, ACTIVE+57, ACTIVE+58, ACTIVE+59 , ACTIVE+60, ACTIVE+61, SELECT+10, SELECT+11, DSELECT+37, DSELECT+44, DSELECT+45, DSELECT+46, DSELECT+50, DSELECT+51 , DSELECT+54, DSELECT+57, DSELECT+58, DSELECT+59, DSELECT+60, DSELECT+61, DSELECT+62, TXFCTR+3 |
VHATC | ACTIVE+41~, ACTIVE+54*, ACTIVE+61, DSELECT+41~, DSELECT+54*, DSELECT+62 |
VHATD | ACTIVE+41~, ACTIVE+54*, ACTIVE+61, DSELECT+41~, DSELECT+54*, DSELECT+62 |
X | SELECT+7~, SELECT+10 |
Y | SELECT+7~, SELECT+10 |
Y(1 | SELECT+11 |