SDC3 ;ALB/LDB - CANCELLATION LETTERS; 23-DEC-88@12:30
Source file <SDC3.m>
Package | Total | Call Graph |
---|---|---|
Registration | 1 | $$BADADR^DGUTL3 |
Scheduling | 1 | (,BADADD,REST,WRAPP)^SDLT |
Name | Comments | DBIA/ICR reference |
---|---|---|
PR | ||
SET | ||
EN | ||
PR1 | ;I $D(^UTILITY("SDLT",$J,SD1,"A",SD8)),A=SD8 W !!,"The cancelled appointments have been rescheduled as follows:",! D PR2
|
|
PR0 | ||
PR2 | ;F SD82=0:0 S SD82=$O(^UTILITY("SDLT",$J,SD1,"A",SD8,SD82)),SDX=SD82 Q:SD82'>0 S SC=$O(^(SD82,-1)),S=^DPT(+A,"S",SD82,0) D WRAPP^SDLT
|
|
B | ||
CHECK |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | CHECK, SET, PR0, PR2+1, B+1 |
^SC - [#44] | EN |
^TMP($J | PR+1!, B+1* |
^UTILITY("SDLT" | SET*, PR, PR0, PR1+1, PR2+1 |
Name | Line Occurrences |
---|---|
B | CHECK+1, PR0 |
CHECK | EN |
PR0 | PR |
PR1 | PR0 |
PR2 | PR1+1 |
SET | EN |
Name | Field # of Occurrence |
---|---|
^( | EN, PR0, PR2+1 |
^(0 | CHECK, SET |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> A | EN*, CHECK, SET, PR0*, PR1+1, PR2+1, B, B+1 |
BSDCNT | PR2+1!* |
>> L1 | EN* |
>> S | PR0*, PR2+1* |
S81 | PR0*, PR0+1! |
S82 | PR0*, PR0+1! |
>> SC | EN, SET, PR2+1* |
>> SD | EN, CHECK, SET |
>> SD1 | PR*, PR0, PR1+1, PR2+1 |
SD8 | SET*, PR0*, PR0+1!, PR1+1, PR2+1 |
SD82 | PR2+1*, PR2+2! |
SDBAD | EN~, CHECK+1, PR0, B*, B+1 |
>> SDC | PR0* |
>> SDLET | SET, PR* |
SDOK | EN, CHECK!*, CHECK+1! |
>> SDX | PR0*, PR2+1* |