©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
SDCO20 ;ALB/RMO - Process One Classification - Check Out;30 DEC 1992 1:10 pm
Source file <SDCO20.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 4 | FILE^DICN ^DIE (,IX1)^DIK ^DIR |
| Scheduling | 2 | $$VAL^SDCODD COMDT^SDCODEL |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FILEQ | ||
| NEWQ | ||
| VAL(SDCTI,SDCT0,SDATA) | ;Get Outpatient Classification
|
|
| ONEQ | ||
| NEW(SDCTI,SDOE) | ;Add a New Outpatient Classification
; Input -- SDCTI Appointment Outpatient Type file IEN ; SDOE Outpatient Encounter file IEN ; Output -- Outpatient Classification file IEN |
|
| ONE(SDCTI,SDATA,SDOE,SDCOQUIT) | ;Process One Classification
; Input -- SDCTI Outpatient Classification Type IEN ; SDATA Null or 409.42 IEN^Internal Value^1=n/a^1=unedt ; SDOE Outpatient Encounter file IEN ; Output -- SDCOQUIT User entered '^' or timeout |
|
| REASK | ||
| VALQ | ||
| FILE(SDCNI,SDCNV) | ;File Outpatient Classification
; Input -- SDCNI Outpatient Classification IEN ; SDCNV Outpatient Classification Value ; Output -- File Outpatient Classification |
| FileNo | Call Tags |
|---|---|
| ^SDD(409.42 - [#409.42] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(43 - [#43] | REASK+6 |
| ^SCE - [#409.68] | ONE+15, VAL+2 |
| ^SD(409.41 - [#409.41] | ONE+6, REASK+3 |
| ^SDD(409.42 - [#409.42] | NEW+7* |
| Name | Line Occurrences |
|---|---|
| $$NEW | FILE+5 |
| $$VAL | ONE+13 |
| FILE | ONE+16 |
| FILEQ | FILE+5 |
| ONEQ | ONE+6, ONE+7, ONE+11, ONE+14 |
| REASK | REASK+6 |
| VALQ | VAL+2 |
| Name | Field # of Occurrence |
|---|---|
| ^(2 | REASK+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | ONE+9*, FILE+4~, FILE+6*, NEW+4~, NEW+7* |
| DD | NEW+4~ |
| DIC | NEW+4~, NEW+5* |
| DIC(0 | NEW+5* |
| DIE | FILE+4~, FILE+6* |
| DIK | ONE+9*, NEW+4~, NEW+5* |
| DINUM | NEW+4~ |
| DIR | VAL+1~ |
| DIR("?" | REASK+4* |
| DIR("A" | REASK* |
| DIR("B" | REASK+1* |
| DIR(0 | REASK+2*, REASK+3* |
| DIRUT | REASK+8!, REASK+9, VALQ! |
| DLAYGO | NEW+4~, NEW+5* |
| DO | NEW+4~ |
| DR | FILE+4~, FILE+6* |
| DTOUT | REASK+6, VALQ! |
| DUOUT | REASK+8!, VALQ! |
| SDATA | ONE~, ONE+7, ONE+9, ONE+11, ONE+12, ONE+13, ONE+15, ONE+16, VAL~, REASK+1 , REASK+6 |
| SDCNI | FILE~, FILE+5*, FILE+6, NEW+4~, NEW+6*, NEW+7, NEWQ |
| SDCNV | FILE~ |
| SDCOQUIT | ONE~, ONE+14* |
| SDCT0 | ONE+5~, ONE+6*, ONE+8, ONE+12, ONE+13, ONE+15, VAL~, REASK, REASK+1, REASK+2 , REASK+6 |
| SDCTI | ONE~, ONE+6, ONE+12, ONE+13, VAL~, VAL+2, REASK+1, REASK+3, REASK+4, FILE+5 , NEW~, NEW+5 |
| SDOE | ONE~, ONE+15, VAL+2, FILE+5, NEW~, NEW+7 |
| SDVAL | ONE+5~, ONE+13*, ONE+14, ONE+16 |
| X | FILE+4~, NEW+4~, NEW+5* |
| Y | VAL+1~, VAL+3*, REASK+6, REASK+7, REASK+9*, VALQ+1, NEW+4~, NEW+6 |