BDPDPEE ; IHS/CMI/TMJ - UPDATE USING LISTMAN ;
Source file <BDPDPEE.m>
Package | Total | Call Graph |
---|---|---|
IHS Designated Provider | 4 | PAUSE^BDP $$CREATE^BDPAMA $$DATE^BDPLMDSP DELETE^BDPPASS |
IHS VA Utilities | 4 | $$VAL^XBDIQ1 ^XBFMK VIEWR^XBLM EN^XBVK |
Registration | 3 | EN^VALM TERM^VALM0 (CLEAR,FULL)^VALM1 |
VA Fileman | 3 | ^DIC $$GET1^DIQ ^DIR |
IHS Patient | 1 | (,$$DOB,$$DOD,$$HRN,KILL)^AUPNPAT |
Kernel | 1 | DISP^XQORM1 |
Patient Care Component Reports | 1 | $$LASTVD^APCLV1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
HDR | ; -- header code
|
|
HS | ;EP called from protocol to generate hs
|
|
RMDP | ;EP - called from protocol to remove multiple DP entries
|
|
EXPND | ; -- expand code
|
|
EN | ;EP -- main entry point for BDP UPDATE PATIENT DATA
|
|
HELP | ;EP -- help code
|
|
ADDDP1 | ||
CTR(X,Y) | ;EP - Center X in a field Y wide.
|
|
INIT | ; -- init variables and list array
|
|
GATHER1 | ;EP Called from Protocol to Resort List Display
|
|
GATHER2 | ;Resort by Provider
|
|
EOJ | ;
|
|
CHKPROV(PROV) | ;
|
|
BDPASK | ;Ask User Type of Sort
|
|
END | ;
|
|
CHG | ;EP - Called from Protocol to change from One Provider to Another
|
|
GETTYPE | ;
|
|
PPEP(BDPPIEN) | ;PEP - entry point to view/update one provider's panel
|
|
START | ;
|
|
PAUSE | ;EP
|
|
PROV | ;
|
|
GATHER | ;
|
|
ADDDP | ;EP called from protocol to open a new case
|
|
EXIT | ; -- exit code
|
Name | Field # of Occurrence |
---|---|
$$LASTVD^APCLV1 | GATHER+10, GATHER2+9 |
^AUPNPAT | HS+5 |
$$DOB^AUPNPAT | GATHER+10, GATHER2+9 |
$$DOD^AUPNPAT | GATHER+8 |
$$HRN^AUPNPAT | GATHER+10, GATHER2+9 |
KILL^AUPNPAT | EOJ+8 |
PAUSE^BDP | CHG+16, CHG+17 |
$$CREATE^BDPAMA | CHG+18, ADDDP1+18 |
$$DATE^BDPLMDSP | GATHER+10, GATHER2+9 |
DELETE^BDPPASS | RMDP+8 |
^DIC | PROV+3, CHG+8, GETTYPE+2, HS+2, ADDDP+4 |
$$GET1^DIQ | CHG+16, CHG+17 |
^DIR | CHKPROV+11, CHG+3, RMDP+1, ADDDP1+1, ADDDP1+8, BDPASK+2, PAUSE+1 |
EN^VALM | EN+1 |
TERM^VALM0 | EXIT+2 |
CLEAR^VALM1 | EOJ+6 |
FULL^VALM1 | CHG+2, ADDDP+1 |
$$VAL^XBDIQ1 | CHKPROV+3, GATHER+11, GATHER2+10 |
^XBFMK | PROV+1 |
VIEWR^XBLM | HS+10 |
EN^XBVK | HS+7, HS+11, EOJ+1 |
DISP^XQORM1 | HELP+1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | Classic Fileman Calls |
^AUPNPAT - [#9000001] | Classic Fileman Calls |
^APCHSCTL - [#9001015] | Classic Fileman Calls |
^BDPTCAT - [#90360.3] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNPAT - [#9000001] | GATHER+9 |
^BDPMSGA - [#90360.5] | CHG+17, ADDDP1+14 |
^BDPMSGA("B" | CHG+16, ADDDP1+10 |
^BDPRECN - [#90360.1] | GATHER+2, GATHER+7, CHG+13, CHG+14, CHG+15, RMDP+5, RMDP+6, RMDP+7, ADDDP1+4, ADDDP1+5 , GATHER2+3, GATHER2+8 |
^BDPRECN("AA" | ADDDP1+4 |
^BDPRECN("AC" | GATHER+2, GATHER2+3 |
^BDPTCAT - [#90360.3] | ADDDP1+5, ADDDP1+10, ADDDP1+14 |
^DPT - [#2] | GATHER+2, GATHER+10, HS+9, GATHER2+9 |
^TMP("BDPDPEE" | GATHER+1!, GATHER+12*, CHG+12, RMDP+4, GATHER2+2!, GATHER2+11* |
^TMP($J | GATHER+1!, GATHER+2*, GATHER+4, GATHER+5, GATHER2+2!, GATHER2+3*, GATHER2+5, GATHER2+6 |
^VA(200 - [#200] | CHKPROV+6, HDR+2, CHG+7, ADDDP1+5, ADDDP1+8 |
Name | Line Occurrences |
---|---|
$$CHKPROV | PROV+6, CHG+11 |
$$CTR | START+5 |
ADDDP1 | ADDDP1+10, ADDDP1+14 |
EN | PROV+7, PPEP+2 |
EOJ | END+1 |
EXIT | CHG+4, CHG+5, CHG+9, CHG+11, CHG+20, RMDP+2, RMDP+3, RMDP+13, HS+7, HS+12 , ADDDP1+2, ADDDP1+4, ADDDP1+19, BDPASK+5 |
GATHER | INIT+2, EXIT+4, EXIT+5, EXIT+7 |
GATHER2 | EXIT+6 |
GETTYPE | HS+6 |
HDR | EXIT+4, EXIT+5, EXIT+6, EXIT+7 |
PAUSE | CHG+9, HS+7, ADDDP1+2, ADDDP1+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | HS+9*, HS+10, HS+11!, EOJ+4! |
AMCHDAYS | HS+11! |
AMCHDOB | HS+11! |
>> APCHSPAT | HS+8*, HS+9 |
>> APCHSTYP | GETTYPE+1*, GETTYPE+4*, HS+7 |
AUPNDAYS | START+1~ |
AUPNDOB | START+1~ |
AUPNDOD | START+1~ |
AUPNPAT | START+1~ |
AUPNSEX | START+1~ |
>> BDPANS | CHG+6*, CHG+12, RMDP+4* |
BDPBD | START+1~ |
>> BDPC | CHG+12*, CHG+16, CHG+17, RMDP+4* |
BDPCASE | EN+2!, EXIT+1!, EOJ+5! |
BDPCDATE | EN+2!, EOJ+5! |
BDPD | EN+2!, GATHER+2*, GATHER+7*, GATHER+8, GATHER+9, GATHER+10, GATHER2+3*, GATHER2+8*, GATHER2+9, EOJ+5! |
>> BDPDP | PROV+2* |
BDPED | START+1~ |
BDPG | CHKPROV+1~, CHKPROV+2*, CHKPROV+5*, CHKPROV+8*, CHKPROV+9 |
>> BDPI | CHG+12*, RMDP+4* |
BDPLINE | EN+2!, INIT+3, GATHER+3*, GATHER+6*, GATHER+12, GATHER2+4*, GATHER2+7*, GATHER2+11, EXIT+4, EXIT+5 , EXIT+6, EXIT+7, EOJ+5! |
>> BDPNAME | GATHER+4*, GATHER+5, GATHER2+5*, GATHER2+6 |
BDPP | END+2! |
BDPPAT | CHG+14*, CHG+18, RMDP+6*, ADDDP+3*, ADDDP+6*, ADDDP1+4, ADDDP1+18, EXIT+1! |
BDPPC | EXIT+1! |
BDPPIEN | PROV+5*, PROV+6, PPEP~, PPEP+1, HDR+2, GATHER+2, ADDDP1+8, ADDDP1+10, ADDDP1+14, ADDDP1+18 , GATHER2+3 |
>> BDPPROV | CHG+10*, CHG+11, CHG+16, CHG+17, CHG+18 |
BDPQ | CHKPROV+1~, CHKPROV+2*, ADDDP1+4, ADDDP1+7*, ADDDP1+9* |
BDPQUIT | END+2! |
>> BDPR | CHG+12*, CHG+13, CHG+14, CHG+15, RMDP+4*, RMDP+5, RMDP+6, RMDP+7 |
BDPR0 | START+1~ |
BDPR1 | EXIT+1! |
BDPRCNT | EN+2!, GATHER+3*, GATHER+6*, GATHER+12, GATHER2+4*, GATHER2+7*, GATHER2+11, EOJ+5! |
>> BDPSANS | GATHER1+2*, BDPASK+4*, EXIT+4, EXIT+5, EXIT+6, EXIT+7 |
>> BDPTYPE | CHG+15*, CHG+16, CHG+17, CHG+18, RMDP+7*, ADDDP1*, ADDDP1+3*, ADDDP1+4, ADDDP1+5, ADDDP1+10 , ADDDP1+14, ADDDP1+18 |
BDPV | START+1~, START+3! |
BDPW | END+2! |
BDPX | START+1~, EN+2!, GATHER+5*, GATHER+7, GATHER+11, GATHER+12, GATHER2+6*, GATHER2+8, GATHER2+10, GATHER2+11 , EXIT+1!, EOJ+5! |
BDPY | START+1~ |
D | START+2~ |
DA | PROV+3!, CHKPROV+11!, CHG+3!, CHG+8!, RMDP+1!, GETTYPE+2!, HS+2!, ADDDP+4!, ADDDP1+1!, ADDDP1+8! , BDPASK+2!, EOJ+4! |
DDS | EOJ+4! |
DDSFILE | EOJ+3! |
DFN | START+1~, HS+1*, HS+4*, HS+5, HS+8, EXIT+1!, EOJ+2! |
DIADD | PROV+3!, CHG+8!, HS+2!, ADDDP+4! |
DIC | PROV+3*!, CHG+7*, CHG+8!, GETTYPE+2*!, HS+2*!, ADDDP+4*!, EOJ+4! |
DIC("A" | PROV+3*, CHG+7* |
DIC("B" | CHG+7* |
DIC(0 | PROV+3*, CHG+7*, GETTYPE+2*, HS+2*, ADDDP+4* |
DIPGM | EOJ+3! |
DIR | CHKPROV+10~, CHKPROV+11!, ADDDP1+1!, ADDDP1+6!, ADDDP1+8!, BDPASK+2!, PAUSE+1! |
DIR("?" | BDPASK+2* |
DIR("A" | CHKPROV+11*, CHG+3*, RMDP+1*, ADDDP1+1*, ADDDP1+8*, BDPASK+2*, PAUSE+1* |
DIR("B" | CHKPROV+11*, ADDDP1+8*, BDPASK+2* |
DIR(0 | CHKPROV+11*, CHG+3*, RMDP+1*, ADDDP1+1*, ADDDP1+8*, BDPASK+2*, PAUSE+1* |
>> DIRUT | CHG+3*, CHG+5, RMDP+1*, RMDP+3, ADDDP1+2, PAUSE+1* |
DLAYGO | PROV+3!, CHG+8!, HS+2!, ADDDP+4! |
DR | PROV+3!, CHG+8!, HS+2!, ADDDP+4!, EOJ+4! |
>> DUOUT | CHG+3, RMDP+1, PAUSE+1 |
DUZ | CHG+7 |
DUZ(2 | GATHER+9, GATHER+10, GATHER2+9 |
I | EXIT+4!, EXIT+5!, EXIT+6!, EXIT+7! |
IOF | START+4, ADDDP+2 |
IOM | CTR+1 |
PROV | CHKPROV~, CHKPROV+3, CHKPROV+6 |
R | START+2~ |
U | CHKPROV+6, HDR+2, GATHER+2, GATHER+7, GATHER+9, GATHER+10, CHG+7, CHG+14, CHG+15, CHG+17 , RMDP+6, RMDP+7, HS+9, ADDDP1+4, ADDDP1+5, ADDDP1+8, ADDDP1+10, ADDDP1+14, GATHER2+3, GATHER2+8 , GATHER2+9 |
VALM | EOJ+7! |
VALMAR | EOJ+7! |
VALMBCK | EXIT+3*, EOJ+7! |
VALMBG | EOJ+7! |
VALMCAP | EOJ+7! |
VALMCC | EOJ+7! |
VALMCNT | INIT+3*, EXIT+4*, EXIT+5*, EXIT+6*, EXIT+7*, EOJ+7! |
VALMCOFF | EOJ+7! |
VALMCON | EOJ+7! |
VALMEVL | EOJ+7! |
VALMHDR | EOJ+7! |
VALMHDR(1 | HDR+1* |
VALMHDR(2 | HDR+2* |
VALMHDR(3 | HDR+3* |
VALMHDR(4 | HDR+4* |
VALMHDR(5 | HDR+5* |
VALMIOXY | EOJ+7! |
VALMKEY | EOJ+7! |
VALMLFT | EOJ+7! |
VALMLST | EOJ+7! |
VALMMENU | EOJ+7! |
VALMON | EOJ+7! |
>> VALMSG | INIT+1* |
VALMSGR | EOJ+7! |
VALMUP | EOJ+7! |
VALMVAR | EOJ+7! |
VALMWD | EOJ+6, EOJ+7! |
X | PROV+6*, CHKPROV+1~, CHKPROV+3*, CHKPROV+4, CTR~, CTR+1, CHG+11*, CHG+18*, GETTYPE+2*, ADDDP1+4* , ADDDP1+5, ADDDP1+18*, HELP+1*, EXIT+4!, EXIT+5!, EXIT+6!, EXIT+7!, EOJ+4! |
Y | PROV+4, PROV+5, CHKPROV+1~, CHKPROV+13, CTR~, CTR+1, GATHER+6*, GATHER+8*, GATHER+9*, GATHER+10* , GATHER+11*, GATHER+12, CHG+4, CHG+6, CHG+9, CHG+10, RMDP+2, RMDP+4, GETTYPE+3, GETTYPE+4 , HS+3, HS+4, HS+5*, ADDDP+5, ADDDP+6, ADDDP1+3, ADDDP1+9, BDPASK+3, BDPASK+4, GATHER2+7* , GATHER2+9*, GATHER2+10*, GATHER2+11, EXIT+4!, EXIT+5!, EXIT+6!, EXIT+7!, EOJ+3!, EOJ+4! |
Z | EXIT+4!, EXIT+5!, EXIT+6!, EXIT+7! |