©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
SDAMO ;ALB/MJK - AM Mgt Reports ; 12/1/91
Source file <SDAMO.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 3 | STATS^SDAMOS $$RANGE^SDAMQ ASK2^SDDIV |
| IHS Changes To Scheduling | 1 | CLINIC^BSDU |
| Registration | 1 | FIRST^VAUTOMA |
| VA Fileman | 1 | ^DIR |
| Package | Total | Caller Graph |
|---|---|---|
| Scheduling | 6 | SDAM RPT MANAGEMENT SDAMO0 SDAMOC SDAMOS SDAMOS0 SDROUT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SELECT() | ; -- get selection criteria
; input: none ; output: SDSEL := criteria selected ; return: was selection made [ 1|yes 0|no] |
|
| EN | ; main entry point
|
|
| DIV() | ; -- get division data
; input: none ; output: VAUTD := divs selected (VAUTD=1 for all) ; return: was selection made [ 1|yes 0|no] |
|
| EN1 | ||
| RANGE() | ; select date range
; input: none ; output: SDBEG := begin date ; SDEND := end date ; return: was selection made [ 1|yes 0|no] |
|
| CLINICQ | ||
| STOPQ | ||
| INIT() | ; -- init vars
|
|
| LINE(STR) | ; -- print line
; input: STR := text to insert ; output: none ; return: text to use |
|
| ENQ | ||
| CLINIC() | ; -- get clinic data
; input: VAUTD := divisions selected ; output: VAUTC := clinic selected (VAUTC=1 for all) ; return: was selection made [ 1|yes 0|no] |
|
| STOP() | ; -- get stop code data
; output: VAUTC := stop codes selected (VAUTC=1 for all) ; return: was selection made [ 1|yes 0|no] |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(40.7 - [#40.7] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(43 - [#43] | DIV+5 |
| Name | Line Occurrences |
|---|---|
| $$INIT | EN1 |
| $$LINE | RANGE+6, SELECT+5, DIV+5, CLINIC+5, STOP+4 |
| $$RANGE | EN1+1 |
| $$SELECT | EN1+2 |
| ENQ | EN1, EN1+1, EN1+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIC | EN+1~, STOP+5* |
| DIR | SELECT+10! |
| DIR("A" | SELECT+9* |
| DIR("B" | SELECT+9* |
| DIR(0 | SELECT+9* |
| >> DIRUT | SELECT+10 |
| IOM | LINE+7 |
| SDAMLIST | EN+1~ |
| SDBEG | EN+1~, RANGE+7 |
| SDEND | EN+1~, RANGE+7 |
| SDSEL | EN+1~, EN1+3*, SELECT+10*, SELECT+11 |
| SDSORT | EN+1~ |
| STR | LINE~, LINE+6*, LINE+7, LINE+8 |
| U | DIV+5 |
| VAUTC | EN+1~, CLINIC+10!, CLINICQ, STOP+7!, STOPQ |
| VAUTD | EN+1~, DIV+6!, DIV+7 |
| >> VAUTNI | STOP+5* |
| >> VAUTSTR | STOP+5* |
| >> VAUTVB | STOP+5* |
| X | SELECT+6*, SELECT+7*, SELECT+8*, SELECT+9, LINE+5~, LINE+7*, LINE+8 |
| >> Y | SELECT+10, DIV+6, CLINIC+10, STOP+7 |