AMHGDVF2 ; IHS/CMI/MAW - AMHG BH GUI Visit Form Continued (frmVisitDataEntry) 8/18/2009 2:18:49 PM ;
Source file <AMHGDVF2.m>
| Package | Total | Call Graph | 
|---|---|---|
| Text Integration Utility | 2 | $$CANDO^TIULP EXTRACT^TIULQ | 
| Mental Health Social Services | 1 | $$LVDT^AMHGU | 
| Uncategorized | 1 | DEBUG^%Serenji | 
| VA Fileman | 1 | $$GET1^DIQ | 
| Package | Total | Caller Graph | 
|---|---|---|
| Mental Health Social Services | 1 | AMHGDVF | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DEBUG(RETVAL,AMHSTR) | ;-- debug entry point | |
| MSRC(RETVAL,AMHSTR) | ;-- get the chartable measurement | |
| FLAG(RETVAL,AMHSTR) | ;-- retrieve visit flag | |
| TIG(RETVAL,AMHSTR) | ;-- retrieve visit time in group | |
| TIUDSP | ; | |
| S1 | ; | |
| S(Y,F,C,T) | ;set up array | |
| EDU(RETVAL,AMHSTR) | ;-- retrieve visit education topics | |
| SETHDR(RV,MSTI) | ;-- set the header based on measurement type | |
| TIU(RETVAL,AMHSTR) | ;EP -- return the TIU notes into a data table for the visit | |
| TIUN(AMHARRAY,AMHIEN) | ;EP called to return TIU notes in an array | |
| HF(RETVAL,AMHSTR) | ;-- retrieve visit health factors | |
| MSRT(RETVAL,AMHSTR) | ;-- get the patients measurements so they can be graphed | |
| SCREEN(RETVAL,AMHSTR) | ;-- retrieve visit screening | 
| Name | Field # of Occurrence | 
|---|---|
| DEBUG^%Serenji | DEBUG+1 | 
| $$LVDT^AMHGU | MSRC+33 | 
| $$GET1^DIQ | EDU+12, EDU+13, EDU+14, EDU+15, EDU+17, EDU+18, EDU+19, EDU+20, EDU+21, EDU+23 , EDU+24, EDU+25, EDU+26, HF+12, HF+13, HF+14, HF+16, HF+17, HF+18, SCREEN+12 , SCREEN+13, SCREEN+14, SCREEN+15, SCREEN+16, SCREEN+17, SCREEN+18, SCREEN+19, SCREEN+20, SCREEN+21, SCREEN+22 , SCREEN+23, SCREEN+24, SCREEN+25, SCREEN+26, SCREEN+27, TIG+10, FLAG+10, MSRT+15, MSRT+16, MSRT+17 , MSRT+18, MSRT+19, MSRT+20, MSRT+21, MSRT+22, MSRT+23, MSRT+36, MSRT+37 | 
| $$CANDO^TIULP | TIUDSP+2, TIUDSP+20 | 
| EXTRACT^TIULQ | TIUDSP+6, TIUDSP+24 | 
| RPC Name | Call Tags | 
|---|---|
| AMHG GET VISIT EDU TOPICS | EDU | 
| AMHG GET VISIT HEALTH FACTORS | HF | 
| AMHG GET VISIT SCREENING | SCREEN | 
| AMHG GET VISIT TIG | TIG | 
| AMHG GET MEASUREMENTS | MSRC | 
| AMHG GET MEASUREMENT TYPES | MSRT | 
| AMHG GET VISIT FLAG | FLAG | 
| FileNo | Call Tags | 
|---|---|
| ^AMHREC - [#9002011] | GET1^DIQ | 
| ^AMHREDU - [#9002011.05] | GET1^DIQ | 
| ^AMHRHF - [#9002011.08] | GET1^DIQ | 
| ^AUTTMSR - [#9999999.07] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^%ZOSF("TRAP" | EDU+1, HF+1, SCREEN+1, TIG+1, FLAG+1, MSRT+1, MSRC+1, TIU+1 | 
| ^AMHGTMP($J | MSRT+29*, MSRT+30*, MSRT+32, MSRT+34, MSRT+40! | 
| ^AMHREC - [#9002011] | TIUN+2, TIUN+7 | 
| ^AMHREDU("AD" | EDU+10 | 
| ^AMHRHF("AD" | HF+10 | 
| ^AMHRMSR - [#9002011.12] | MSRC+27 | 
| ^AMHRMSR("AA" | MSRT+14, MSRT+25, MSRT+27, MSRC+20, MSRC+23 | 
| ^AMHTMP($J | EDU+6!, HF+6!, SCREEN+6!, TIG+6!, FLAG+6!, MSRT+6!, MSRC+6!, TIU+6! | 
| ^AUTTMSR - [#9999999.07] | SETHDR+2, SETHDR+3 | 
| ^AUTTMSR("B" | MSRC+17 | 
| ^TIU(8925 - [#8925] | TIUDSP+18, TIUDSP+19 | 
| ^TMP("AMHEONPS" | TIUN+12! | 
| ^TMP("AMHOENPS" | TIU+17!, TIUN+9!, TIUDSP+4, TIUDSP+7, TIUDSP+8!, TIUDSP+21, TIUDSP+25, TIUDSP+26! | 
| ^TMP("AMHS" | TIU+11, TIU+13, TIU+18!, S1+1*, S1+2* | 
| ^TMP($J | MSRC+33*, MSRC+35, MSRC+36, MSRC+38, MSRC+40! | 
| Name | Line Occurrences | 
|---|---|
| S | TIUN+6, TIUN+11, TIUDSP+1, TIUDSP+9, TIUDSP+10, TIUDSP+11, TIUDSP+12, TIUDSP+13, TIUDSP+15, TIUDSP+16 , TIUDSP+18, TIUDSP+27, TIUDSP+28, TIUDSP+29, TIUDSP+30, TIUDSP+31, TIUDSP+32, TIUDSP+34, TIUDSP+35 | 
| S1 | S+5, S+7, S+10 | 
| SETHDR | MSRC+18 | 
| TIUDSP | TIUN+10 | 
| TIUN | TIU+9 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | S+1~, S+8*, S+9*, S1+1*, S1+2 | 
| AMHA | SCREEN+10~, SCREEN+12*, SCREEN+29, SCREEN+31 | 
| AMHAC | SCREEN+10~, SCREEN+13*, SCREEN+29, SCREEN+31 | 
| AMHAPRV | SCREEN+10~, SCREEN+19*, SCREEN+31 | 
| AMHAPRVI | SCREEN+10~, SCREEN+18*, SCREEN+31 | 
| AMHARRAY | TIU+9, TIUN~, TIUN+3*, TIUN+5 | 
| AMHB | MSRT+2~, MSRT+7*, MSRT+10*, MSRT+25 | 
| AMHBD | MSRC+2~, MSRC+9*, MSRC+15 | 
| >> AMHBDA | MSRC+15*, MSRC+20 | 
| AMHCMT | EDU+11~, EDU+18*, EDU+28, HF+11~, HF+18*, HF+20 | 
| >> AMHCNT | MSRC+14*, MSRC+20, MSRC+25, MSRC+26* | 
| AMHCPT | EDU+11~, EDU+17*, EDU+28 | 
| AMHD | SCREEN+10~, SCREEN+14*, SCREEN+29, SCREEN+31 | 
| AMHDA | EDU+9~, EDU+10*, EDU+12, EDU+13, EDU+14, EDU+15, EDU+17, EDU+18, EDU+19, EDU+20 , EDU+21, EDU+23, EDU+24, EDU+25, EDU+26, EDU+28, HF+9~, HF+10*, HF+12, HF+13 , HF+14, HF+16, HF+17, HF+18, HF+20, MSRT+24~, MSRT+25*, MSRT+27, MSRC+13~, MSRC+19~ , MSRC+20*, MSRC+23, MSRC+30, TIU+10~, TIU+11*, TIU+13 | 
| AMHDATA | TIU+12~, TIU+13*, TIU+15 | 
| AMHDC | SCREEN+10~, SCREEN+15*, SCREEN+29, SCREEN+31 | 
| AMHDOC | TIUN+1~, TIUN+7*, TIUDSP+2, TIUDSP+6, TIUDSP+7, TIUDSP+18, TIUDSP+19 | 
| AMHDPRV | SCREEN+10~, SCREEN+21*, SCREEN+31 | 
| AMHDPRVI | SCREEN+10~, SCREEN+20*, SCREEN+31 | 
| AMHE | MSRT+2~, MSRT+8*, MSRT+11*, MSRT+25 | 
| AMHED | MSRC+2~, MSRC+10*, MSRC+16 | 
| >> AMHEDA | MSRC+16* | 
| AMHEDU | EDU+11~, EDU+12*, EDU+28 | 
| AMHEPRV | EDU+11~, EDU+26*, EDU+28 | 
| AMHEPRVI | EDU+11~, EDU+25*, EDU+28 | 
| AMHERR | TIUN+1~, TIUN+8!, TIUDSP+6, TIUDSP+24 | 
| AMHFLG | FLAG+9~, FLAG+10*, FLAG+12 | 
| AMHGBL | TIUN+1~, TIUDSP+4*, TIUDSP+5, TIUDSP+6, TIUDSP+21*, TIUDSP+22, TIUDSP+24 | 
| AMHGOAL | EDU+11~, EDU+19*, EDU+28 | 
| AMHHF | HF+11~, HF+12*, HF+20 | 
| >> AMHHLF | TIUDSP+4* | 
| AMHI | EDU+2~, EDU+5*, EDU+8, EDU+27*, EDU+28, EDU+29, HF+2~, HF+5*, HF+8, HF+19* , HF+20, HF+21, SCREEN+2~, SCREEN+5*, SCREEN+8, SCREEN+9, SCREEN+28*, SCREEN+30, SCREEN+31, SCREEN+32 , SCREEN+33, TIG+2~, TIG+5*, TIG+8, TIG+11*, TIG+12, TIG+13, FLAG+2~, FLAG+5*, FLAG+8 , FLAG+11*, FLAG+12, FLAG+13, MSRT+2~, MSRT+5*, MSRT+12, MSRT+35*, MSRT+38, MSRT+39, MSRC+2~ , MSRC+5*, MSRC+37*, MSRC+38, MSRC+39, TIU+2~, TIU+5*, TIU+14*, TIU+15, TIU+16 | 
| AMHIEN | EDU+2~, EDU+7*, EDU+10, HF+2~, HF+7*, HF+10, SCREEN+2~, SCREEN+7*, SCREEN+12, SCREEN+13 , SCREEN+14, SCREEN+15, SCREEN+16, SCREEN+17, SCREEN+18, SCREEN+19, SCREEN+20, SCREEN+21, SCREEN+22, SCREEN+23 , SCREEN+24, SCREEN+25, SCREEN+26, SCREEN+27, SCREEN+31, TIG+2~, TIG+7*, TIG+10, TIG+12, FLAG+2~ , FLAG+7*, FLAG+10, FLAG+12, MSRT+26~, MSRT+27*, MSRC+2~, MSRC+7*, MSRC+20, MSRC+23, MSRC+33 , TIUN~, TIUN+2, TIUN+4, TIUN+7 | 
| AMHIN | TIU+2~, TIU+7*, TIU+9 | 
| AMHIP | SCREEN+10~, SCREEN+16*, SCREEN+29, SCREEN+31 | 
| AMHIPC | SCREEN+10~, SCREEN+17*, SCREEN+29, SCREEN+31 | 
| AMHIPRV | SCREEN+10~, SCREEN+23*, SCREEN+31 | 
| AMHIPRVI | SCREEN+10~, SCREEN+22*, SCREEN+31 | 
| AMHLOU | EDU+11~, EDU+15*, EDU+16, EDU+28 | 
| AMHLOUI | EDU+11~, EDU+14*, EDU+16 | 
| AMHLOUS | EDU+11~, EDU+16* | 
| AMHMDT | MSRT+28~ | 
| AMHMSR | MSRT+28~ | 
| AMHMSRD | MSRT+28~ | 
| AMHMSRT | MSRT+28~ | 
| AMHMSRTI | MSRT+28~ | 
| AMHMST | MSRC+2~, MSRC+8*, MSRC+17 | 
| >> AMHMSTI | MSRC+17*, MSRC+18, MSRC+20, MSRC+23 | 
| AMHOEN | MSRC+22~, MSRC+23*, MSRC+27 | 
| AMHP | MSRT+2~, MSRT+9*, MSRT+14, MSRT+25, MSRT+27, MSRT+29, MSRT+30, MSRT+32, MSRT+34, MSRT+40 | 
| AMHPRV | HF+11~, HF+17*, HF+20 | 
| AMHQTY | HF+11~, HF+16*, HF+20 | 
| AMHR | TIUN+1~, TIUN+4* | 
| AMHREA | EDU+11~, EDU+24*, EDU+28 | 
| AMHSES | EDU+11~, EDU+23*, EDU+28 | 
| AMHSEV | HF+11~, HF+14*, HF+15, HF+20 | 
| >> AMHSEVI | HF+13*, HF+15 | 
| >> AMHSEVS | HF+15* | 
| AMHSPRV | SCREEN+11~, SCREEN+27*, SCREEN+32 | 
| AMHSPRVI | SCREEN+11~, SCREEN+26*, SCREEN+32 | 
| AMHSRA | SCREEN+11~, SCREEN+24*, SCREEN+32 | 
| AMHSRAC | SCREEN+11~, SCREEN+25*, SCREEN+32 | 
| AMHST | EDU+11~, EDU+21*, EDU+22, EDU+28 | 
| AMHSTI | EDU+11~, EDU+20*, EDU+22 | 
| AMHSTR | DEBUG~, EDU~, EDU+7, HF~, HF+7, SCREEN~, SCREEN+7, TIG~, TIG+7, FLAG~ , FLAG+7, MSRT~, MSRT+7, MSRT+8, MSRT+9, MSRC~, MSRC+7, MSRC+8, MSRC+9, MSRC+10 , TIU~, TIU+7, TIUN+1~, TIUDSP+1*, TIUDSP+9*, TIUDSP+10*, TIUDSP+11*, TIUDSP+12*, TIUDSP+13*, TIUDSP+15* , TIUDSP+16*, TIUDSP+18*, TIUDSP+27*, TIUDSP+28*, TIUDSP+29*, TIUDSP+30*, TIUDSP+31*, TIUDSP+32*, TIUDSP+34*, TIUDSP+35* | 
| AMHSTS | EDU+11~, EDU+22* | 
| AMHT | MSRT+13~, MSRT+14*, MSRT+15, MSRT+16, MSRT+17, MSRT+18, MSRT+19, MSRT+20, MSRT+21, MSRT+22 , MSRT+23, MSRT+25, MSRT+27, MSRT+29, MSRT+30 | 
| AMHTDA | MSRT+31~, MSRT+32*, MSRT+34, MSRT+36, MSRT+37, MSRC+34~, MSRC+35*, MSRC+36, MSRC+38 | 
| AMHTIEM | MSRC+34~ | 
| >> AMHTIEN | MSRC+36*, MSRC+38 | 
| AMHTIG | TIG+9~, TIG+10*, TIG+12 | 
| AMHTIU | TIUN+1~, TIUN+8!, TIUN+13!, TIUDSP+7*, TIUDSP+23!, TIUDSP+25* | 
| AMHTIU( | TIUDSP+9, TIUDSP+11, TIUDSP+28, TIUDSP+30 | 
| AMHTIU("TEXT" | TIUDSP+13, TIUDSP+32 | 
| AMHTIU(1202 | TIUDSP+10, TIUDSP+29 | 
| AMHTIU(1205 | TIUDSP+12, TIUDSP+31 | 
| AMHTIU(1501 | TIUDSP+14, TIUDSP+16, TIUDSP+33, TIUDSP+35 | 
| AMHTIU(1502 | TIUDSP+11, TIUDSP+30 | 
| AMHTIU(1503 | TIUDSP+15, TIUDSP+34 | 
| AMHTS | EDU+11~, EDU+13*, EDU+28 | 
| AMHV | MSRT+28~ | 
| AMHVAL | MSRC+24~, MSRC+27*, MSRC+28, MSRC+29 | 
| AMHVAL1 | MSRC+24~, MSRC+28*, MSRC+33 | 
| AMHVAL2 | MSRC+24~, MSRC+29*, MSRC+33 | 
| AMHVDT | MSRC+24~, MSRC+30*, MSRC+33 | 
| AMHX | TIUN+1~, TIUDSP+13*, TIUDSP+32* | 
| AMHX1 | TIUN+1~, TIUDSP+19*, TIUDSP+20, TIUDSP+24, TIUDSP+25 | 
| C | S~, S+7 | 
| CNT | MSRT+33~, MSRT+34*, MSRT+38 | 
| DESC | MSRT+33~, MSRT+37*, MSRT+38 | 
| DUZ | TIUDSP+2, TIUDSP+20 | 
| F | S~, S+2*, S+5* | 
| >> INST | MSRC+11*, MSRC+20, MSRC+25 | 
| IOM | TIUDSP+4 | 
| >> L | S+7* | 
| MSRD | SETHDR+1~, SETHDR+3*, SETHDR+4 | 
| MSRT | SETHDR+1~, SETHDR+2*, SETHDR+5 | 
| MSTI | SETHDR~, SETHDR+2, SETHDR+3 | 
| P | EDU+2~, EDU+3*, EDU+7, HF+2~, HF+3*, HF+7, SCREEN+2~, SCREEN+3*, SCREEN+7, TIG+2~ , TIG+3*, TIG+7, FLAG+2~, FLAG+3*, FLAG+7, MSRT+2~, MSRT+3*, MSRT+7, MSRT+8, MSRT+9 , MSRC+2~, MSRC+3*, MSRC+7, MSRC+8, MSRC+9, MSRC+10, TIU+2~, TIU+3*, TIU+7 | 
| R | EDU+2~, EDU+3*, HF+2~, HF+3*, SCREEN+2~, SCREEN+3*, TIG+2~, TIG+3*, FLAG+2~, FLAG+3* , MSRT+2~, MSRT+3*, MSRC+2~, MSRC+3*, TIU+2~, TIU+3* | 
| RETVAL | DEBUG~, EDU~, EDU+4*, EDU+8, EDU+28, EDU+29, HF~, HF+4*, HF+8, HF+20 , HF+21, SCREEN~, SCREEN+4*, SCREEN+8, SCREEN+9, SCREEN+30, SCREEN+31, SCREEN+32, SCREEN+33, TIG~ , TIG+4*, TIG+8, TIG+12, TIG+13, FLAG~, FLAG+4*, FLAG+8, FLAG+12, FLAG+13, MSRT~ , MSRT+4*, MSRT+12, MSRT+38, MSRT+39, MSRC~, MSRC+4*, MSRC+18, MSRC+38, MSRC+39, TIU~ , TIU+4*, TIU+8, TIU+15, TIU+16 | 
| RV | SETHDR~, SETHDR+4, SETHDR+6 | 
| T | S~, S+3*, S+7*, S+8, S+9 | 
| TYPE | MSRT+33~, MSRT+36*, MSRT+38 | 
| U | EDU+28, HF+20, SCREEN+31, SCREEN+32, TIG+12, FLAG+12, MSRT+38, MSRC+27, MSRC+33, SETHDR+2 , SETHDR+3, S1+1 | 
| >> X | EDU+1*, HF+1*, SCREEN+1*, TIG+1*, FLAG+1*, MSRT+1*, MSRC+1*, TIU+1*, TIUN+6*, S+5* , S+6*, S+8*, S+9*, S1+2 | 
| Y | S~, S+6, S+7, S+9 |