©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
SDVSIT0 ;MJK/ALB,ESW,SCK - OE Processing ; 11/21/02 11:00am
Source file <SDVSIT0.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 4 | $$INP^SDAM2 EN^SDCOM $$REQ^SDM1A $$GETARN^SDPFSS2 |
| PCE Patient Care Encounter | 2 | ($$SOURCE,DISPVSIT)^PXAPI ^VSIT |
| VA Fileman | 2 | ^DIE EN^DIQ1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ADD(SDT,SDVSIT) | ; -- add/find outpatient encounter
; input SDT = visit date internal format ; SDVSIT = <see bottom of routine> |
|
| LOCK | ||
| STATUS(DFN,SDT,SDCL,SDORG,SDACT) | ; -- 409.68;.07 x-ref
|
|
| VISITQ | ||
| NEW(SDT,SDVSIT) | ; -- create new outpatient encounter record
; input SDT = visit date internal format ; SDVSIT = <see bottom of routine> |
|
| VISIT(SDT,SDVSIT) | ; -- add visit file entry
|
|
| NEWQ |
| FileNo | Call Tags |
|---|---|
| ^SCE - [#409.68] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | VISIT+3 |
| ^DG(40.8 - [#40.8] | VISIT+17 |
| ^DISV( | LOCK+1* |
| ^DPT - [#2] | LOCK+3, VISIT+9 |
| ^SC - [#44] | STATUS+3 |
| ^SCE - [#409.68] | LOCK, LOCK+1*, LOCK+7, VISIT+11 |
| ^SCE("B" | LOCK+1* |
| ^SCE(0 | NEW+8, LOCK+1* |
| Name | Line Occurrences |
|---|---|
| $$NEW | ADD+11 |
| $$STATUS | LOCK+4 |
| LOCK | LOCK |
| VISIT | ADD+9 |
| VISITQ | VISIT+3, VISIT+35 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | NEW+6~, LOCK+5*, VISIT+1~, VISIT+14~, VISIT+15*, VISIT+16 |
| DE | NEW+6~ |
| DFN | VISIT+1~, VISIT+6*, VISIT+7, VISIT+9, VISIT+12, VISIT+24, VISIT+35, STATUS~, STATUS+2 |
| DIC | VISIT+1~, VISIT+14~, VISIT+15* |
| DIC1 | VISIT+14~, VISIT+15*, VISIT+16 |
| DIE | NEW+6~, LOCK+5*, VISIT+1~ |
| DIQ | VISIT+14~, VISIT+15* |
| DIQ(0 | VISIT+15* |
| DQ | NEW+6~ |
| DR | NEW+6~, LOCK+5*, VISIT+1~, VISIT+14~, VISIT+15*, VISIT+16 |
| DUZ | LOCK+1 |
| I | NEW+6~, NEW+8*, LOCK*, LOCK+1 |
| INST | VISIT+14~ |
| INST( | VISIT+16 |
| >> SCCVT | VISIT+29 |
| >> SCCVT("LOC" | VISIT+32 |
| >> SCCVT("SOR" | VISIT+30 |
| >> SCCVT("SVC" | VISIT+31 |
| SDACT | STATUS~, STATUS+4 |
| SDCL | STATUS~, STATUS+3 |
| SDOE | NEW+6~, LOCK+5*, LOCK+6, LOCK+7, NEWQ |
| SDORG | STATUS~ |
| SDT | ADD~, ADD+9, ADD+11, NEW~, LOCK+1, LOCK+4, LOCK+6, VISIT~, VISIT+6, VISIT+7 , VISIT+12, VISIT+24, STATUS~, STATUS+2, STATUS+4 |
| SDVSIT | ADD~, ADD+9, ADD+11, NEW~, VISIT~ |
| SDVSIT("CLN" | VISIT+7 |
| SDVSIT("DFN" | LOCK+3, LOCK+4, VISIT+6 |
| SDVSIT("DIV" | VISIT+17 |
| SDVSIT("ELG" | LOCK+3*, VISIT+9 |
| SDVSIT("LOC" | LOCK+4, VISIT+10, VISIT+12 |
| SDVSIT("ORG" | LOCK+4, VISIT+23, VISIT+39, VISIT+40 |
| SDVSIT("PAR" | VISIT+11, VISIT+20 |
| SDVSIT("STA" | LOCK+4* |
| SDVSIT("SVC" | VISIT+7 |
| SDVSIT("VST" | ADD+7*, VISIT+41* |
| U | NEW+8, LOCK+3, VISIT+11, VISIT+17, STATUS+3 |
| VSIT | VISIT+1~, VISIT+6*, VISIT+11*, VISIT+35 |
| VSIT("ACT" | VISIT+12* |
| VSIT("CLN" | VISIT+7*, VISIT+35 |
| VSIT("ELG" | VISIT+9*, VISIT+35 |
| VSIT("IEN" | VISIT+41 |
| VSIT("INS" | VISIT+16*, VISIT+17*, VISIT+35 |
| VSIT("LNK" | VISIT+11*, VISIT+13, VISIT+15 |
| VSIT("LOC" | VISIT+10*, VISIT+32* |
| VSIT("PRI" | VISIT+21*, VISIT+24*, VISIT+26* |
| VSIT("SOR" | VISIT+30* |
| VSIT("SVC" | VISIT+7*, VISIT+24*, VISIT+31* |
| VSIT(0 | VISIT+6* |
| VSITPKG | VISIT+1~, VISIT+6* |
| X | NEW+6~, VISIT+1~, VISIT+3*, VISIT+11* |
| Y | LOCK+1*, LOCK+5, STATUS+1~*, STATUS+2*, STATUS+3*, STATUS+4*, STATUS+5 |