©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
IBDFOSG4 ;ALB/MAF/AAS - NUMBER OF ENCOUNTERS WITH CPT'S AND DX'S CONT. ; 3/18/96
Source file <IBDFOSG4.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 1 | $$SITE^VASITE |
| Scheduling | 1 | SET^SDCO4 |
| Package | Total | Caller Graph |
|---|---|---|
| Automated Information Collection System | 1 | IBDFOSG3 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START | ; -- Loop thru MONTHS
|
|
| SET | ; -- Set totals
|
|
| PROC | ; -- Check to see if there is at least one procedure for the encounter.
|
|
| BLD | ; -- scan ENCOUNTERS
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SCE - [#409.68] | BLD+2 |
| ^SCE("B" | BLD+1, BLD+2 |
| ^SDV - [#409.5] | PROC+5 |
| ^SDV("C" | PROC+4 |
| ^TMP("DTOT" | SET+1*, SET+4* |
| ^TMP("GTOT" | START+3*, SET+5* |
| ^TMP("MNTH" | SET+2*, SET+3* |
| Name | Line Occurrences |
|---|---|
| PROC | BLD+13 |
| SET | BLD+13, BLD+14 |
| Name | Field # of Occurrence |
|---|---|
| ^("PR" | PROC+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> IBCLIN | BLD+8* |
| IBCNT | PROC+1~*, PROC+6* |
| >> IBCS | PROC+5* |
| >> IBDDT | BLD+1*, BLD+2, PROC+3 |
| >> IBDDT1 | PROC+3*, PROC+4 |
| >> IBDFBEG | BLD+1 |
| >> IBDFEND | BLD+1 |
| >> IBDFN | BLD+6*, BLD+12, PROC+4 |
| >> IBDIV | BLD+3*, BLD+4, BLD+5 |
| >> IBDIVNM | BLD+4*, SET+1, SET+2, SET+3, SET+4 |
| >> IBI | PROC+3*, PROC+4*, PROC+5, PROC+6 |
| >> IBIFN | BLD+2*, BLD+14, PROC+5 |
| >> IBJ | PROC+6* |
| >> IBMNTH | BLD+11*, SET+2, SET+3 |
| >> IBNODE | BLD+2*, BLD+3, BLD+6, BLD+7, BLD+8, BLD+9, BLD+10, BLD+11 |
| >> IBPARNT | BLD+9* |
| >> IBPIECE | BLD+13*, BLD+14*, SET+3, SET+4, SET+5 |
| >> IBPR | PROC+5*, PROC+6 |
| >> IBPROC | BLD+10* |
| IBQUIT | START+1~, START+2* |
| >> IBSTOP | BLD+7* |
| IBXY | BLD+13, PROC+2!, PROC+5 |
| IBXY( | PROC+6* |
| >> SDDXY | BLD+14 |
| >> VAUTD | BLD+5 |
| >> VAUTD( | BLD+5 |