APCDDVC ; IHS/CMI/LAB - VISIT REVIEW REPORT ;
Source file <APCDDVC.m>
Package | Total | Call Graph |
---|---|---|
Patient Care Component | 2 | PPPV^APCDR00 (,ZERO)^APCDRV |
VA Fileman | 1 | ^DIC |
Name | Comments | DBIA/ICR reference |
---|---|---|
ALL | ; Entry point to do all reports
|
|
PPPV | ; See if Purpose of Visit and Providers entered correctly
|
|
XIT | ; Clean up and exit.
|
|
SETARR | ||
TXER | ; Create transaction error report
|
|
SETTXER | ;
|
|
INPT | ;
|
|
ZERO | ; If no dependent entries, save information.
|
|
GETCHART | ;get chart number
|
|
C2 | ||
MRG | ; FOR CALLER PASSING VISIT DATE
|
|
SETTXER1 | ||
CHKCLN | ;
|
FileNo | Call Tags |
---|---|
^DIC(40.7 - [#40.7] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^APCDERR - [#9001001.3] | PPPV+7, SETTXER+2, INPT+10 |
^AUPNPAT - [#9000001] | GETCHART+2, GETCHART+3, GETCHART+4 |
^AUPNVSIT - [#9000010] | PPPV+5, MRG+7, MRG+8, SETARR, TXER+7, INPT+7 |
^AUPNVSIT("AC" | MRG+8 |
^XTMP("APCDDV" | ZERO+3*, PPPV+7*, MRG+5, CHKCLN+5*, SETTXER1*, SETTXER1+1*, SETTXER1+2*, INPT+10* |
Name | Line Occurrences |
---|---|
C2 | GETCHART+4 |
CHKCLN | MRG+10 |
GETCHART | ZERO+3, PPPV+6, MRG+4, TXER+8, INPT+10 |
INPT | ALL+1 |
MRG | ALL+1 |
PPPV | ALL+1 |
SETARR | MRG+8 |
SETTXER | TXER+8 |
SETTXER1 | SETTXER+1 |
TXER | ALL+1 |
XIT | ZERO+4, PPPV+8, MRG+11, TXER+9, INPT+11 |
ZERO | ALL+1 |
Name | Field # of Occurrence |
---|---|
^(0 | GETCHART+2, GETCHART+3, MRG+7, MRG+8, SETARR, SETTXER+2, INPT+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> APCDBT | ZERO+3, PPPV+7, MRG+5, CHKCLN+5, SETTXER1, SETTXER1+1, SETTXER1+2, INPT+10 |
APCDCAT | MRG+7*, MRG+8, XIT+1! |
>> APCDCLIN | ZERO+3, PPPV+7, MRG+5, CHKCLN+5, SETTXER1, SETTXER1+1, SETTXER1+2, INPT+10 |
>> APCDCLN | CHKCLN+2* |
>> APCDCLOC | GETCHART+1*, GETCHART+2*, GETCHART+3*, GETCHART+4*, GETCHART+5*, ZERO+3, PPPV+7, MRG+5, CHKCLN+5, SETTXER1 , SETTXER1+1, SETTXER1+2, INPT+10 |
>> APCDCNTR("INPT" | INPT+9* |
>> APCDCNTR("MRG" | CHKCLN+4* |
>> APCDCNTR("PPPV" | PPPV+6* |
>> APCDCNTR("TXER" | TXER+8* |
>> APCDCNTR("ZERO" | ZERO+3* |
APCDCODE | SETTXER+1*, SETTXER+2*, SETTXER1, SETTXER1+1, SETTXER1+2, XIT+1! |
>> APCDCSRT | C2+1 |
APCDDC | MRG+7*, MRG+8, XIT+1! |
>> APCDDCHS | TXER+5*, TXER+6* |
>> APCDDV("VREC" | GETCHART+2, PPPV+1, PPPV+2, MRG+1, MRG+2, MRG+3, TXER+1, INPT+1, INPT+2, INPT+3 |
APCDEC | ZERO+2*, PPPV+4*, TXER+3*, INPT+6*, XIT+1! |
APCDERR | ZERO+1!, ZERO+3, PPPV+3!, PPPV+6, TXER+2!, TXER+8, INPT+5!, INPT+8, XIT+1! |
APCDERR( | PPPV+6, PPPV+7, TXER+8, SETTXER+1, SETTXER+2, SETTXER1, SETTXER1+1, SETTXER1+2, INPT+10 |
APCDERR("B" | SETTXER+1 |
APCDF | CHKCLN+1*, CHKCLN+2*, CHKCLN+3, XIT+1! |
>> APCDHRN | GETCHART+2*, GETCHART+3*, GETCHART+4*, GETCHART+5*, C2+2*, ZERO+3, PPPV+7, MRG+5, CHKCLN+5, SETTXER1 , SETTXER1+1, SETTXER1+2, INPT+10 |
APCDI | MRG+7*, MRG+10, SETARR*, CHKCLN+1, CHKCLN+2, CHKCLN+5, XIT+1! |
APCDII | CHKCLN+1*, CHKCLN+2*, CHKCLN+5*, XIT+1! |
APCDJ | CHKCLN+2*, XIT+1! |
>> APCDJOB | ZERO+3, PPPV+7, MRG+5, CHKCLN+5, SETTXER1, SETTXER1+1, SETTXER1+2, INPT+10 |
APCDKT | MRG+6!, MRG+9, XIT+1! |
APCDKT( | SETARR*, CHKCLN+1, CHKCLN+2, CHKCLN+5 |
APCDLOC | MRG+7*, MRG+8, XIT+1! |
APCDMSG | SETTXER+1*, SETTXER+2*, SETTXER1, SETTXER1+1, SETTXER1+2, XIT+1! |
APCDPAFF | XIT+1! |
APCDPAT | MRG+7*, MRG+8, XIT+1! |
APCDPCOD | XIT+1! |
APCDPDIS | XIT+1! |
APCDPPRV | XIT+1! |
APCDTYPE | MRG+7*, MRG+8, XIT+1! |
APCDV | MRG+7*, MRG+8*, SETARR, XIT+1! |
APCDVREC | PPPV+5*!, TXER+7*!, INPT+7*! |
>> APCDVSIT | ZERO+3, PPPV+5, PPPV+7, MRG+5, MRG+7, CHKCLN+5, TXER+7, SETTXER1, SETTXER1+1, SETTXER1+2 , INPT+7, INPT+10 |
>> APCDX | PPPV+6*, PPPV+7, TXER+8*, SETTXER+1, SETTXER+2, SETTXER1, SETTXER1+1, SETTXER1+2, INPT+10* |
>> DFN | GETCHART+2, GETCHART+3, GETCHART+4 |
DIC | TXER+4*! |
DIC(0 | TXER+4* |
DUZ(2 | GETCHART+3, GETCHART+5 |
U | GETCHART+2, GETCHART+3, GETCHART+4, PPPV+1, PPPV+2, PPPV+7, MRG+1, MRG+2, MRG+3, MRG+7 , MRG+8, SETARR, CHKCLN+1, CHKCLN+2, TXER+1, SETTXER+2, INPT+1, INPT+2, INPT+3, INPT+10 |
>> X | TXER+4* |
>> Y | TXER+5 |