SDAMOWP ;ALB/CAW - Appointment Waiting Time Print Routine ; 12/1/91
Source file <SDAMOWP.m>
Package | Total | Call Graph |
---|---|---|
Registration | 2 | PID^VADPT6 ($$FDTTM,PAUSE)^VALM1 |
Scheduling | 1 | (HDR,HDRD,HDRT,LEGEND,TOT,TOTP)^SDAMOWP1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
PRINTQ | ||
PRTQ | ||
SET(SORT,LEVEL1,LEVEL2,LEVEL3,LEVEL4) | ;
|
|
TOTQ | ||
TOT | ; Totals Print
|
|
SORTQ | ||
SORT(DIV,SORT) | ; sort
|
|
PAUSE | ; pause for CRT
|
|
PRT() | ; -- print appt
; return: continue processing [ 1|yes 0|no ] ; ^TMP("SDWAIT") nodes setup: |
|
; -- print arrays
; var defined: ; SDSUB2 := top level sort after Division (clinic,stop cd,patient) ; SDSUB3 := next level sort |
||
CHECK | ; check to see if header should be printed
|
|
HRS(MIN) | ;Convert minutes to hours
|
Name | Field # of Occurrence |
---|---|
HDR^SDAMOWP1 | PRINT+7, SORT+5, SORT+6, CHECK+1, CHECK+2, CHECK+3 |
HDRD^SDAMOWP1 | PRINT+13 |
HDRT^SDAMOWP1 | PRINT+13 |
LEGEND^SDAMOWP1 | PRINT+15, TOT+2 |
TOT^SDAMOWP1 | PRINT+14, PRINT+15 |
TOTP^SDAMOWP1 | SORT+4 |
PID^VADPT6 | PRT+7 |
$$FDTTM^VALM1 | PRT+9, PRT+10 |
PAUSE^VALM1 | PRINT+9, CHECK+2, PAUSE+2 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(40.8 - [#40.8] | PRINT+14 |
^DPT - [#2] | PRT+8 |
^TMP("SDWAIT" | PRINT+7, PRINT+11, SORT+5, SORT+6, SORT+7, SORT+8, SORT+9 |
^TMP("SDWTTOT" | SORT+14 |
^TMP("SDWTTOTD" | PRINT+14, SORT+18 |
Name | Line Occurrences |
---|---|
$$HRS | PRT+9, PRT+10, TOT+2 |
$$PRT | SORT+9, SORT+11 |
CHECK | SORT+9, SORT+11 |
PAUSE | PRINT+12, SORT+16 |
PRINTQ | PRINT+7, PRINT+11, PRINT+12 |
SET | SORT+9, SORT+11 |
SORT | PRINT+11 |
SORTQ | SORT+4 |
TOT | SORT+15, SORT+19 |
Name | Field # of Occurrence |
---|---|
^( | SORT+11 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DFN | PRT+7*, PRT+8 |
DIV | SORT~, SORT+4, SORT+5, SORT+6, SORT+7, SORT+8, SORT+9, SORT+14 |
HRS | HRS+2~, HRS+3* |
HRS1 | HRS+2~, HRS+3*, HRS+4 |
IO | PRINT+5 |
IOSL | CHECK+2, CHECK+3 |
IOST | PRINT+9, CHECK+2, PAUSE+2 |
LEVEL1 | PRINT+5~, PRINT+7*, SORT+3*, SORT+4, SORT+5*, SORT+6*, SORT+7, SORT+8, SORT+9, SORT+11 , SORT+14, SET~, SET+1, SET+2, SET+3, SET+4, SET+5 |
LEVEL2 | SORT+3*, SORT+7*, SORT+8, SORT+9, SORT+11, SET~, SET+1, SET+2, SET+3, SET+4 , SET+5 |
LEVEL3 | SORT+3*, SORT+8*, SORT+9, SORT+11, SET~, SET+1, SET+2, SET+3, SET+4, SET+5 |
LEVEL4 | SORT+3*, SORT+9*, SORT+11, SET~, SET+3, SET+4 |
MIN | HRS~, HRS+3*, HRS+4 |
>> SDASH | PRINT+13, PRINT+14 |
>> SDASH1 | TOT+2 |
>> SDATA | SORT+9*, SORT+11*, PRT+7, PRT+9, PRT+10 |
>> SDATE | PRINT+6*, PRT+9, SET+1*, SET+2*, SET+3*, SET+4*, SET+5* |
SDCLN | PRINT+5~, PRINT+6*, PRT+8, SET+1*, SET+2*, SET+3*, SET+4*, SET+5* |
SDDIV | PRINT+5~, PRINT+6*, PRINT+7, PRINT+11*, PRINT+13*, PRINT+14*, SORT+18 |
SDNO | PRINT+5~, PRINT+7* |
>> SDPAGE | CHECK+1 |
SDPAT | PRINT+5~, PRINT+6*, SET+1*, SET+2*, SET+3*, SET+4*, SET+5* |
SDQUIT | PRINT+5~, PRINT+6*, PRINT+11, PRINT+12, PRINT+14, SORT+6, SORT+7, SORT+8, SORT+9, SORT+11 , SORT+12, SORT+16, CHECK+2*, PAUSE+2* |
SDREQ | PRT+6~ |
SDROU | PRINT+5~ |
>> SDSEL | SORT+2, SORT+4, SORT+17 |
>> SDSORT | PRINT+11, SORT+17, PRT+8 |
SDSTP | PRINT+5~, PRINT+6*, SET+3*, SET+4* |
SDTIME | PRT+6~ |
SDVAR | PRT+6~ |
SORT | SORT~, SORT+2, SORT+4, SORT+5, SORT+6, SORT+9, SORT+10, SORT+11, SORT+13, SORT+16 , SET~, SET+1, SET+2, SET+3, SET+4, SET+5 |
TOTAL | SORT+13~, SORT+14*, SORT+17~, SORT+18* |
TOTAL1 | SORT+13~, SORT+14*, SORT+17~, SORT+18*, TOT+2 |
TOTAL2 | SORT+13~, SORT+14*, SORT+17~, SORT+18*, TOT+2 |
TOTAL3 | SORT+13~, SORT+14*, SORT+17~, SORT+18*, TOT+2 |
TOTAL4 | SORT+13~, SORT+14*, SORT+17~, SORT+18*, TOT+2 |
U | PRINT+14, SORT+14, SORT+18, PRT+7, PRT+8, PRT+9, PRT+10 |
VA | PRT+6~ |
VA("BID" | PRT+8 |
Y | PRT+6~, PRT+11*, PRTQ, CHECK+2, PAUSE+2 |