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 |