SDAMOL1 ;ALB/CAW - Retroactive Appointment List (con't);4/15/92 ; 2/16/07 2:59pm
Source file <SDAMOL1.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Scheduling | 2 | SDAMOL SDAMOL1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
MAIN | ; main sort, by division
|
|
MAINQ | ; -- exit logic
|
|
SCAN | ; -- api to invoke scan
|
|
SCANQ | ||
CB(SDOE,SDOE0,SDSTOP) | ; -- main callback
|
|
CBQ | ||
NEXTDT(X1) | ; -- get next date
|
|
SET | ;^TMP("SDRAL",$J,Division,Stop Code,Visit Date,Patient)
|
|
SETQ | ||
TMP(SDENCDT,SDMADE) | ; -- Check to see if ^TMP("SDRL",$J,Encounter Date/Time)
; exists ; input - SDENCDT := encounter date/time ; SDMADE := date encounter made |
|
DIV() | ; -- valid division for report ?
|
|
CLINIC() | ; -- valid clinic for report ?
|
|
STOP() | ; -- valid stop code for report ?
|
|
APPT(SDCL,SDPAT,SDVSTDT) | ; Return 'Date Appt Made' field.
; If user selected specific Clinic or Stop Code then SDAPI has been called in line tag MAIN+nnn above. |
Name | Field # of Occurrence |
---|---|
C^%DTC | NEXTDT+2 |
$$S^%ZTLOAD | SCAN+3, CB+5 |
$$CLOSEOUT^SCDXFU04 | MAIN+7 |
$$SDAPI^SDAMA301 | MAIN+19, APPT+10 |
$$APPT^SDAMOL1 | CB+27 |
BLD^SDAMOLP | MAIN+24 |
$$SDAPIERR^SDAMUTDT | MAIN+21, APPT+12 |
ACTIVE^SDQ | SCAN+7, SCAN+11 |
CLOSE^SDQ | SCAN+13 |
DATE^SDQ | SCAN+9 |
INDEX^SDQ | SCAN+8 |
OPEN^SDQ | SCAN+6 |
SCAN^SDQ | SCAN+12 |
SCANCB^SDQ | SCAN+10 |
OUT^SDUTL | MAIN+21, APPT+12 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNVSIT - [#9000010] | CB+28 |
^DIC(40.7 - [#40.7] | MAIN+17, CB+30 |
^SC - [#44] | CB+29, CB+49 |
^SCE - [#409.68] | CB+22 |
^TMP("SDRAL" | MAIN+2!, MAINQ+5!, CB+7!, SET+2* |
^TMP("SDRL" | MAIN+2!, MAIN+8*, SET+2, TMP+7, TMP+8 |
^TMP($J | MAIN+11!, MAINQ+5!, APPT+2, APPT+5!, APPT+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
SDAD | MAINQ+1! |
SDAPPT | MAINQ+2! |
SDARRAY | MAIN+11~, MAIN+19, APPT+5~, APPT+10 |
SDARRAY("FLDS" | MAIN+19*, APPT+10* |
SDARRAY("MAX" | APPT+9* |
SDARRAY(1 | MAIN+12*, APPT+6* |
SDARRAY(13 | MAIN+15*, MAIN+18* |
SDARRAY(2 | MAIN+13*, APPT+7* |
SDARRAY(4 | APPT+8* |
SDASH | MAINQ+2! |
SDATA | MAINQ+1! |
>> SDBEG | MAIN+5, MAIN+12, SCAN+9 |
SDCB | SCAN+4~, SCAN+5*, SCAN+10 |
SDCL | CB+1~, CB+14*, CB+27, CB+29, CB+49, CLINIC+1, APPT~, APPT+2, APPT+7, APPT+13 |
SDCLC | MAINQ+2! |
SDCLIN | MAINQ+1! |
SDCLINIC | MAINQ+2! |
SDCLK | MAINQ+1!, CB+2~, CB+23*, SET+2 |
SDCLNM | MAINQ+1!, CB+2~, CB+29*, SET+2 |
SDCN | MAINQ+1! |
SDCNT | MAINQ+1! |
SDCODT | CB+2~, CB+17*, CB+43 |
SDCSC | MAINQ+2! |
SDDATE | MAINQ+2! |
SDDFN | MAINQ+1! |
SDDIV | MAINQ+2!, CB+1~, CB+20*, SET+2, DIV+1 |
SDDV | MAINQ+1! |
SDENCDT | TMP~, TMP+7, TMP+8 |
>> SDEND | MAIN+6, MAIN+12, SCAN+9 |
SDERR | MAIN+11~, MAIN+21*, APPT+5~, APPT+12* |
SDEXT | CB+1~, CB+19*, CB+27 |
SDFLEN | MAINQ+2! |
SDFLG | MAINQ+2! |
SDFST | MAINQ+3! |
SDMADE | TMP~, TMP+8 |
>> SDNPDB | MAIN+7 |
SDOE | CB~, CB+10, CB+22 |
SDOE0 | CB~, CB+11, CB+12, CB+13, CB+14, CB+15, CB+16, CB+17, CB+18, CB+19 , CB+20, CB+21, CB+40 |
SDOEP | CB+1~, CB+16*, CB+34 |
SDOEU | CB+1~, CB+22*, CB+23, CB+24 |
SDORG | CB+1~, CB+18*, CB+27, CB+31 |
SDPAGE | MAINQ+3! |
SDPAT | MAINQ+3!, CB+1~, CB+12*, CB+27, SET+2, APPT~, APPT+2, APPT+8, APPT+13 |
SDQID | SCAN+4~, SCAN+6, SCAN+7, SCAN+8, SCAN+9, SCAN+10, SCAN+11, SCAN+12, SCAN+13 |
SDRESULT | MAIN+11~, MAIN+19*, MAIN+20, APPT+5~, APPT+10*, APPT+11 |
SDROU | MAINQ+3! |
SDSC | MAINQ+1!, CB+1~, CB+13*, CB+30, STOP+1 |
SDSEC | MAINQ+3! |
SDSLEN | MAINQ+3! |
SDSTATUS | CB+2~, CB+21*, CB+46 |
SDSTOP | MAINQ+3!, CB~, CB+6* |
SDSTPC | MAINQ+3! |
SDSTPCDE | MAINQ+3!, CB+2~, CB+30*, SET+2 |
SDTMP | MAIN+1~, MAIN+5*, MAIN+6*, MAIN+7, MAIN+8, MAINQ+4! |
SDTMP1 | MAIN+1~, MAIN+15*, MAIN+16*, MAIN+17 |
SDTMP2 | MAIN+1~, MAIN+17*, MAIN+18 |
SDTRANS | MAINQ+4! |
SDTYPE | MAINQ+4!, CB+2~, CB+31*, SET+2 |
SDVDT | MAINQ+4! |
SDVISIT | MAINQ+4!, CB+1~, CB+10*, SET+2 |
SDVSIT | CB+2~, CB+15*, CB+28 |
SDVST | MAINQ+4! |
SDVSTDT | MAINQ+4!, CB+1~, CB+11*, CB+27, SET+2, APPT~, APPT+2, APPT+6, APPT+13 |
SDWHEN | MAINQ+4!, CB+2~, CB+24*, CB+27*, CB+28*, CB+37, CB+40, SET+2 |
SDX | MAIN+1~, MAIN+7*, MAIN+8 |
SDY | MAINQ+4! |
U | MAIN+7, CB+12, CB+13, CB+14, CB+15, CB+16, CB+17, CB+18, CB+19, CB+20 , CB+21, CB+24, CB+28, CB+29, CB+30, CB+49, SET+2, APPT+2, APPT+13 |
VA | MAINQ+5! |
VAERR | MAINQ+5! |
>> VAUTC | MAIN+10, MAIN+13, CLINIC+1, APPT+2 |
>> VAUTC( | CLINIC+1 |
>> VAUTD | DIV+1 |
>> VAUTD( | DIV+1 |
>> VAUTS | MAIN+10, MAIN+14, STOP+1, APPT+2 |
>> VAUTS( | MAIN+16, STOP+1 |
X | MAINQ+5!, NEXTDT+3 |
X1 | NEXTDT~ |
X2 | NEXTDT+1~, NEXTDT+2* |
>> ZTSTOP | SCAN+3*, CB+6* |