©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ADGCALLS ; IHS/ADC/PDW/ENM - PCC LINK ; [ 06/05/2002 1:14 PM ]
Source file <ADGCALLS.m>
| Package | Total | Call Graph |
|---|---|---|
| Patient Care Component | 8 | ^APCDALV ^APCDALVR ^APCDCVDT ^APCDEA3 ^APCDEIN EN1^APCDEKL ^APCDVCHK ^APCDVDLT |
| Patient Care Component Reports | 2 | ^APCLYV31 ^APCLYV32 |
| VA Fileman | 1 | ^DIE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| APCDEIN | ;EP; -- initialize PCC variables
|
|
| APCDALV | ;EP; -- create visit
|
|
| APCDEA3 | ;EP;***> call to PCC Data Entry rtns
|
|
| APCDEKL | ;EP; -- cleanup variables
|
|
| ERR | ; -- error processor
|
|
| IDP() | ; -- inverse date (dgpmp)
|
|
| DSCV | ;EP; -- day surgery create visit
|
|
| APCDCVDT | ;EP; -- edit visit date
|
|
| VIC() | ; -- visit ien (dgpmca)
|
|
| APCDCHK | ;EP;***> call to PCC visit check rtn
|
|
| APCDVDLT | ;EP; -- delete visit
|
|
| APCDALVR | ;EP; -- v hospitalization
|
|
| CVH | ; -- create v hosp
|
|
| TFAC() | ;EP; -- transfer facility
|
|
| DSRV() | ;EP; -- discharge service
|
|
| IDC() | ; -- inverse date (dgpmca)
|
|
| VIP() | ; -- visit ien (dgpmp)
|
|
| APCLYV3 | ;EP;***> call to pcc reports rtns
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DGPM - [#405] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVINP("AD" | APCDALVR+7, APCDALVR+11 |
| ^AUPNVSIT - [#9000010] | VIC+3 |
| ^AUPNVSIT("AA" | VIP+1, VIC+2 |
| ^DG(43 - [#43] | APCDALV+7 |
| ^DGPM - [#405] | APCDALV+11, APCDALV+15, APCDALVR+3, APCDALVR+12, CVH+5, CVH+6, DSRV+1, DSRV+3, IDC+1 |
| ^DGPM("APHY" | CVH+5 |
| ^DGPM("ATID6" | DSRV+2 |
| ^DIC(19 - [#19] | DSCV+3, APCDALV+4 |
| Name | Line Occurrences |
|---|---|
| $$DSRV | CVH+4 |
| $$IDC | VIC+2 |
| $$IDP | VIP+1 |
| $$TFAC | CVH+3 |
| $$VIC | APCDALVR+3, APCDALVR+4, APCDALVR+5, APCDALVR+7, APCDALVR+11 |
| $$VIP | APCDCVDT+1, APCDCVDT+2, APCDVDLT+2 |
| APCDALV | APCDCVDT+1, APCDALVR+3 |
| APCDEIN | APCDVDLT+2, APCDALVR+1 |
| APCDEKL | DSCV+4, DSCV+5, APCDALV+9, APCDALV+13, APCDALV+16, APCDCVDT+4, APCDVDLT+2, APCDALVR+4, APCDALVR+14, CVH+8 |
| CVH | APCDALVR+7 |
| ERR | DSCV+4, APCDALV+9, APCDCVDT+3, APCDALVR+4, APCDALVR+13, CVH+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| APCDALVR | APCDEKL+1! |
| APCDALVR("APCDADD" | APCDALV+5* |
| APCDALVR("APCDAFLG" | DSCV+4, APCDALV+9, APCDALVR+13, CVH+7 |
| APCDALVR("APCDATMP" | APCDALVR+10*, CVH+2* |
| APCDALVR("APCDCAT" | APCDALV+6* |
| APCDALVR("APCDDATE" | APCDALV+8* |
| APCDALVR("APCDDSCH" | APCDALVR+12* |
| APCDALVR("APCDLOC" | APCDALV+6* |
| APCDALVR("APCDLOOK" | APCDALVR+11*, CVH+4* |
| APCDALVR("APCDOPT" | DSCV+3*, APCDALV+4* |
| APCDALVR("APCDPAT" | APCDALV+5*, CVH+1* |
| APCDALVR("APCDTADS" | CVH+5* |
| APCDALVR("APCDTAT" | CVH+6* |
| APCDALVR("APCDTDCS" | CVH+4* |
| APCDALVR("APCDTDT" | CVH+1* |
| APCDALVR("APCDTTT" | CVH+3* |
| APCDALVR("APCDTYPE" | APCDALV+7* |
| APCDALVR("APCDVSIT" | APCDALV+14, APCDALVR+5* |
| APCDCVDT | APCDEKL+1! |
| APCDCVDT("ERR | OR FLAG" , APCDCVDT+3 |
| APCDCVDT("VIS | IT DATE/TIME" , APCDCVDT+2*, IT DFN" , APCDCVDT+2* |
| APCDVDLT | APCDVDLT+2*, APCDEKL+1! |
| BDGOPT | DSCV+1~, DSCV+2*, DSCV+3, APCDALV+2~, APCDALV+3*, APCDALV+4 |
| DA | APCDALV+14*, APCDEKL+1! |
| >> DFN | APCDALV+5, CVH+1, DSRV+2, VIP+1, VIC+2 |
| DGPMA | APCDALV+8, APCDCVDT+2, APCDALVR+3~*, CVH+1, CVH+3, CVH+4, TFAC+1 |
| >> DGPMCA | APCDALV+11, APCDALV+14, APCDALV+15, APCDALVR+3, APCDALVR+12, CVH+5, CVH+6, DSRV+1, IDC+1 |
| DGPMDA | APCDALVR+3~* |
| DGPMP | APCDALVR+3~, IDP+1 |
| DIE | APCDALV+10*, APCDEKL+1! |
| DR | APCDALV+14*, APCDEKL+1! |
| DUZ(2 | APCDALV+6 |
| U | APCDALV+7, APCDALVR+12, CVH+1, CVH+3, CVH+5, CVH+6, TFAC+1, DSRV+1, DSRV+3, VIC+3 |
| X | TFAC+1~*, DSRV+1~, DSRV+2*, DSRV+3, VIC+1~*, VIC+2*, VIC+3 |
| Y | DSRV+1~*, DSRV+2, VIC+1~*, VIC+2, VIC+3*, VIC+4 |