INPUT TRANSFORM: S DIC("S")="I $S('$D(^(""I"")):1,'^(""I""):1,DT'>^(""I""):1,1:0)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: AUG 08, 1991
HELP-PROMPT: Enter a film size used or wasted during this exam.
DESCRIPTION:
This field points to the 'FILM SIZES' file (#78.4) to indicate the size of the film used during the Rad/Nuc Med exam. Users may also enter film sizes that have been wasted during the exam.
SCREEN: S DIC("S")="I $S('$D(^(""I"")):1,'^(""I""):1,DT'>^(""I""):1,1:0)"
EXPLANATION: Only active film sizes are selectable.
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: OCT 13, 1994
HELP-PROMPT: Enter the amount of film, between 0 and 999, used or wasted during this exam.
DESCRIPTION: This field contains the amount of film (a number between 0 and 999) used or wasted during the Rad/Nuc Med exam.
The amount represents either the number of that film size or the number of cine feet of that film size. On the 'Film Usage Report', these two amounts are distinguished from each other.