©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
APCLNJ21 ; IHS/CMI/LAB - PRINT CLINIC VISITS (CALC) ;
Source file <APCLNJ21.m>
| Package | Total | Call Graph |
|---|---|---|
| Patient Care Component Reports | 2 | XTMP^APCLOSUT $$DEMO^APCLUTL |
| IHS Patient | 1 | $$AGE^AUPNPAT |
| Patient Care Component | 1 | $$INJ^APCDAPOV |
| Taxonomy | 1 | $$ICD^ATXAPI |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TAX11 | ;;CUT PIERCING OBJ;;APCL INJ CUT
|
|
| POV | ;check to see if pov is injury
|
|
| NEXT | ;
|
|
| VST1 | ||
| TAX10 | ;;DROWN/SUBMERGE;;APCL INJ DROWNING
|
|
| TAX13 | ;;SPORTS INJURY;;APCL INJ SPORTS
|
|
| TAX12 | ;;FIREARMS;;APCL INJ FIREARMS
|
|
| TAX15 | ;;ASSAULTS;;APCL INJ ASSAULTS
|
|
| TAX14 | ;;SUICIDE ATTEMPTS;;APCL INJ SUICIDE
|
|
| TAX17 | ;;UNDETERMINED;;APCL INJ UNDETERMINED
|
|
| TAX16 | ;;BATTERED CHILD;;APCL INJ BATTERED CHILD
|
|
| TAX18 | ;;OTHER CAUSES;;APCL INJ OTHER CAUSES
|
|
| CALC | ;find visits by date then store by patient name
|
|
| VST | ||
| TAX9 | ;;ANIMAL RELATED;;APCL INJ ANIMAL RELATED
|
|
| TAX8 | ;;STINGS/VENOMS;;APCL INJ STINGS VENOMS
|
|
| TAX1 | ;;MOTOR VEHICLE;;APCL INJ MOTOR
|
|
| TAX3 | ;;AIR TRANSPORT;;APCL INJ AIR TRANSPORT
|
|
| TAX2 | ;;WATER TRANSPORT;;APCL INJ WATER TRANSPORT
|
|
| TAX5 | ;;ACCIDENTAL FALLS;;APCL INJ FALLS
|
|
| TAX4 | ;;ACCIDENTAL POISONING;;APCL INJ POISONING
|
|
| TAX7 | ;;ENVIRONMENTAL FACTORS;;APCL INJ ENVIRONMENTAL FACTORS
|
|
| TAX6 | ;;FIRES/FLAMES;;APCL INJ FIRE
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ATXAX("B" | POV+11 |
| ^AUPNVPOV - [#9000010.07] | POV+3, POV+5, POV+7 |
| ^AUPNVPOV("AD" | POV+3 |
| ^AUPNVSIT - [#9000010] | VST1+2 |
| ^AUPNVSIT("B" | VST, VST1 |
| ^DPT - [#2] | VST1+18, VST1+19 |
| Name | Line Occurrences |
|---|---|
| NEXT | VST+1 |
| POV | VST1+20 |
| VST | VST1 |
| VST1 | VST1+2, VST1+3, VST1+4, VST1+5, VST1+6, VST1+7, VST1+8, VST1+9, VST1+10, VST1+11 , VST1+12, VST1+13, VST1+14, VST1+15, VST1+18, VST1+21 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | VST1+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | POV+3*, POV+12*, POV+13 |
| >> APCLAGET | VST1+14, VST1+15 |
| >> APCLALC | POV+7*, POV+17, POV+21 |
| >> APCLATOT | POV+20*, POV+21* |
| >> APCLBD | CALC+4 |
| >> APCLBT | CALC+3* |
| >> APCLCIEN | POV+5*, POV+6, POV+12 |
| >> APCLCLNT | VST1+12, VST1+13 |
| >> APCLCLNT( | VST1+13 |
| >> APCLCNTR( | POV+8*, POV+15*, POV+16*, POV+17* |
| >> APCLDEMO | VST1+8 |
| >> APCLDFN | VST1+17*, VST1+18, VST1+19 |
| >> APCLED | VST+1 |
| >> APCLET | NEXT+1* |
| >> APCLGOT | POV+4*, POV+8, POV+14* |
| >> APCLGTOT | POV+18*, POV+19* |
| >> APCLJOB | CALC+3* |
| >> APCLLOCT | VST1+9 |
| >> APCLLOCT( | VST1+9 |
| >> APCLNAME | VST1+19* |
| >> APCLSCT | VST1+10 |
| >> APCLSCT( | VST1+10 |
| >> APCLSTR | VST1+2*, VST1+3, VST1+4, VST1+5, VST1+6, VST1+7, VST1+8, VST1+9, VST1+10, VST1+11 , VST1+12, VST1+13, VST1+14, VST1+15, VST1+17 |
| >> APCLTAX | POV+11*, POV+12 |
| >> APCLTXN | POV+9*, POV+11 |
| >> APCLTYPT | VST1+11 |
| >> APCLTYPT( | VST1+11 |
| >> APCLVDFN | VST+1*, VST1*, VST1+2, POV+3 |
| >> APCLVDT | CALC+4*, VST*, VST+1, VST1 |
| >> APCLX | POV+8*, POV+15, POV+16, POV+17 |
| >> APCLY | POV+8*, POV+9, POV+10 |
| >> APCLZ | POV+8, POV+10*, POV+15, POV+16, POV+17 |
| U | VST1+4, VST1+5, VST1+6, VST1+7, VST1+8, VST1+9, VST1+10, VST1+11, VST1+12, VST1+13 , VST1+14, VST1+15, POV+3, POV+5, POV+7, POV+16, POV+17 |
| X | POV+3~*, POV+5, POV+7 |
| >> Y | POV+8* |
| Name | Field # of Occurrence |
|---|---|
| $T(@Y | POV+8 |