MHVUMRPC ;KUM/LB - myHealtheVet Management Utilities ; 6/18/2013
Source file <MHVUMRPC.m>
Package | Total | Call Graph |
---|---|---|
Event Capture | 3 | ELIG^ECUERPC PATCLAST^ECUERPC1 SRCLST^ECUMRPC1 |
VA FileMan | 2 | LIST^DIC $$GET1^DIQ |
CPT HCPCS Codes | 1 | $$CPT^ICPTCOD |
DRG Grouper | 1 | $$CODEN^ICDCODE |
Master Patient Index VistA | 1 | $$GETDFN^MPIF001 |
Problem List | 1 | LIST^GMPLUTL2 |
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 |
---|---|---|
My HealtheVet | 1 | MHVXWLC |
Name | Comments | DBIA/ICR reference |
---|---|---|
DSSUNT(RESULTS,MHVSTRING) | ;
|
|
MHVRST | ;Populate results array
|
|
MHVCHK | ;Check if DSS Unit is already populated in results array ;JAZZ#
|
|
CLINIC() | ;Get clinic
|
|
PRINTRES | ; Print Results
|
|
DSSPROCS(RESULTS,MHVARY) | ; Get Procedures from DSS Unit IEN and Locaiton IEN
; MHVARY IS DSS UNIT IEN AND LOCATION IEN ; RESULTS = Procedure IEN^Procedure 5 digit code and description^synonym^Active flag |
|
PATECLS(RESULTS,MHVSTRING) | ; Get Patient eligibility and Classification data
; MHVSTRING IS PATIENT ICN, DSS UNIT IEN, PROCEDURE DATE AND TIME IN FILEMAN FORMAT ; RESULTS = PATIENT STATUS ^CLASSIFICATION DATA (AGENT ORANCE, IONIZING RADIATION, SC CONDITION, ENVIRONMENTAL CONTAMINANTS, MILITARY SEXUAL TRUMA ; RESULTS(1,2...)=PRIMARY/SECONDARY FLAG (1-PRIMARY,0-SECONDARY)^ELIGIBILITY IEN^ELIGIBILITY DESCRIPTION |
|
DIAGPL(RESULTS,MHVSTRING) | ; Get Patient Diagnosis codes from Patient Probelm list
; MHVSTRING IS PATIENT ICN ; RESULTS = DIAGNOSIS CODE IEN^DIAGNOSIS CODE^SNOMED-CT DESCRIPTION~ICD-10 DESCRIPTION^ICD CODING SYSTEM |
|
DIAGSRCH(RESULTS,MHVSTRING) | ; Get Diagnosis codes and description from Search string
; MHVSTRING IS SEARCH STRING AND FILE TO SEARCH ; RESULTS = DIAGNOSIS CODE IEN IN FILE 80^DIAGNOSIS CODE^DESCRIPTION |
Name | Field # of Occurrence |
---|---|
LIST^DIC | DSSUNT+35 |
$$GET1^DIQ | DSSUNT+42, DSSUNT+43, DSSUNT+44, CLINIC+3, CLINIC+5, CLINIC+6 |
ELIG^ECUERPC | PATECLS+16 |
PATCLAST^ECUERPC1 | PATECLS+26 |
SRCLST^ECUMRPC1 | DIAGSRCH+10 |
LIST^GMPLUTL2 | DIAGPL+12 |
$$CODEN^ICDCODE | DIAGPL+19 |
$$CPT^ICPTCOD | DSSPROCS+14 |
$$GETDFN^MPIF001 | PATECLS+8, DIAGPL+7 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
200.72 | LIST^DIC |
^DG(40.8 - [#40.8] | GET1^DIQ |
^SC - [#44] | GET1^DIQ |
^ECD - [#724] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^EC(725 - [#725] | DSSPROCS+13 |
^ECJ - [#720.3] | DSSPROCS+10, DSSPROCS+11 |
^ECJ("AP" | DSSUNT+48, DSSPROCS+7, DSSPROCS+8, DSSPROCS+9 |
^SC - [#44] | DSSUNT+32 |
^TMP($J | DSSUNT+27! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DCOD | DIAGPL+3~, DIAGPL+23*, DIAGPL+24 |
DT | DIAGSRCH+9 |
ECARY | PATECLS+4~, PATECLS+15*, PATECLS+16, PATECLS+24*, PATECLS+26 |
FLAG | DSSUNT+17~, DSSUNT+20*, DSSUNT+33* |
FLG | CLINIC+1~, CLINIC+2*, CLINIC+4*, CLINIC+7*, CLINIC+8 |
I | PRINTRES+1~, PRINTRES+2*, PRINTRES+4, DIAGSRCH+17*, DIAGSRCH+19, DIAGSRCH+20 |
MHVARY | DSSPROCS~, DSSPROCS+4, DSSPROCS+5 |
MHVCAT | DSSPROCS+3~, DSSPROCS+7*, DSSPROCS+8, DSSPROCS+9 |
MHVCHKF | DSSUNT+16~, DSSUNT+46, DSSUNT+48, MHVCHK+2*, MHVCHK+3, MHVCHK+4* |
MHVCIEN | DSSUNT+16~, DSSUNT+23*, DSSUNT+24*, DSSUNT+32, DSSUNT+33, DSSUNT+46, DSSUNT+48, DSSUNT+51, DSSUNT+52, CLINIC+3 , CLINIC+4, CLINIC+6, CLINIC+7 |
MHVCNT | DSSUNT+16~, DSSUNT+18*, DSSUNT+50, MHVRST+1*, MHVRST+2, DSSPROCS+3~, DSSPROCS+6*, DSSPROCS+18*, DSSPROCS+19, DSSPROCS+20 , PATECLS+4~, PATECLS+18*, PATECLS+20*, PATECLS+21, PATECLS+22, DIAGPL+3~, DIAGPL+14*, DIAGPL+17*, DIAGPL+18, DIAGPL+22 , DIAGPL+25, DIAGPL+27, DIAGSRCH+3~, DIAGSRCH+12*, DIAGSRCH+17, DIAGSRCH+18*, DIAGSRCH+21 |
MHVDCOD | DIAGPL+3~, DIAGPL+18*, DIAGPL+19, DIAGPL+22, DIAGPL+23, DIAGPL+27 |
MHVDIACT | DSSUNT+16~, DSSUNT+43*, DSSUNT+46, DSSUNT+48, MHVRST+2 |
MHVDIEN | DSSUNT+16~, DSSUNT+40*, DSSUNT+41, DSSUNT+42, DSSUNT+43, DSSUNT+44, DSSUNT+48, MHVRST+2, MHVCHK+4, DIAGPL+19* , DIAGPL+27 |
MHVDIV | DSSUNT+17~, CLINIC+3*, CLINIC+4, CLINIC+5 |
MHVDIVN | DSSUNT+17~, CLINIC+3*, CLINIC+4 |
MHVDNAM | DSSUNT+16~, DSSUNT+42*, MHVRST+2 |
MHVDPCE | DSSUNT+16~, DSSUNT+19*, DSSUNT+44*, MHVRST+2 |
MHVECD | DSSPROCS+3~, DSSPROCS+5*, DSSPROCS+7, DSSPROCS+8, DSSPROCS+9, DSSPROCS+20, PATECLS+4~, PATECLS+12* |
MHVI | MHVCHK+1~, MHVCHK+3*, MHVCHK+4, PATECLS+4~, PATECLS+19*, PATECLS+21 |
MHVIEN | DSSPROCS+3~, DSSPROCS+8*, DSSPROCS+9*, DSSPROCS+10, DSSPROCS+11 |
MHVLIEN | DSSUNT+16~, DSSUNT+48, MHVRST+2, CLINIC+5*, CLINIC+6*, CLINIC+7 |
MHVLNAM | DSSUNT+16~, MHVRST+2, CLINIC+5*, CLINIC+6*, CLINIC+7 |
MHVLOC | DSSPROCS+3~, DSSPROCS+4*, DSSPROCS+7, DSSPROCS+8, DSSPROCS+9, DSSPROCS+20 |
MHVNODE | DSSPROCS+3~, DSSPROCS+10*, DSSPROCS+15 |
MHVPDT | PATECLS+4~, PATECLS+13* |
MHVPDUZ | DSSUNT+17~, DSSUNT+26*, DSSUNT+35 |
MHVPICN | PATECLS+4~, PATECLS+6*, PATECLS+7, PATECLS+8, DIAGPL+3~, DIAGPL+5*, DIAGPL+6, DIAGPL+7 |
MHVPIEN | PATECLS+4~, PATECLS+8*, PATECLS+9, PATECLS+11, PATECLS+15, PATECLS+17, PATECLS+22, PATECLS+28, DIAGPL+3~, DIAGPL+7* , DIAGPL+8, DIAGPL+10, DIAGPL+12 |
MHVPN | DSSPROCS+3~, DSSPROCS+11*, DSSPROCS+12, DSSPROCS+13*, DSSPROCS+14*, DSSPROCS+19 |
MHVPRO | DSSPROCS+3~, DSSPROCS+11*, DSSPROCS+13*, DSSPROCS+14* |
MHVPX | DSSPROCS+3~, DSSPROCS+8*, DSSPROCS+9, DSSPROCS+19 |
MHVR1 | DSSUNT+16~ |
MHVR1("DILIST" | DSSUNT+36, DSSUNT+37, DSSUNT+39, DSSUNT+40 |
MHVR1C | DSSUNT+17~, DSSUNT+38*, DSSUNT+39*, DSSUNT+40 |
MHVR1E | DSSUNT+17~ |
MHVROOT | DIAGSRCH+4!, DIAGSRCH+10, DIAGSRCH+11, DIAGSRCH+17, DIAGSRCH+19 |
MHVROOTP | DIAGPL+11!, DIAGPL+12 |
MHVROOTP( | DIAGPL+18, DIAGPL+22, DIAGPL+25*, DIAGPL+27 |
MHVROOTP(0 | DIAGPL+13, DIAGPL+17 |
MHVSTAT | DSSPROCS+3~, DSSPROCS+15*, DSSPROCS+17, DSSPROCS+19 |
MHVSTR | DIAGSRCH+3~, DIAGSRCH+9*, DIAGSRCH+10 |
MHVSTRING | DSSUNT~, DSSUNT+23, DSSUNT+26, PATECLS~, PATECLS+6, PATECLS+11*, PATECLS+12, PATECLS+13, PATECLS+24, DIAGPL~ , DIAGPL+5, DIAGPL+10*, DIAGSRCH~, DIAGSRCH+9 |
MHVSYN | DSSPROCS+3~, DSSPROCS+11*, DSSPROCS+19 |
PRB | DIAGPL+3~, DIAGPL+24 |
PRB(1 | DIAGPL+25 |
RESULTS | DSSUNT~, PRINTRES+2, PRINTRES+4, DSSPROCS~, PATECLS~, PATECLS+16, PATECLS+17, PATECLS+19, PATECLS+21, PATECLS+25* , PATECLS+26, PATECLS+27, PATECLS+28, DIAGPL~, DIAGSRCH~ |
RESULTS( | MHVRST+2*, MHVCHK+3, MHVCHK+4, DSSPROCS+19*, PATECLS+21*, DIAGPL+27*, DIAGSRCH+19*, DIAGSRCH+20* |
RESULTS(0 | PATECLS+27* |
RESULTS(1 | DSSUNT+32*, DSSUNT+36*, DSSUNT+51*, DSSUNT+52*, CLINIC+4*, CLINIC+7*, DSSPROCS+20*, PATECLS+7*, PATECLS+9*, PATECLS+17* , PATECLS+22*, PATECLS+28*, DIAGPL+6*, DIAGPL+8*, DIAGPL+13*, DIAGSRCH+11*, DIAGSRCH+21* |
U | DSSPROCS+11, DSSPROCS+13, DSSPROCS+14, DSSPROCS+15, DSSPROCS+19, DIAGSRCH+9 |