©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
SDAMQ ;ALB/MJK - AM Background Job ; 12/1/91
Source file <SDAMQ.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 6 | (ADD,BULL,UPD)^SDAMQ1 EN^SDAMQ3 EN^SDAMQ4 EN^SDAMQ5 ($$NOW,$$SWITCH)^SDAMU ^SDMHNS |
| VA Fileman | 2 | C^%DTC ^DIR |
| Kernel | 1 | ^%ZTLOAD |
| Registration | 1 | $$FDATE^VALM1 |
| Package | Total | Caller Graph |
|---|---|---|
| Scheduling | 11 | SDAM APPT UPDATE SDAM BACKGROUND JOB SDAMLD SDAMO SDAMOCC SDAMODO SDAMOW SDAMQ3 SDAMQ4 SDAMQ5 SDMHAD |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; -- manual entry point
|
|
| RANGE(SDBEG,SDEND,SDAMETH) | ; -- select range
|
|
| START | ;
|
|
| AUTO | ; -- nightly job entry point
|
|
| STARTQ | ||
| DIV(SDIV,SDNAME,SDLEN) | ; -- get division ifn and name
; input: SDIV := candidate division ifn ; SDLEN := length of name to pass back [optional] ; output: SDNAME := name of division ; return: := division ifn |
|
| ENQ | ||
| RANGEQ | ||
| AUTOQ | ||
| CO(SDOE) | ; -- has co process completed
|
|
| MES | ;
|
|
| SWITCH() | ;
|
| Name | Field # of Occurrence |
|---|---|
| C^%DTC | AUTO+3, AUTO+6, RANGE+3 |
| ^%ZTLOAD | EN+7 |
| ^DIR | RANGE+7, RANGE+11 |
| ADD^SDAMQ1 | START+5 |
| BULL^SDAMQ1 | START+12 |
| UPD^SDAMQ1 | START+11 |
| EN^SDAMQ3 | START+6 |
| EN^SDAMQ4 | START+7 |
| EN^SDAMQ5 | START+8 |
| $$NOW^SDAMU | START+5, START+11 |
| $$SWITCH^SDAMU | AUTO+6, SWITCH+1, MES+2, RANGE+4 |
| ^SDMHNS | AUTO+4 |
| $$FDATE^VALM1 | MES+2, RANGE+4, RANGE+6, RANGE+8, RANGE+10 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(40.8 - [#40.8] | DIV+8, DIV+9 |
| ^DG(43 - [#43] | DIV+8 |
| ^SCE - [#409.68] | CO+1 |
| ^SDD(409.65 - [#409.65] | AUTO+6 |
| ^TMP("SDSTATS" | START+4!, STARTQ! |
| Name | Line Occurrences |
|---|---|
| $$RANGE | EN+3 |
| $$SWITCH | EN+1, START+1, AUTO+1 |
| AUTOQ | AUTO+1 |
| ENQ | EN+1, EN+3 |
| MES | EN+1 |
| RANGEQ | RANGE+7, RANGE+11 |
| START | AUTO+4, AUTO+6 |
| STARTQ | START+1 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | DIV+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIR | RANGE+7!, RANGE+11! |
| DIR("?" | RANGE+6*, RANGE+10* |
| DIR("A" | RANGE+5*, RANGE+9* |
| DIR("B" | RANGE+4*, RANGE+8* |
| DIR(0 | RANGE+5*, RANGE+9* |
| DT | AUTO+3, AUTO+6, SWITCH+1, RANGE+2, RANGE+3 |
| SDAMETH | EN+2~, EN+3*, STARTQ!, AUTO+4*, AUTO+6*, AUTOQ!, RANGE~, RANGE+3 |
| SDBACK | AUTO+6*, AUTOQ! |
| SDBEG | EN+2~, EN+3*, START+6, START+7, START+8, START+11, STARTQ!, AUTO+4*, AUTO+6*, AUTOQ! , RANGE~, RANGE+2*, RANGE+7*, RANGE+9, RANGE+10 |
| SDEND | EN+2~, EN+3*, START+6, START+7, START+8, START+11, STARTQ!, AUTO+4*, AUTO+6*, AUTOQ! , RANGE~, RANGE+2*, RANGE+11*, RANGEQ |
| SDFIN | START+2~, START+11* |
| SDIV | DIV~, DIV+8 |
| SDLEN | DIV~, DIV+7~*, DIV+9 |
| SDNAME | DIV~, DIV+9* |
| SDOE | CO~, CO+1 |
| SDOPCDT | AUTO+4*, AUTOQ! |
| SDSTART | START+2~, START+5* |
| SDT | RANGE+1~, RANGE+2*, RANGE+3*, RANGE+4, RANGE+5, RANGE+6, RANGE+8, RANGE+9, RANGE+10 |
| SDWITCH | RANGE+1~, RANGE+4*, RANGE+5, RANGE+6 |
| U | AUTO+6, RANGE+5, RANGE+9, DIV+8, DIV+9, CO+1 |
| X | EN+6*, AUTO+4, AUTO+6, AUTOQ!, RANGE+1~, RANGE+3, DIV+6~, DIV+8*, DIV+9, DIV+10 |
| X1 | AUTO+3*, AUTO+6*, AUTOQ!, RANGE+1~, RANGE+3* |
| X2 | AUTO+3*, AUTO+6*, AUTOQ!, RANGE+1~, RANGE+3* |
| >> Y | RANGE+7, RANGE+11 |
| >> ZTDESC | EN+5* |
| >> ZTIO | EN+5* |
| >> ZTRTN | EN+5* |
| >> ZTSAVE( | EN+6* |
| ZTSK | EN+7! |