RADLY1 ;HISC/GJC-Rad Daily Log Report ;5/7/97 13:50
Source file <RADLY1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
; Output subroutine part one
|
||
P1 | ||
P2 | ||
P3 | ||
P4 | ||
P5 | ||
P6 | ||
HD | ; Header
|
|
PRT1 | ; Output subroutine two
|
|
KILL | ; Kill variables
|
|
DIVCHK | ; Output statistics within division.
|
|
IMGCHK | ; Check for EOS on I-Type
|
|
LOCCHK | ; Check for EOS on Loc-Type
|
|
CKCHANGE | ; Check for change in div/img-type/img-loc, for header
|
|
SORT | ; Gather/sort data
|
|
ZEROUT | ; zero out the ^tmp($j,"RADLY"
; loop throu raccess(duz,"DIV,ITYP-ILOC",divname,imgtypename,imglocname) ; THIS SECTION REPLACES THE ORIGINAL CALL TO ZEROUT^RADLQ3("RADLY") ; so to ensure that locations not assigned to the user will be ; zeroed out, if those locations share the same imaging types that ; his assigned locations have |
|
ZER1 | ||
ZER2 | ||
ZER3 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|