APCDFH ; IHS/CMI/LAB - LIST MANAGER API'S FOR FAMILY HISTORY AND API FOR REP FACTORS
Source file <APCDFH.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 8 | EN^DDIOL ^DDS ^DIC FILE^DICN ^DIE ^DIK $$GET1^DIQ ^DIR |
Registration | 4 | EN^VALM TERM^VALM0 ($$FTIME,CLEAR,FULL)^VALM1 EN^VALM2 |
IHS VA Utilities | 3 | ($$VAL,$$VALI)^XBDIQ1 ^XBFMK EN^XBNEW |
Kernel | 3 | $$FMTE^XLFDT $$UP^XLFSTR DISP^XQORM1 |
Patient Care Component | 3 | (DELETE,FM1,HS)^APCDFH1 ^APCDFHD (,$$GETNARR)^APCDFHS |
IHS Patient | 2 | ^AUPNPAT $$CONCPT^AUPNVUTL |
DRG Grouper | 1 | $$ICDDX^ICDEX |
Name | Comments | DBIA/ICR reference |
---|---|---|
FP | ;EP - called from d/e input template APCD FP (FP)
|
|
LM | ;
|
|
COND1 | ;
|
|
HDR | ;EP
|
|
ADD1 | ;
|
|
HS | ;EP
|
|
BACK | ;EP -BACK
|
|
ADDFHR | ;
|
|
COND | ;
|
|
RF11 | ;
|
|
GETPAT1 | ||
FH | ;--
|
|
EDITSMDX | ;
|
|
HELP | ;
|
|
RF1 | ;EP
|
|
SET | ;
|
|
EN(P,D) | ;PEP - CALLED FROM OTHER MODULES
|
|
STAT(I,R) | ;
|
|
RFADD(P) | ;PEP - called to add a patient to the Reproductive Factors file
|
|
EN1 | ;
|
|
INIT | ;
|
|
RF | ;EP
|
|
FP1 | ;EP - called from XBNEW call
|
|
EOJ | ;
|
|
ASK | ;
|
|
X1 | ||
GETPAT(PAT) | ;
|
|
C | ||
PAUSE | ;EP
|
|
RHEDIT(P,RETVAL) | ;PEP - called to edit reproductive hx data fields
|
|
EDITREST | ;
|
|
FP11 | ;
|
|
ADD | ;--
|
|
FP12 | ;
|
|
Y | ||
X | ;
|
|
LDM(I) | ;
|
|
EDITX | ;
|
|
EDIT | ;
|
|
REFRESH(PAT) | ;
|
|
ADDX | ;
|
|
EDIT1 | ||
SMDX | ;
|
|
MAIN | ;EP - main routine driver
|
|
FH1 | ||
DELETE | ;
|
Name | Field # of Occurrence |
---|---|
DELETE^APCDFH1 | DELETE+1 |
FM1^APCDFH1 | FP12+1 |
HS^APCDFH1 | HS+1 |
^APCDFHD | C+6 |
^APCDFHS | SMDX+2 |
$$GETNARR^APCDFHS | X+2, X1+5 |
^AUPNPAT | REFRESH+7 |
$$CONCPT^AUPNVUTL | EDITREST+5 |
EN^DDIOL | ADD+5, ADD+7, ADD+8, X+15, C+8, EDIT+1, EDIT1, EDIT1+2, EDIT1+3 |
^DDS | RHEDIT+10 |
^DIC | ASK+4, X+14 |
FILE^DICN | COND1+4, ADDFHR+14, RFADD+11 |
^DIE | ADD1+15, COND1+10, X+6, EDIT+12, EDIT1+20, EDITREST+1, EDITREST+11, EDITREST+14, X1+2, X1+4 , X1+9, X1+11, FP11+1, RF11+1 |
^DIK | EDIT1+22 |
$$GET1^DIQ | FH1, EDITREST+6, X1+11 |
^DIR | ADD+6, ADD1+9, COND+1, C+7, ADDFHR+2, EDIT+20, EDIT1+1, EDIT1+13, EDITREST+7, PAUSE+1 |
$$ICDDX^ICDEX | X+4, X+10, C+3, X1+7 |
EN^VALM | LM+2 |
TERM^VALM0 | REFRESH+1, BACK+1 |
$$FTIME^VALM1 | HDR+3 |
CLEAR^VALM1 | REFRESH+2, LM+2, EOJ+1 |
FULL^VALM1 | ADD+1, EDIT+7 |
EN^VALM2 | EDIT+2 |
$$VAL^XBDIQ1 | GETPAT+9, GETPAT+11, GETPAT1+4, STAT+1, STAT+2, FH+9, FH+12, FH1, FH1+4, FH1+6 , ADD1+5, COND+1, EDIT+19, EDIT1+9, EDIT1+22 |
$$VALI^XBDIQ1 | FH1+2 |
^XBFMK | ADDX+2, EDIT+10 |
EN^XBNEW | EN+3, FP+2, RF+2 |
$$FMTE^XLFDT | FH+4 |
$$UP^XLFSTR | ADDFHR+4, ADDFHR+6 |
DISP^XQORM1 | HELP+2 |
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 |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^AUPNPAT - [#9000001] | Classic Fileman Calls |
^AUPNFH - [#9000014] | Classic Fileman Calls, GET1^DIQ |
^AUPNFHR - [#9000014.1] | Classic Fileman Calls |
^AUPNREP - [#9000017] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNFH - [#9000014] | GETPAT+7, GETPAT+8, GETPAT1, FH1+6, LDM+3, LDM+6, LDM+7, LDM+8, EDIT+18, EDITREST+5 , EDITREST+10, EDITREST+12, X1+1* |
^AUPNFH("AC" | GETPAT+3, GETPAT+6 |
^AUPNFH("AE" | GETPAT1+2, EDIT1+22 |
^AUPNFHR - [#9000014.1] | GETPAT+11, GETPAT+12, GETPAT1+4, GETPAT1+5, GETPAT1+7, FH+2, FH+8, FH+9, FH+11, FH+12 , LDM+6, ADD1+5, COND+1, ADDFHR+6, EDIT+13, EDIT+18, EDIT+19, EDIT1+9 |
^AUPNFHR("AA" | GETPAT+3, GETPAT1+1, ADD1+4, ADD1+13, EDIT1+8, EDIT1+18 |
^AUPNPAT - [#9000001] | REFRESH+4, HDR+5 |
^AUPNREP - [#9000017] | RFADD+6, RHEDIT+8, FP1+2, RF1+2 |
^AUTNPOV - [#9999999.27] | X1+11 |
^AUTTRLSH - [#9999999.36] | GETPAT+12, GETPAT1+5, ADD1+1, ADD1+8, ADD1+13, ADDFHR+2, ADDFHR+7, EDIT1+5, EDIT1+12, EDIT1+18 |
^DD(9000014 | X+13 |
^DPT - [#2] | REFRESH+5, EN+2, HDR+2, HDR+4, RFADD+4, RFADD+5, RHEDIT+5, RHEDIT+6 |
Name | Line Occurrences |
---|---|
$$LDM | FH+2 |
$$RFADD | RHEDIT+8, FP1+2, RF1+2 |
$$STAT | FH+6 |
ADD1 | ADD1+14 |
ADDFHR | ADD1+6, ADD1+11, ADD1+13, EDIT1+10, EDIT1+15, EDIT1+18 |
ADDX | ADD1+1, COND+2, COND+3 |
ASK | MAIN+1 |
BACK | ADD+7, ADD+8, ADD1+1, COND+2, COND+3, EDIT+1, EDIT+3, EDIT+4, EDIT+11, EDIT+23 , EDIT1+2, EDIT1+3, EDIT1+5, EDIT1+19, EDITREST+12, EDITREST+16 |
COND | Y, Y+1, X+18, EDIT+14, EDITREST+4 |
EDIT1 | EDIT+16 |
EDITREST | EDIT+24 |
EDITSMDX | EDITREST+9 |
EDITX | EDIT1+19 |
FH | GETPAT1+13 |
FH1 | FH+7 |
GETPAT | INIT+2 |
GETPAT1 | GETPAT+9 |
HDR | BACK+4 |
INIT | BACK+3 |
LM | REFRESH+8 |
PAUSE | ADD+7, ADD+8, ADD1+1, COND+2, EDIT+13, X1 |
REFRESH | MAIN+3, EN1+3 |
SET | FH+5, FH+6, FH+10, FH+13, FH1+1, FH1+3, FH1+5, FH1+6 |
SMDX | COND+6, EDITSMDX+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> A | C+2* |
APCDADD | ADD+2!, EDITREST+4!, EDITREST+17!, EDITX+1! |
APCDAICD | COND+5! |
APCDAICD( | X+8, X+10 |
>> APCDCI | Y, COND1+3, SMDX+1*, C, EDITREST+10*, X1, X1+9 |
>> APCDCNT | GETPAT+2* |
>> APCDDATE | EN1+2* |
>> APCDDI | COND1+3, X+5, SMDX+1*, EDITREST+10*, X1+8, X1+9, X1+11 |
>> APCDF | EN1+1*, ASK+6* |
APCDFH | COND1+6*, COND1+10, X+6, X+9, ADDX+1!, EOJ+3! |
APCDFHA | GETPAT+1!, EOJ+2! |
APCDFHA( | SET+1* |
APCDFHA("IDX" | SET+1*, EDIT+6 |
APCDFHA(1 | GETPAT+4* |
APCDFHI | EDIT+5*, EDIT+6*, EDIT+11, EDIT+16, EDIT+17, EDIT+18, EDIT+21!, EDIT1+20, EDITREST+4, EDITREST+5 , EDITREST+6, EDITREST+10, EDITREST+11, EDITREST+12, EDITREST+14, X1+1, X1+2, X1+4, X1+9, X1+11 , EDITX+1! |
APCDFHR | GETPAT+1!, ADD1+12*, ADD1+13*, ADD1+14, ADD1+15, COND+1, COND1+3, ADDX+1!, ADDFHR+1*, ADDFHR+10* , ADDFHR+16*, EDIT+14*, EDIT1+16*, EDIT1+18*, EDIT1+19, EDIT1+21, EDIT1+23, EDITX+1! |
APCDICD | ADD+2!, COND+5*, Y+1, COND1+3, X+4, SMDX+1*, C+3*, C+9*, ADDX+1!, X1+2 , X1+7, EOJ+3! |
>> APCDIEN | SET+1, GETPAT+6*, GETPAT+7, GETPAT+8, GETPAT+9, GETPAT1, GETPAT1+13*, FH+2, FH+6, FH1 , FH1+2, FH1+4, FH1+6 |
>> APCDLDM | FH+2*, FH+4 |
>> APCDLINE | SET+1*, GETPAT+2*, INIT+4 |
APCDOR | EDIT+18*, EDIT+21! |
APCDOREL | EDIT+15*, EDIT+18*, EDIT+21!, EDITX+1! |
APCDOVRR | COND1+8*, X+16!, ADDX+1!, EDITREST+2*, EDITREST+15!, EDITX+1! |
APCDP | EDIT+4*!, EDIT+6, EDIT+21! |
>> APCDPARS | FP1+1*, RF1+1* |
>> APCDPAT | MAIN+2, MAIN+3, EN1+1*, ASK+3*, ASK+6*, INIT+2, ADD1+4, ADD1+13, COND1+3, ADDFHR+13 , EDIT1+8, EDIT1+18 |
>> APCDPT | SMDX+1* |
APCDR | ADD1+3!, ADDX+1!, EDIT1+7! |
APCDR( | ADD1+5*, ADD1+7, ADD1+12, ADDFHR+6, EDIT1+9*, EDIT1+11, EDIT1+16, EDIT1+17 |
>> APCDRCNT | SET+1, GETPAT+2*, GETPAT+5*, FH+1*, FH+4, EDIT+1 |
APCDREL | ADD+3!, ADD+9*, ADD1+1, ADD1+4, ADD1+8, ADD1+13, ADDX+1!, ADDFHR+2, ADDFHR+6, ADDFHR+7 , ADDFHR+13, EDIT1+4*, EDIT1+5, EDIT1+8, EDIT1+12, EDIT1+18 |
>> APCDRELD | ADDFHR+4*, ADDFHR+6, ADDFHR+7, ADDFHR+13 |
APCDRELI | EDIT+5*, EDIT+6*, EDIT+11, EDIT+12, EDIT+13, EDIT+14, EDIT+16, EDIT+17, EDIT+19, EDIT+21! , EDIT1+17*, EDIT1+21, EDIT1+22, EDIT1+23*, EDITREST+1, EDITX+1! |
>> APCDREPI | FP+1*, FP1+2, FP11+1, RF+1*, RF1+2, RF11+1 |
>> APCDRFS | FP1+1*, RF1+1* |
APCDSEC | ADD+4*, COND+1, X+17*, ADDX+1!, EDIT+14*, EDITREST+4* |
APCDTFH | GETPAT+1! |
APCDTFH( | GETPAT1*, GETPAT1+7*, GETPAT1+8, GETPAT1+9, GETPAT1+10, GETPAT1+11, GETPAT1+12, GETPAT1+13 |
>> APCDX | SET+1, FH+1*, FH+4*, FH+6*, FH+9*, FH+12*, FH1*, FH1+2*, FH1+4*, FH1+6* , X+8*, X+10 |
AUPNADD | EOJ+3! |
>> AUPNDOB | HDR+3 |
AUPNLK | ASK+7! |
AUPNLK("INAC" | ASK+2* |
>> AUPNPAT | HDR+2, HDR+4, HDR+5 |
>> C | GETPAT1+11*, ADD1+3*, ADD1+5*, ADD1+6, ADD1+8, EDIT1+7*, EDIT1+9*, EDIT1+10, EDIT1+12 |
D | EN~, EN1+2, GETPAT1+12*, GETPAT1+13, LDM+4~, LDM+5*, LDM+6*, LDM+7*, LDM+8*, LDM+9 |
D0 | COND1+5!, ADDFHR+15!, ADDFHR+17!, RFADD+7~, RFADD+9! |
DA | ADD+6!, ADD1+9!, ADD1+15*!, COND+1!, COND1+1!, COND1+5!, COND1+10*!, X+6*!, X+14!, C+7! , ADDX+1!, ADDFHR+2!, ADDFHR+11!, ADDFHR+15!, ADDFHR+17!, EDIT+12*!, EDIT+20!, EDIT1+1!, EDIT1+13!, EDIT1+20*! , EDIT1+22*, EDITREST+1*!, EDITREST+7!, EDITREST+11*!, EDITREST+14*!, EDITREST+15!, X1+2*!, X1+4*!, X1+9*!, X1+11*! , EDITX+1!, RHEDIT+9~, RHEDIT+10*, FP+1, FP11+1*, FP11+2!, RF+1, RF11+1*, RF11+2! |
DA(1 | X+9*, X+11 |
DD | COND1+2!, COND1+5!, ADDFHR+12!, ADDFHR+15!, ADDFHR+17!, RFADD+7~, RFADD+9! |
DDS | RHEDIT+9~ |
>> DDSFILE | RHEDIT+10* |
>> DFN | REFRESH+3* |
DIADD | ADDFHR+11!, ADDFHR+13*, ADDFHR+15!, ADDFHR+17! |
DIC | ASK+4*!, COND1+1!, COND1+3*, COND1+5!, X+11*, X+14!, ADDFHR+11!, ADDFHR+13*, ADDFHR+15!, ADDFHR+17! , RFADD+7~, RFADD+8* |
DIC("DR" | COND1+3*, ADDFHR+13* |
DIC("P" | X+13* |
DIC(0 | ASK+4*, COND1+3*, X+12*, ADDFHR+13*, RFADD+8* |
DIE | ADD1+15*!, COND1+5!, COND1+10*!, X+6*!, EDIT+12*!, EDIT1+20*!, EDITREST+1*!, EDITREST+11*!, EDITREST+14*!, EDITREST+15! , X1+2*!, X1+4*!, X1+9*!, X1+11*!, EDITX+1!, FP11+1*, FP11+2!, RF11+1*, RF11+2! |
DIE("NO^" | EDITREST+1* |
>> DIK | EDIT1+22* |
>> DIMSG | RHEDIT+11 |
DINUM | RFADD+9!, RFADD+10* |
DIR | ADD+3!, ADD1+9!, COND+1!, X+16!, C+7!, ADDX+1!, ADDFHR+2!, EDIT+20!, EDIT1+13!, EDITREST+7! , BACK+5!, PAUSE+1! |
DIR("A" | ADD+6*, ADD1+9*, COND+1*, C+7*, ADDFHR+2*, EDIT+20*, EDIT1+1*, EDIT1+13*, EDITREST+7*, PAUSE+1* |
DIR("B" | ADD1+9*, COND+1*, EDIT+20*, EDIT1+13*, EDITREST+7* |
DIR(0 | ADD+6*, ADD1+9*, COND+1*, C+7*, ADDFHR+2*, EDIT+20*, EDIT1+1*, EDIT1+13*, EDITREST+7*, PAUSE+1* |
>> DIRUT | ADD+7, ADD1+10, COND+2, C+8, EDIT+21, EDIT+23, EDIT1+2, EDIT1+14, EDITREST+8, PAUSE+1* |
DLAYGO | ADDFHR+11!, ADDFHR+13*, ADDFHR+15!, ADDFHR+17! |
DO | COND1+2!, COND1+5!, ADDFHR+12!, ADDFHR+15!, ADDFHR+17!, RFADD+7~, RFADD+9! |
DR | ADD1+15*!, COND1+1!, COND1+5!, COND1+10*!, X+6*!, ADDX+1!, ADDFHR+11!, ADDFHR+15!, ADDFHR+17!, EDIT+12*! , EDIT1+20*!, EDITREST+1*!, EDITREST+11*!, EDITREST+14*!, EDITREST+15!, X1+2*!, X1+4*!, X1+9*!, X1+11*!, EDITX+1! , RHEDIT+10*, FP11+1*, FP11+2!, RF11+1*, RF11+2! |
DT | X+4, X1+7 |
>> DUOUT | PAUSE+1 |
DUZ(2 | HDR+5 |
E | LDM+4~, LDM+7*, LDM+8* |
>> G | ADDFHR+6*, ADDFHR+9 |
I | STAT~, STAT+2, LDM~, LDM+1, LDM+2, LDM+3, LDM+6, LDM+7, LDM+8, BACK+6! |
J | LDM+4~, LDM+6* |
>> N | ADD1+8*, ADD1+9, ADD1+11, EDIT1+12*, EDIT1+13, EDIT1+15 |
>> O | GETPAT+8*, GETPAT+9*, GETPAT+12*, GETPAT+13*, GETPAT1, GETPAT1+5*, GETPAT1+6*, GETPAT1+7, GETPAT1+8*, GETPAT1+9 , GETPAT1+10, GETPAT1+11, GETPAT1+12, GETPAT1+13 |
P | EN~, EN+1, EN+2, EN1+1, EN1+3, RFADD~, RFADD+3, RFADD+4, RFADD+5, RFADD+6 , RFADD+8, RHEDIT~, RHEDIT+4, RHEDIT+5, RHEDIT+6, RHEDIT+8, RHEDIT+10 |
PAT | REFRESH~, REFRESH+3, REFRESH+4, REFRESH+5, REFRESH+6, GETPAT~, GETPAT+3, GETPAT+6, GETPAT1+1 |
>> Q | ADD1+1, ADD1+2*, ADD1+10*, EDIT1+5, EDIT1+6*, EDIT1+14* |
R | SET+1, GETPAT+8*, GETPAT+9*, GETPAT+11, GETPAT+12, GETPAT1, GETPAT1+3*, GETPAT1+4, GETPAT1+5, GETPAT1+7 , GETPAT1+11*, GETPAT1+12, GETPAT1+13, STAT~, STAT+1, FH+2, FH+6, FH+7, FH+8, FH+9 , FH+11, FH+12 |
RETVAL | RHEDIT~, RHEDIT+4*, RHEDIT+5*, RHEDIT+6*, RHEDIT+8*, RHEDIT+11*, RHEDIT+12* |
>> S | GETPAT+9*, GETPAT+10*, GETPAT+11*, GETPAT1, GETPAT1+4*, GETPAT1+7, GETPAT1+9*, GETPAT1+10, GETPAT1+11, GETPAT1+12 , GETPAT1+13 |
U | SET+1, GETPAT+8, GETPAT+11, GETPAT+12, GETPAT1, GETPAT1+4, GETPAT1+5, GETPAT1+7, FH+2, FH+8 , FH+9, FH+11, FH+12, FH1+6, LDM+6, LDM+7, LDM+8, HDR+2, HDR+4, HDR+5 , ADD1+1, ADD1+5, ADD1+7, ADD1+8, ADD1+12, ADD1+13, COND+1, X+4, X+10, C+3 , ADDFHR+2, ADDFHR+6, ADDFHR+7, EDIT+6, EDIT+18, EDIT+19, EDIT1+5, EDIT1+9, EDIT1+11, EDIT1+12 , EDIT1+16, EDIT1+17, EDIT1+18, EDITREST+5, EDITREST+10, X1+1, X1+7, X1+11, RFADD+5, RHEDIT+6 , FP1+2, RF1+2 |
V | RHEDIT+7~, RHEDIT+8* |
>> VALMBCK | BACK+2* |
>> VALMCC | LM+1* |
>> VALMCNT | INIT+4* |
VALMHDR | HDR+1!, INIT+3! |
VALMHDR(1 | HDR+2*, HDR+3*, HDR+4*, HDR+5* |
>> VALMSG | INIT+1* |
VALMY | EDIT+3, EDIT+4!, EDIT+21! |
VALMY(0 | EDIT+4 |
X | GETPAT1+1*, ADD1+4*, ADD1+5, ADD1+7*, COND1+3*, X+10*, ADDFHR+3, ADDFHR+6*, ADDFHR+13*, EDIT+6* , EDIT1+8*, EDIT1+9, EDIT1+11*, X1+11*, BACK+6!, HELP+1*, RFADD+7~, RFADD+8*, RFADD+10, FP1+2* , RF1+2* |
XQORNOD | EDIT+4!, EDIT+21! |
XQORNOD(0 | EDIT+2 |
Y | REFRESH+6*, GETPAT1+1*, GETPAT1+2, GETPAT1+3, ASK+5, ASK+6, ADD+8, ADD+9, ADD1+11, ADD1+12 , COND+3, COND1+6, COND1+7!, X+2*, X+3, X+4*, X+5*, X+6, C+9, ADDFHR+4 , ADDFHR+6*, ADDFHR+15, ADDFHR+16, EDIT+6*, EDIT+16*, EDIT+24, EDIT1+3, EDIT1+4, EDIT1+15, EDIT1+16 , EDIT1+17, EDITREST+9, X1+5*, X1+6, X1+7*, X1+8*, X1+9, BACK+6!, RFADD+7~, RFADD+12 , FP+3!, FP12+2!, RF+3!, RF11+3! |
Z | GETPAT+9*, GETPAT+10*, GETPAT+11*, GETPAT1, GETPAT1+4*, GETPAT1+7, GETPAT1+10*, GETPAT1+11, GETPAT1+12, GETPAT1+13 , FH+4, BACK+6! |
Name | Field # of Occurrence |
---|---|
$T(^APCDFHD | C+6 |