APCPAOTH ; IHS/TUCSON/LAB - extract APC imm/skin/mh data AUGUST 14, 1992 ; [ 12/16/03 8:19 AM ]
Source file <APCPAOTH.m>
| Package | Total | Caller Graph | 
|---|---|---|
| Patient Care Component Data Transmission | 1 | APCPAA | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| BI() | ;check to see if new imm package is running | |
| LC | ; | |
| GETRES | ; | |
| EOJ | ; | |
| REP | ; ; get reproductive hx info, gravida, lc, method, status | |
| IMM | ; ; get immunizations done | |
| GETIMM | ; | |
| ST | ; get skin test reading is PPD and result if TINE | |
| METH | ; | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUPNREP - [#9000017] | REP+3, REP+4 | 
| ^AUPNVIMM - [#9000010.11] | IMM+2 | 
| ^AUPNVIMM("AD" | IMM+2 | 
| ^AUPNVSK - [#9000010.12] | GETRES+1, GETRES+3, GETRES+4 | 
| ^AUPNVSK("AD" | ST+1 | 
| ^AUTTIMM - [#9999999.14] | GETIMM+3, GETIMM+4 | 
| ^AUTTIMM(0 | BI+1 | 
| ^AUTTSK - [#9999999.28] | GETRES+2 | 
| Name | Line Occurrences | 
|---|---|
| $$BI | GETIMM+4 | 
| EOJ | APCPAOTH+8, APCPAOTH+10, APCPAOTH+12 | 
| GETIMM | IMM+2 | 
| GETRES | ST+1 | 
| IMM | APCPAOTH+7 | 
| LC | REP+6 | 
| METH | REP+5 | 
| REP | APCPAOTH+11 | 
| ST | APCPAOTH+9 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> APCP("V DFN" | IMM+2, ST+1 | 
| >> APCPE("ERROR" | APCPAOTH+8, APCPAOTH+10, GETRES+1*, GETRES+2* | 
| >> APCPT("AFP" | REP+2*, METH+3* | 
| >> APCPT("AG" | REP+2*, REP+7* | 
| >> APCPT("ALC" | REP+2*, LC+1* | 
| >> APCPT("AS" | REP+2* | 
| >> APCPT("CHAR" | GETIMM+6*, GETIMM+7, GETIMM+14 | 
| >> APCPT("FILE" | APCPAOTH+8*, APCPAOTH+10* | 
| >> APCPT("IMM 2" | , GETIMM+5*, GETIMM+8, GETIMM+9, GETIMM+10, GETIMM+11, GETIMM+12, GETIMM+13 | 
| >> APCPT("IMM" | IMM+2*, GETIMM+8*, GETIMM+9*, GETIMM+10*, GETIMM+11*, GETIMM+12*, GETIMM+13*, GETIMM+14* | 
| >> APCPT("REP" | REP+4*, REP+5, REP+6, REP+7, LC+1, METH+1, METH+2 | 
| >> APCPT("RES" | ST+1*, GETRES+3*, GETRES+4*, GETRES+5, GETRES+6* | 
| >> APCPT("VAL" | GETIMM+7*, GETIMM+14 | 
| >> APCPT("X" | IMM+2*, ST+1*, GETRES+1, GETRES+3, GETRES+4 | 
| >> APCPT("Y" | IMM+2*, GETIMM+2, GETIMM+10, GETIMM+11, GETIMM+12, GETIMM+13, GETRES+1*, GETRES+2*, GETRES+3, GETRES+4 | 
| >> APCPV("PATIEN | T DFN" , REP+3, REP+4 | 
| >> APCPV("V DATE | " , REP+5, METH+1 | 
| U | GETIMM+2, GETIMM+4, GETIMM+10, GETIMM+11, GETIMM+12, GETIMM+13, GETRES+1, GETRES+2, GETRES+3, GETRES+4 , REP+5, REP+6, REP+7, LC+1, METH+1, METH+2 | 
| >> X | GETIMM+2*, GETIMM+3, GETIMM+4*, GETIMM+5*, GETIMM+6, REP+2*, METH+2*, METH+3 |