AMHUTIL2 ; IHS/CMI/LAB - provider functions ;
Source file <AMHUTIL2.m>
| Package | Total | Call Graph | 
|---|---|---|
| DRG Grouper | 3 | $$ICDDX^ICDCODE ($$ICDDX,ICDDX)^ICDEX $$CPT^ICPTCOD | 
| Registration | 2 | SETLOG1^DGSEC (OWNREC,SENS)^DGSEC4 | 
| IHS Changes To ADT | 1 | $$STATUS^BDGSPT2 | 
| IHS Patient | 1 | $$SNOMED^AUPNVUTL | 
| IHS Standard Terminology | 1 | ($$DESC,DESC)^BSTSAPI | 
| IHS VA Utilities | 1 | $$VALI^XBDIQ1 | 
| VA Fileman | 1 | $$GET1^DIQ | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| SECCPT(V,N,F) | ;EP | |
| ANY25(AMHX) | ;EP | |
| C | ;CODE | |
| EHR | ; | |
| I | ; | |
| ICD10 | ;EP CALLED FROM INPUT TX ON SITE PARAMETERS FIELD 1204 | |
| PRIMCPT(V,F) | ;EP - primaryCPT in many different formats | |
| PTSEC(RESULT,DFN,MSG,OPT) | ;EP - RPC/API entry point for patient sensitive & record access checks | |
| CHK1(Y) | ;EP - SCREEN OUT E CODES AND INACTIVE CODES | |
| PNPV(N,AMHDA) | ;PEP - OUTPUT TX PROVIDER NARRATIVE | |
| HL(H) | ;EP  - called to return internal of file 44 for hospital location based on program H | |
| CHK(Y) | ;EP - SCREEN OUT E CODES AND INACTIVE CODES | |
| IMP(D) | ;EP - which coding system should be used: | |
| ICD9 | ;EP - CALLED FROM INPUT TX ON SITE PARAMETERS FIELD .13 | |
| E | ;CATEGORY | |
| N | ;NARRATIVE - SHORT NAME | |
| CPT | ;EP | |
| CS(I) | ;EP - called to determine coding system of ien I | 
| Name | Field # of Occurrence | 
|---|---|
| $$SNOMED^AUPNVUTL | PNPV+4 | 
| $$STATUS^BDGSPT2 | PTSEC+32 | 
| $$DESC^BSTSAPI | EHR+7 | 
| DESC^BSTSAPI | EHR+4 | 
| SETLOG1^DGSEC | PTSEC+53 | 
| OWNREC^DGSEC4 | PTSEC+38 | 
| SENS^DGSEC4 | PTSEC+42 | 
| $$GET1^DIQ | EHR+2, EHR+3, EHR+4, EHR+8, PTSEC+47 | 
| $$ICDDX^ICDCODE | CHK+3, CHK1+3 | 
| $$ICDDX^ICDEX | CS+2, CHK+2, CHK1+2 | 
| ICDDX^ICDEX | CS+2, CHK+2, CHK+3, CHK1+2, CHK1+3 | 
| $$CPT^ICPTCOD | E+1, C+1, N+1 | 
| $$VALI^XBDIQ1 | HL+4, HL+5, HL+6, HL+7 | 
| FileNo | Call Tags | 
|---|---|
| ^DG(43 - [#43] | GET1^DIQ | 
| ^AMHPROB - [#9002012.2] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AMHREC - [#9002011] | PNPV+10, PRIMCPT+2, SECCPT+2, E+1, C+1, N+1 | 
| ^AMHRPRO - [#9002011.01] | PNPV+7, PNPV+8 | 
| ^AMHRPROC - [#9002011.04] | PRIMCPT+5, SECCPT+6, CPT+2 | 
| ^AMHRPROC("AD" | PRIMCPT+5, SECCPT+6, CPT+2 | 
| ^AMHSITE - [#9002013] | HL+2 | 
| ^AUTNPOV - [#9999999.27] | PNPV+11, EHR+1 | 
| ^DGSL(38.1 - [#38.1] | PTSEC+47 | 
| ^ICD9 - [#80] | ICD9+2, ICD10+3 | 
| ^ICDS - [#80.4] | IMP+10, IMP+11 | 
| ^ICDS("F" | IMP+9 | 
| ^ICDS(0 | IMP+8 | 
| ^ICPT - [#81] | PRIMCPT+7, SECCPT+8 | 
| ^SC - [#44] | HL+4, HL+5, HL+6, HL+7 | 
| ^TMP("DDS" | ANY25+2, ANY25+3, ANY25+4 | 
| Name | Line Occurrences | 
|---|---|
| $$CHK | ICD9+1 | 
| $$CHK1 | ICD10+2 | 
| @( | PRIMCPT+9, SECCPT+10, CPT+4, CPT+6, CPT+7 | 
| EHR | PNPV+10 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | PRIMCPT+3~, PRIMCPT+9*, PRIMCPT+10, SECCPT+4~, SECCPT+10*, SECCPT+11, CPT+1~, CPT+4*, CPT+6*, CPT+7* , I+1*, E+1*, C+1*, N+1*, CHK+1~, CHK+2*, CHK+3*, CHK+5, CHK+6, CHK1+1~ , CHK1+2*, CHK1+3*, CHK1+5, CHK1+6, CHK1+7, CHK1+8, CHK1+9 | 
| A | CHK+1~, CHK1+1~ | 
| AMHDA | PNPV~, PNPV+1*, PNPV+7, PNPV+8 | 
| AMHX | ANY25~ | 
| >> APCLV( | CPT+2*, CPT+4*, CPT+6*, CPT+7* | 
| C | PRIMCPT+3~, PRIMCPT+4*, SECCPT+4~, SECCPT+5*, SECCPT+6*, CPT+1~, CPT+2*, CPT+4, CPT+6, CPT+7 | 
| D | PNPV+5~, PNPV+6*, PNPV+8*, EHR+2, EHR+3, EHR+4, EHR+8, IMP~, IMP+5*, IMP+14 , IMP+15, IMP+16, CHK+1~, CHK1+1~ | 
| >> DDS | ANY25+2, ANY25+3, ANY25+4 | 
| DFN | PTSEC~, PTSEC+25, PTSEC+32, PTSEC+38, PTSEC+42, PTSEC+47, PTSEC+53 | 
| >> DGOPT | PTSEC+53 | 
| DT | IMP+5 | 
| DUZ | PTSEC+32, PTSEC+38, PTSEC+42, PTSEC+49, PTSEC+53 | 
| DUZ(2 | HL+2, HL+4, HL+5, HL+6, HL+7 | 
| F | PRIMCPT~, PRIMCPT+8*, PRIMCPT+9, SECCPT~, SECCPT+9*, SECCPT+10, CPT+3, CPT+5, CPT+6, CPT+7 , ANY25+1~ | 
| G | ANY25+1~, ANY25+2*, ANY25+3*, ANY25+4*, ANY25+6 | 
| H | HL~, HL+1, HL+4, HL+5, HL+6, HL+7 | 
| I | HL+3~, HL+4*, HL+5*, HL+6*, HL+7*, CS~, CS+2, CPT+1~, CPT+4*, CPT+6* , CPT+7*, CHK+1~, CHK1+1~ | 
| J | CPT+1~, CPT+6* | 
| MSG | PTSEC~, PTSEC+31*, PTSEC+33, PTSEC+38 | 
| N | PNPV~, PNPV+2*, PNPV+3, PNPV+4, PNPV+9, PNPV+11, EHR+1*, EHR+2, EHR+3, EHR+4 , EHR+6, EHR+8, EHR+9, SECCPT~, SECCPT+3, SECCPT+6 | 
| OPT | PTSEC~ | 
| P | PRIMCPT+3~, PRIMCPT+4*, PRIMCPT+5*, PRIMCPT+6, PRIMCPT+7, SECCPT+4~, SECCPT+5*, SECCPT+6*, SECCPT+7, SECCPT+8 , CPT+2*, I+1, E+1, C+1, N+1 | 
| R | PNPV+5~, PNPV+6*, PNPV+7*, PNPV+10 | 
| RESULT | PTSEC~, PTSEC+24!, PTSEC+38, PTSEC+41!, PTSEC+42 | 
| RESULT(1 | PTSEC+26*, PTSEC+33*, PTSEC+39*, PTSEC+40*, PTSEC+46, PTSEC+47, PTSEC+51* | 
| RESULT(2 | PTSEC+27*, PTSEC+34*, PTSEC+52* | 
| RESULT(3 | PTSEC+35* | 
| S | CPT+1~, CPT+4* | 
| SDI | EHR+5~, EHR+6*, EHR+7 | 
| SDIT | EHR+5~, EHR+7*, EHR+8, EHR+9 | 
| U | PNPV+7, PNPV+8, PNPV+10, PNPV+11, EHR+1, EHR+7, CS+2, IMP+10, IMP+11, PRIMCPT+5 , SECCPT+6, CPT+2, CPT+4, CPT+6, CPT+7, E+1, C+1, N+1, PTSEC+47, CHK+2 , CHK+5, CHK+6, CHK1+2, CHK1+5, CHK1+6, CHK1+7, CHK1+8, CHK1+9 | 
| V | PRIMCPT~, PRIMCPT+1, PRIMCPT+2, PRIMCPT+5, SECCPT~, SECCPT+1, SECCPT+2, SECCPT+6, CPT+2, E+1 , C+1, N+1 | 
| X | IMP+6~, IMP+9*, IMP+10, IMP+11, IMP+13*, IMP+14, IMP+15, IMP+16, ANY25+1~, ANY25+2* , ANY25+3, ANY25+4 | 
| Y | IMP+6~, IMP+7*, IMP+15*, IMP+16*, IMP+17*, IMP+18, PRIMCPT+3~, PRIMCPT+4*, PRIMCPT+5*, SECCPT+4~ , SECCPT+5*, SECCPT+6*, CPT+2*, ICD9+1, ICD9+2, CHK~, CHK+2, CHK+3, ICD10+2, ICD10+3 , CHK1~, CHK1+2, CHK1+3 | 
| Z | IMP+6~, PRIMCPT+3~, PRIMCPT+4*, PRIMCPT+5*, SECCPT+4~, SECCPT+5*, SECCPT+6*, CPT+1~, CPT+2* | 
| Z( | IMP+11*, IMP+13, IMP+15, IMP+16, IMP+17 | 
| Z(0 | IMP+17 | 
| Name | Field # of Occurrence | 
|---|---|
| $T(@I | CPT+4 | 
| $T(DESC^BSTSAPI | EHR+4 | 
| $T(ICDDX^ICDEX | CS+2, CHK+2, CHK+3, CHK1+2, CHK1+3 |