©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
BEHOENC1 ;MSC/IND/DKM - Visit Creation Support ;16-Jul-2009 17:58;PLS
Source file <BEHOENC1.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 2 | ($$FMADD,$$FMDIFF)^XLFDT $$ABS^XLFMTH |
| PCE Patient Care Encounter | 2 | ^VSIT $$GETVID^VSITVID |
| VA Fileman | 1 | $$GET1^DIQ |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Electronic Health Record | 1 | BEHOENCX |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETVISIT(IN,OUT) | ;
|
|
| ADDVIST(IN,OUT) | ;
|
|
| HAVEREQ(IN,OUT) | ;
|
|
| MATCH(IN,OUT) | ;
|
|
| TIMEDIF(VDTTM,VIEN) | ; return time difference between incoming time and current visit
|
|
| TIME(RANGE,VISIT,DATE,END) | ;
|
|
| PRVMTCH() | ;
|
| FileNo | Call Tags |
|---|---|
| ^SC - [#44] | GET1^DIQ |
| ^AUPNVSIT - [#9000010] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVPRV - [#9000010.06] | PRVMTCH+6 |
| ^AUPNVPRV("AD" | PRVMTCH+5 |
| ^AUPNVSIT - [#9000010] | MATCH+7, TIMEDIF+1 |
| ^AUPNVSIT("AA" | MATCH+4, MATCH+6 |
| Name | Line Occurrences |
|---|---|
| $$HAVEREQ | GETVISIT+39 |
| $$PRVMTCH | MATCH+14 |
| $$TIMEDIF | MATCH+12, MATCH+23 |
| ADDVIST | GETVISIT+41, GETVISIT+45, GETVISIT+56, GETVISIT+60 |
| MATCH | GETVISIT+43, GETVISIT+52 |
| TIME | MATCH+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DATE | TIME~, TIME+3*, TIME+5*, TIME+6*, TIME+8*, MATCH+1~, MATCH+3, MATCH+4*, MATCH+6 |
| DFN | ADDVIST+1~, ADDVIST+15* |
| DIFF | MATCH+1~, MATCH+12*, MATCH+13 |
| DT | HAVEREQ+4 |
| END | TIME~, TIME+4*, TIME+5*, TIME+7*, TIME+8*, MATCH+1~, MATCH+3, MATCH+4 |
| IEN | PRVMTCH+1~, PRVMTCH+4*, PRVMTCH+5*, PRVMTCH+6 |
| IN | GETVISIT~, GETVISIT+38, HAVEREQ~, MATCH~, ADDVIST~ |
| IN("ANCILLARY" | MATCH+18 |
| IN("APCDOLOC" | ADDVIST+12 |
| IN("CLINIC CO | DE" , HAVEREQ+9*, MATCH+19*, MATCH+20, ADDVIST+7 |
| IN("FORCE ADD | " , HAVEREQ+1 |
| IN("HOS LOC" | HAVEREQ+9, MATCH+19, MATCH+21, ADDVIST+8 |
| IN("PAT" | HAVEREQ+2, MATCH+4, MATCH+6, ADDVIST+4, ADDVIST+15 |
| IN("PROVIDER" | PRVMTCH+2, PRVMTCH+7 |
| IN("SITE" | HAVEREQ+5, MATCH+8, ADDVIST+5 |
| IN("SRV CAT" | HAVEREQ+7, MATCH+10, ADDVIST+6 |
| IN("TIME RANG | E" , HAVEREQ+1, MATCH+3, MATCH+11, MATCH+13 |
| IN("USR" | HAVEREQ+8, ADDVIST+9 |
| IN("VISIT DAT | E" , HAVEREQ+3, HAVEREQ+4, MATCH+3, MATCH+12, MATCH+23, ADDVIST+2 |
| IN("VISIT TYP | E" , HAVEREQ+6, MATCH+9, ADDVIST+3 |
| OUT | GETVISIT~, GETVISIT+37!, GETVISIT+39, GETVISIT+41, GETVISIT+43, GETVISIT+45, GETVISIT+52, GETVISIT+56, GETVISIT+60, HAVEREQ~ , MATCH~, ADDVIST~ |
| OUT( | MATCH+23*, ADDVIST+18* |
| OUT(0 | GETVISIT+48, GETVISIT+53, HAVEREQ+1*, HAVEREQ+2*, HAVEREQ+3*, HAVEREQ+4*, HAVEREQ+5*, HAVEREQ+6*, HAVEREQ+7*, HAVEREQ+8* , MATCH+2*, MATCH+22*, ADDVIST+17*, ADDVIST+18* |
| PRVS | PRVMTCH+1~ |
| PRVS( | PRVMTCH+6*, PRVMTCH+7 |
| RANGE | TIME~, TIME+2, TIME+8 |
| STOP | MATCH+1~, MATCH+11*, MATCH+13*, MATCH+18*, MATCH+20*, MATCH+21* |
| SW | TIME+1~, TIME+5* |
| TMDIF | TIME+1~, TIME+2*, TIME+3, TIME+4 |
| TMP | GETVISIT+36~, GETVISIT+38*, GETVISIT+39, GETVISIT+41, GETVISIT+43, GETVISIT+45, GETVISIT+52, GETVISIT+56, GETVISIT+60 |
| TMP("ANCILLARY" | GETVISIT+50, GETVISIT+51! |
| TMP("APPT DAT | E" , GETVISIT+45 |
| TMP("FORCE AD | D" , GETVISIT+41 |
| TMP("NEVER AD | D" , GETVISIT+45, GETVISIT+54, GETVISIT+58 |
| TMP("PROVIDER" | GETVISIT+51! |
| TMP("VISIT DA | TE" , GETVISIT+55* |
| U | MATCH+7 |
| VDTTM | TIMEDIF~, TIMEDIF+1 |
| VIEN | MATCH+1~, MATCH+5*, MATCH+6*, MATCH+7, MATCH+8, MATCH+9, MATCH+10, MATCH+12, MATCH+20, MATCH+21 , MATCH+23, PRVMTCH+5, TIMEDIF~, TIMEDIF+1 |
| VISIT | TIME~, TIME+3, TIME+4 |
| VSIT | ADDVIST+1~ |
| VSIT("DSS" | ADDVIST+7* |
| VSIT("IEN" | ADDVIST+17, ADDVIST+18 |
| VSIT("INS" | ADDVIST+5* |
| VSIT("LOC" | ADDVIST+8* |
| VSIT("OPT" | ADDVIST+10* |
| VSIT("OUT" | ADDVIST+12* |
| VSIT("PAT" | ADDVIST+4* |
| VSIT("SVC" | ADDVIST+6* |
| VSIT("TYP" | ADDVIST+3* |
| VSIT("USR" | ADDVIST+9* |
| VSIT("VDT" | ADDVIST+2* |
| VSIT("VID" | ADDVIST+11* |
| VSIT(0 | ADDVIST+13* |
| VSITPKG | ADDVIST+1~, ADDVIST+14* |
| >> XQY | ADDVIST+10 |