APCDFPPV ; IHS/CMI/LAB - PRINT UNCODED DX ;
Source file <APCDFPPV.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 4 | ^%DT ^DIC EN^DIQ ^DIR |
Kernel | 3 | ^%ZIS ^%ZISC ^%ZTLOAD |
DRG Grouper | 1 | ($$ICDDX,$$ICDOP)^ICDEX |
IHS Patient | 1 | ^AUPNPAT |
IHS VA Utilities | 1 | ($$VAL,$$VALI)^XBDIQ1 |
Patient Care Component Reports | 1 | ($$LOCENC,$$PRIMPROV)^APCLV |
Name | Comments | DBIA/ICR reference |
---|---|---|
OPER(V) | ;
|
|
LOC | ;
|
|
CHKDATE | ;
|
|
GETCODE | ;
|
|
TSKMN | ;
|
|
DOC | ;
; need to change to go thru PT node of ICD9 and ; fix all files in the 9000001-9000099 range. |
|
CHKPRV | ;
|
|
DATE | ;
|
|
FILE | ;WHICH FILE?
|
|
;
|
||
NONE | ;
|
|
PRT | ;
|
|
HEAD | ;
|
|
EN | ; Entry point if for taskman.
|
|
ZIS | ;
|
|
O | ;one community
|
|
S | ;all communities within APCDSU su
|
|
XIT | ||
CHKLOC | ;
|
|
SUBHEAD | ;
|
|
HEAD1 | ;
|
|
PROV | ;
|
|
PROC | ;
|
Name | Field # of Occurrence |
---|---|
^%DT | EN+1 |
^%ZIS | ZIS+11 |
^%ZISC | XIT+4 |
^%ZTLOAD | TSKMN+3 |
$$LOCENC^APCLV | PRINT+17 |
$$PRIMPROV^APCLV | CHKPRV+4, PRINT+18 |
^AUPNPAT | PRINT+10 |
^DIC | PROV+7, O+1, S+1 |
EN^DIQ | PRINT+15 |
^DIR | LOC+3, DATE+5, DATE+8, PROV+3, FILE+3, HEAD+2 |
$$ICDDX^ICDEX | ZIS+1, ZIS+3, GETCODE+2, GETCODE+3 |
$$ICDOP^ICDEX | ZIS+5, ZIS+6, GETCODE+9, GETCODE+10 |
$$VAL^XBDIQ1 | S+1, PRINT+19, PRINT+20, PRINT+21 |
$$VALI^XBDIQ1 | CHKLOC+5, CHKLOC+10, PRINT+8, PRINT+9 |
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 |
|
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 |
^AUTTLOC - [#9999999.06] | Classic Fileman Calls |
^AUTTSU - [#9999999.22] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^APCDFORM - [#9001001.5] | OPER+6 |
^APCDFORM("AB" | OPER+4, OPER+5 |
^AUPNPAT - [#9000001] | PRINT+12 |
^AUPNPROB - [#9000011] | CHKLOC+3, CHKLOC+5, PRT+2, PRT+3, PRINT+19, PRINT+20, PRINT+21 |
^AUPNVSIT - [#9000010] | CHKLOC+9, CHKLOC+10, OPER+4, OPER+5, OPER+7, CHKDATE+3 |
^DD("DD" | EN+1, PRINT+11 |
^DIC - [#1] | DATE+2, PROC+3, PRINT+6, PRINT+15, NONE+1, SUBHEAD+1 |
^TMP($J | EN+4!, XIT+3!, PRT+4*, PRINT+1, PRINT+3, PRINT+7 |
^VA(200 - [#200] | PRINT+16 |
Name | Line Occurrences |
---|---|
$$OPER | PRINT+16 |
@( | LOC+7 |
CHKDATE | PRT+1 |
CHKLOC | PROC+6, PROC+9 |
CHKPRV | PROC+6, PROC+9 |
DATE | LOC+6, DATE+11 |
FILE | PROV+6 |
HEAD | PRINT+1, PRINT+4, PRINT+13 |
HEAD1 | HEAD+1 |
LOC | LOC+8, DATE+6, DATE+9 |
GETCODE+12 | |
PROC | GETCODE+4, GETCODE+5, GETCODE+6, GETCODE+7, GETCODE+8, GETCODE+11 |
PROV | PROV+7, PROV+8, FILE+4 |
PRT | PROC+6, PROC+9 |
TSKMN | ZIS+13 |
XIT | LOC+4, PROV+4, ZIS+2, ZIS+4, ZIS+7, ZIS+8, ZIS+12, PRINT+1, TSKMN+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %DT | EN+1* |
>> %ZIS | ZIS+11* |
A | XIT+2! |
APCDCODE | ZIS+1*, ZIS+2, ZIS+5*, ZIS+7, GETCODE+2*, GETCODE+9*, XIT! |
>> APCDCODO | ZIS+3*, ZIS+4, ZIS+6*, ZIS+8, GETCODE+3*, GETCODE+10* |
APCDDFN | XIT!, CHKLOC+3, CHKLOC+5, PROC+2*, PROC+6*, PROC+9*, PRT+2, PRT+3, PRT+4, PRINT+7* , PRINT+8, PRINT+9, PRINT+15, PRINT+19, PRINT+20, PRINT+21 |
APCDDOB | XIT!, PRINT+11*, PRINT+14 |
APCDDT | EN+1*, XIT!, HEAD1+3 |
APCDF | XIT! |
APCDFILE | DATE+1*, DATE+2, EN+3*, GETCODE+4*, GETCODE+5*, GETCODE+6*, GETCODE+7*, GETCODE+8*, GETCODE+11*, XIT! , CHKLOC+2, CHKLOC+3, CHKPRV+1, PROC+3, PRT+2, PRT+3, PRT+4, PRINT+3*, PRINT+6, PRINT+7 , PRINT+8, PRINT+9, PRINT+15, PRINT+16, PRINT+17, PRINT+18, PRINT+19, PRINT+20, PRINT+21, NONE+1 , CHKDATE+3, CHKDATE+4, SUBHEAD+1 |
APCDFPPV | XIT+1! |
APCDFUDT | DATE+4*, DATE+7*, DATE+11, XIT+1!, CHKDATE+3, CHKDATE+4 |
APCDFUET | DATE+10*, DATE+11, XIT+1!, CHKDATE+3 |
APCDG | XIT!, CHKLOC+8*, CHKPRV+3*, PROC+4*, PROC+7*, CHKDATE+2*, CHKDATE+4 |
APCDHRN | XIT!, PRINT+12*, PRINT+14 |
APCDL | XIT! |
APCDLOCT | LOC+1!*, LOC+5*, LOC+6, LOC+7, XIT+1!, CHKLOC+4, CHKLOC+5, CHKLOC+9, CHKLOC+10 |
APCDLOCT("ONE" | CHKLOC+4, CHKLOC+9, O+3* |
APCDLOCT("SU" | CHKLOC+5, CHKLOC+10, S+3* |
APCDOK | XIT+1!, CHKLOC+2*, CHKLOC+4*, CHKLOC+5*, CHKLOC+6*, CHKLOC+7*, CHKLOC+11*, CHKPRV+1*, CHKPRV+2*, CHKPRV+5* , PROC+6*, PROC+9*, PRT+1, CHKDATE+1*, CHKDATE+5* |
APCDPG | EN+3*, XIT!, HEAD+1, HEAD1+2*, HEAD1+3 |
APCDPRVT | PROV+1!*, PROV+5*, PROV+6, XIT+1!, CHKPRV+4 |
APCDPRVT("ONE" | PROV+9*, CHKPRV+4 |
APCDQUIT | LOC+8, GETCODE+5, GETCODE+6, GETCODE+7, GETCODE+8, GETCODE+11, XIT!, O+2*, S+2*, PROC+1! , PROC+6, PROC+9, PRINT+3, PRINT+5, PRINT+7, PRINT+13, HEAD+2* |
APCDVCTR | XIT!, PRINT+16* |
APCDVDG | XIT!, CHKLOC+8, CHKPRV+3, PROC+3*, PROC+4, PROC+5, PROC+7, PROC+8, CHKDATE+2 |
APCDVIGR | XIT!, PROC+5*, PROC+6, PROC+8*, PROC+9 |
APCDVSIT | XIT+1!, CHKLOC+1*, CHKLOC+8*, CHKLOC+9, CHKLOC+10, CHKPRV+1*, CHKPRV+3*, CHKPRV+4, PRINT+9*, PRINT+16 , PRINT+17, PRINT+18, CHKDATE+2*, CHKDATE+3 |
>> APCDWFIL | FILE+1*, FILE+5*, GETCODE+4, GETCODE+5, GETCODE+6, GETCODE+7, GETCODE+8, GETCODE+11 |
AUPNDAYS | XIT+1! |
AUPNDOB | XIT+1!, PRINT+11 |
AUPNDOD | XIT+1! |
AUPNPAT | XIT+1!, PRINT+12 |
AUPNSEX | XIT+1!, PRINT+14 |
D | OPER+3~, OPER+4*, OPER+5, OPER+6 |
D0 | XIT+2! |
D1 | XIT+2! |
D2 | XIT+2! |
DA | LOC+3!, DATE+5!, DATE+8!, PROV+3!, PROV+7!, FILE+3!, XIT+2!, PRINT+15*! |
DIC | PROV+7!*, XIT+2!, O+1*!, S+1*!, PRINT+15*! |
DIC("A" | PROV+7*, O+1*, S+1* |
DIC("B" | S+1* |
DIC(0 | PROV+7*, O+1*, S+1* |
DIE | XIT+2! |
DIQ | XIT+2! |
DIR | LOC+3!, DATE+5!, DATE+8!, PROV+3!, FILE+3!, HEAD+2! |
DIR("A" | LOC+2*, LOC+3*, DATE+5*, DATE+8*, PROV+2*, PROV+3*, FILE+3* |
DIR("B" | LOC+2*, LOC+3*, PROV+2*, PROV+3*, FILE+3* |
DIR(0 | LOC+2*, DATE+5*, DATE+8*, PROV+2*, FILE+2*, HEAD+2* |
>> DIRUT | LOC+4, DATE+6, DATE+9, PROV+4, FILE+4 |
DK | XIT+2! |
DL | XIT+2! |
DR | XIT+2!, PRINT+15*! |
>> DTOUT | HEAD+2 |
DUZ(2 | S+1, PRINT+12 |
DX | XIT+2! |
IO | EN+2, HEAD+2 |
IO("Q" | ZIS+9!, ZIS+12!, ZIS+13, XIT! |
IO(0 | HEAD+2 |
>> IOCPU | TSKMN+3 |
IOF | HEAD1+2 |
ION | TSKMN+3 |
IOSL | PRINT+13 |
IOST | HEAD+2 |
M | OPER+3~, OPER+5*, OPER+6 |
POP | ZIS+12, XIT+2! |
S | XIT+2! |
U | DATE+2, ZIS+1, ZIS+3, ZIS+5, ZIS+6, GETCODE+2, GETCODE+3, GETCODE+9, GETCODE+10, CHKLOC+3 , CHKLOC+5, CHKLOC+8, CHKLOC+9, CHKLOC+10, CHKPRV+3, PRT+2, PRT+3, PRINT+6, PRINT+12, PRINT+16 , PRINT+19, PRINT+20, PRINT+21, OPER+4, OPER+5, OPER+6, OPER+7, NONE+1, CHKDATE+2, CHKDATE+3 , CHKDATE+4, SUBHEAD+1 |
V | OPER~, OPER+1, OPER+4, OPER+5, OPER+7 |
X | PROV+7, EN+1*, XIT+2! |
Y | LOC+5, DATE+7, DATE+10, PROV+5, PROV+8, PROV+9, FILE+5, EN+1, XIT+2!, CHKLOC+3* , CHKLOC+4, CHKLOC+8*, CHKPRV+3*, O+2, O+3, S+2, S+3, PRINT+8*, PRINT+11*, OPER+3~* , OPER+6*, OPER+7, CHKDATE+2*, HEAD+2 |
>> ZTCPU | TSKMN+3* |
>> ZTDESC | TSKMN+3* |
>> ZTDTH | TSKMN+3* |
>> ZTIO | TSKMN+3* |
>> ZTQUEUED | GETCODE+13 |
>> ZTREQ | GETCODE+13* |
>> ZTRTN | TSKMN+3* |
ZTSAVE | TSKMN+1! |
ZTSAVE("APCD*" | TSKMN+2* |
ZTSAVE("DUZ(2)" | TSKMN+3* |
ZTSK | XIT! |