©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
SDMHNS1 ;MAF/ALB - MENTAL HEALTH NO SHOW REPORT (BGJ CONT.); SEPTEMBER 9, 2010
Source file <SDMHNS1.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 3 | $$SDAPI^SDAMA301 (COUNT,HEAD,HEAD1,TOTAL)^SDMHNS $$SETSTR^SDUL1 |
| Registration | 2 | (ADD,KVAR,OAD)^VADPT PID^VADPT6 |
| VA Fileman | 2 | C^%DTC ($$GET1,GETS)^DIQ |
| Health Level Seven | 1 | $$HLPHONE^HLFNC |
| Kernel | 1 | $$FMTE^XLFDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PID(DFN) | ; Return PID
; INPUT - DFN ; OUTPUT - PID or 'UNKNOWN' |
|
| FUT | ; FUTURE SCHEDULED APPTS.
|
|
| SET | ;
|
|
| NOK | ; Next of Kin information
|
|
| SETSTR(W,X,Y,Z) | ;SET UP THE STRING
|
|
| PROV | ;Clinic Default Provider
|
|
| MHTC | ;Mental Health Treatment Coordinator
|
|
| RESULTS | ;Reminder information
|
|
| EC | ;display emergency contact information
|
|
| PATINFO | ;Patients home, cell and office phones
|
|
| PRT | ;Print report
|
|
| EN | ;PRINT OF THE ^TMP
|
|
| SET1(X) | ;Sets the XMTEXT global
|
|
| NOKFL | ||
| DATA | ; Set up the data for the patient
; piece 1 = dfn ; piece 2 = Appointment Date and time ; piece 3 = status N(Noshow) or NA (Noshow with auto rebook) ; piece 4 = PID last 4 of SSN ; piece 5 = clinic ien ^SC( ; piece 6 = stop code ien ^DIC(40.7 ; |
| Name | Field # of Occurrence |
|---|---|
| C^%DTC | FUT+3 |
| $$GET1^DIQ | EC+42, EC+48 |
| GETS^DIQ | PATINFO+8, NOK+4, EC+6 |
| $$HLPHONE^HLFNC | PATINFO+11, PATINFO+12, PATINFO+13, NOK+22, NOK+23, NOK+26, NOK+27, EC+53, EC+54, EC+57 , EC+58 |
| $$SDAPI^SDAMA301 | FUT+9 |
| COUNT^SDMHNS | PRT+2 |
| HEAD^SDMHNS | PRT+3 |
| HEAD1^SDMHNS | PRT+4, PRT+15 |
| TOTAL^SDMHNS | EN+3 |
| $$SETSTR^SDUL1 | SETSTR+5 |
| ADD^VADPT | PATINFO+2 |
| KVAR^VADPT | EC+60 |
| OAD^VADPT | PATINFO+5, NOK+2, NOK+3, EC+4, EC+5 |
| PID^VADPT6 | PID+3 |
| $$FMTE^XLFDT | PRT+16, FUT+18 |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GETS^DIQ |
| ^DIC(5 - [#5] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(40.7 - [#40.7] | PRT+14 |
| ^DPT - [#2] | PRT+18 |
| ^SC - [#44] | PROV+3 |
| ^TMP( | EN+3, EN+5, EN+8, EN+10, EN+12, EN+15, EN+18, EN+20, EN+22, EN+24 , EN+25, EN+28, EN+30, EN+32, EN+34, EN+35, PRT+8 |
| ^TMP("SDNS" | EN+14 |
| ^TMP("SDNS1" | SET1+1*, SET+1* |
| ^TMP($J | FUT+16, FUT+18, FUT+25! |
| ^VA(200 - [#200] | PROV+5 |
| Name | Line Occurrences |
|---|---|
| $$SETSTR | PRT+4, PRT+18, PATINFO+11, PATINFO+12, PATINFO+13, NOK+14, NOK+15, NOK+18, NOK+19, NOK+22 , NOK+23, NOK+26, NOK+27, NOKFL, EC+12, EC+15, EC+16, EC+19, EC+20, EC+24 , EC+25, EC+28, EC+29, EC+32, EC+33, EC+41, EC+47, EC+53, EC+54, EC+57 , EC+58, PROV+5, MHTC+2, FUT+13, FUT+19, FUT+24, RESULTS+3 |
| FUT | PRT+24 |
| NOKFL | NOK+14, NOK+15, NOK+18, NOK+19, NOK+22, NOK+23, NOK+26, NOK+27 |
| PRT | EN+15, EN+25, EN+35 |
| SET | PRT+17 |
| SET1 | PRT+4, PRT+18, PATINFO+11, PATINFO+12, PATINFO+13, NOK+16, NOK+20, NOK+24, NOK+28, NOKFL , EC+12, EC+17, EC+21, EC+26, EC+30, EC+34, EC+50, EC+55, EC+59, PROV+6 , MHTC+3, FUT+13, FUT+20, FUT+24, RESULTS+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | PATINFO+2*, PATINFO+5*, NOK+2*, NOK+3*, EC+1~, EC+3*, PID~ |
| DT | FUT+3, FUT+4 |
| >> NAMSPC1 | EN+3, EN+5, EN+8, EN+10, EN+12, EN+15, EN+18, EN+20, EN+22, EN+24 , EN+25, EN+28, EN+30, EN+32, EN+34, EN+35, PRT+8 |
| SDARRAY | FUT+1~, FUT+9 |
| SDARRAY("FLDS" | FUT+8* |
| SDARRAY("SORT" | FUT+5* |
| SDARRAY(1 | FUT+4* |
| SDARRAY(3 | FUT+6* |
| SDARRAY(4 | FUT+7* |
| SDATE | EN+1~, EN+13*, EN+14*, EN+15, EN+23*, EN+24*, EN+25, EN+33*, EN+34*, EN+35 , PRT+8 |
| SDCOUNT | EN+1~, EN+2*, PRT+18*, FUT+1~, FUT+9*, FUT+10, FUT+22 |
| SDDSS | PRT+5~, PRT+14* |
| SDEC1 | EC+1~, EC+12 |
| SDEC1(1 | EC+24 |
| SDEC1(10 | EC+19 |
| SDEC1(11 | EC+43 |
| SDEC1(2 | EC+28 |
| SDEC1(3 | EC+32 |
| SDEC1(4 | EC+37, EC+40, EC+41 |
| SDEC1(5 | EC+42 |
| SDEC1(8 | EC+53 |
| SDEC1(9 | EC+10, EC+15 |
| SDEC2 | EC+1~, EC+12 |
| SDEC2(1 | EC+25 |
| SDEC2(10 | EC+20 |
| SDEC2(11 | EC+49 |
| SDEC2(2 | EC+29 |
| SDEC2(3 | EC+33 |
| SDEC2(4 | EC+45, EC+46, EC+47 |
| SDEC2(5 | EC+48 |
| SDEC2(8 | EC+54 |
| SDEC2(9 | EC+16 |
| SDEC3 | NOK+1~, NOK+9 |
| SDEC3(10 | NOK+10 |
| SDEC3(8 | NOK+10, NOK+12 |
| SDEC3(9 | NOK+10 |
| SDEC4 | NOK+1~, NOK+11 |
| SDEC4(10 | NOK+12 |
| SDEC4(9 | NOK+12 |
| SDEC5 | PATINFO+1~, PATINFO+6 |
| SDEC5(8 | PATINFO+7 |
| SDEC6 | PATINFO+1~, PATINFO+3 |
| SDEC6(8 | PATINFO+4 |
| SDFA | FUT+14~, FUT+16*, FUT+18 |
| SDFNODE | FUT+14~, FUT+18*, FUT+19 |
| SDFUTDT | FUT+14~, FUT+18*, FUT+19 |
| >> SDLN | SET1+1*, SET+1* |
| SDNOK | NOK+1~ |
| SDNOK2 | NOK+1~ |
| SDNOKFL | NOK+1~, NOK+8*, NOK+14, NOK+15, NOK+18, NOK+19, NOK+22, NOK+23, NOK+26, NOK+27 , NOKFL* |
| SDNOKNM | NOK+1~, NOK+10*, NOK+14 |
| SDNOKNM2 | NOK+1~, NOK+12*, NOK+15 |
| SDNOKPH | NOK+1~, NOK+10*, NOK+22 |
| SDNOKPH2 | NOK+1~, NOK+12*, NOK+23 |
| SDNOKPO | NOK+1~, NOK+10*, NOK+26 |
| SDNOKPO2 | NOK+1~, NOK+12*, NOK+27 |
| SDNOKR | NOK+1~, NOK+10*, NOK+18 |
| SDNOKR2 | NOK+1~, NOK+12*, NOK+19 |
| SDPHON | PATINFO+1~, NOK+1~, EC+1~ |
| SDPHON("CELL" | PATINFO+10*, PATINFO+13 |
| SDPHON("E-WORK" | EC+8*, EC+57 |
| SDPHON("E2-WORK" | EC+9*, EC+58 |
| SDPHON("HOME" | PATINFO+4*, PATINFO+11 |
| SDPHON("K-WORK" | NOK+6*, NOK+10 |
| SDPHON("K2-WORK" | NOK+7*, NOK+12 |
| SDPHON("WORK" | PATINFO+7*, PATINFO+12 |
| SDPHON(2 | PATINFO+9, PATINFO+10, NOK+5, NOK+6, NOK+7, EC+7, EC+8, EC+9 |
| SDPNODE | PROV+1~, PROV+3*, PROV+5 |
| SDPNUM | PROV+1~, PROV+2*, PROV+3* |
| SDSET | NOK+1~, NOK+13*, NOK+14*, NOK+15*, NOK+16, NOK+17*, NOK+18*, NOK+19*, NOK+20, NOK+21* , NOK+22*, NOK+23*, NOK+24, NOK+25*, NOK+26*, NOK+27*, NOK+28 |
| >> SDTL | EN+6, EN+16, EN+26, PRT+6, PRT+7 |
| >> SDUP | EN+5, EN+8, EN+10, EN+12, EN+14, EN+18, EN+20, EN+22, EN+24, EN+28 , EN+30, EN+32, EN+34, PROV+3, FUT+10 |
| SDX | PRT+1~, PRT+4*, PRT+5~, PRT+18*, PATINFO+1~, PATINFO+11*, PATINFO+12*, PATINFO+13*, NOK+1~, NOK+13* , NOK+14*, NOK+15*, NOK+16, NOK+17*, NOK+18*, NOK+19*, NOK+20, NOK+21*, NOK+22*, NOK+23* , NOK+24, NOK+25*, NOK+26*, NOK+27*, NOK+28, NOKFL*, EC+1~, EC+12*, EC+14*, EC+15* , EC+16*, EC+17, EC+18*, EC+19*, EC+20*, EC+21, EC+23*, EC+24*, EC+25*, EC+26 , EC+27*, EC+28*, EC+29*, EC+30, EC+31*, EC+32*, EC+33*, EC+34, EC+35*, EC+38* , EC+41*, EC+42*, EC+43*, EC+47*, EC+48*, EC+49*, EC+50, EC+52*, EC+53*, EC+54* , EC+55, EC+56*, EC+57*, EC+58*, EC+59, PROV+1~, PROV+4*, PROV+5*, PROV+6, MHTC+1* , MHTC+2*, MHTC+3, FUT+1~, FUT+3*, FUT+4, FUT+12*, FUT+13*, FUT+17*, FUT+19*, FUT+20 , FUT+23*, FUT+24*, RESULTS+1~, RESULTS+2*, RESULTS+3* |
| SDXCLIEN | PRT+5~, PRT+13*, PROV+3 |
| SDXCLIN | EN+1~, EN+7*, EN+8*, EN+10, EN+12, EN+14, EN+15, EN+21*, EN+22*, EN+24 , EN+25, EN+31*, EN+32*, EN+34, EN+35, PRT+3, PRT+4, PRT+6, PRT+7, PRT+15 , PRT+18 |
| SDXDFN | EN+1~, EN+2*, PRT+9*, PRT+18, PATINFO+2, PATINFO+5, PATINFO+8, PATINFO+9, PATINFO+10, NOK+2 , NOK+3, NOK+4, NOK+5, NOK+6, NOK+7, EC+2, EC+3, EC+6, EC+7, EC+8 , EC+9, FUT+7, FUT+16, FUT+18 |
| SDXDIV | EN+1~, EN+4*, EN+5*, EN+8, EN+10, EN+12, EN+14, EN+15, EN+18, EN+20 , EN+22, EN+24, EN+25, EN+28, EN+30, EN+32, EN+34, EN+35, PRT+3, PRT+4 , PRT+8, PRT+15, PRT+18 |
| SDXDT | PRT+5~, PRT+11*, PRT+16*, PRT+18 |
| >> SDXFLG( | PRT+3*, PRT+4*, PRT+15* |
| SDXID | PRT+5~, PRT+10*, PRT+18 |
| SDXNM | EN+1~, EN+9*, EN+10*, EN+12, EN+14, EN+15, EN+19*, EN+20*, EN+22, EN+24 , EN+25, EN+29*, EN+30*, EN+32, EN+34, EN+35, PRT+8 |
| SDXNODE | PRT+5~, PRT+8*, PRT+9, PRT+10, PRT+11, PRT+12, PRT+13, PRT+14 |
| SDXREM | EN+1~, EN+2*, EN+27*, EN+28*, EN+30, EN+32, EN+34, EN+35, PRT+6 |
| SDXSORT1 | PRT+5~, PRT+6*, PRT+8 |
| SDXSORT2 | PRT+5~, PRT+7*, PRT+8 |
| SDXSTAT | PRT+5~, PRT+12*, PRT+18 |
| SDXSTOP | EN+1~, EN+11*, EN+12*, EN+14, EN+15, EN+17*, EN+18*, EN+20, EN+22, EN+24 , EN+25, EN+35*, PRT+6, PRT+7 |
| SDZ | EC+39~, EC+40*, EC+41, EC+46*, EC+47 |
| >> TOTAL( | PRT+18 |
| >> VA("BID" | PID+4 |
| VAOA | NOK+1~, EC+1~ |
| VAOA("A" | PATINFO+5*, NOK+3*, EC+4*, EC+5* |
| VAROOT | PATINFO+1~, PATINFO+2*, PATINFO+5*, NOK+1~, NOK+2*, NOK+3*, EC+1~, EC+4*, EC+5* |
| W | SETSTR~, SETSTR+5 |
| X | PRT+4, PRT+18, SETSTR~, SETSTR+5*, SETSTR+6, SET1~, SET1+1, SET+1*, PATINFO+11, PATINFO+12 , PATINFO+13, NOK+1~, NOK+13*, NOK+14, NOK+15, NOK+17*, NOK+18, NOK+19, NOK+21*, NOK+22 , NOK+23, NOK+25*, NOK+26, NOK+27, NOKFL, EC+1~, EC+11*, EC+12, EC+15, EC+16 , EC+19, EC+20, EC+24, EC+25, EC+28, EC+29, EC+32, EC+33, EC+41, EC+47 , EC+53, EC+54, EC+57, EC+58, PROV+5, MHTC+2, FUT+1~, FUT+3, FUT+12*, FUT+13 , FUT+17*, FUT+19, FUT+23*, FUT+24, RESULTS+2*, RESULTS+3 |
| X1 | FUT+1~, FUT+3* |
| X2 | FUT+1~, FUT+3* |
| Y | SETSTR~, SETSTR+5 |
| Z | SETSTR~, SETSTR+5 |