;S %ZIS="NMQ",%ZIS("B")="",IOP="Q" W ! D ^%ZIS K %ZIS Q:POP S %DT="AET",%DT("A")="TIME TO RUN: T+1@1AM//" D ^%DT S:Y>0 ZTDTH=Y I Y'>0 S %DT="T",X="T+1@1AM" D ^%DT S ZTDTH=Y
Prompt: @IOF,?19,"INFECTION CONTROL SURVEY DATA",!!
Line Location: SURVEY+0
Function Call: WRITE
Prompt: !,"No reports were selected!"
Line Location: SURVEY+7
Function Call: WRITE
Prompt: !,"Default reports are setup in the Laboratory Site file, 69.9."
Line Location: INFO+0
Function Call: WRITE
Prompt: !,"If you answer 'NO', you can select individual surveys grouped by:",!,"organism, location, patient, and/or physician. You can select all items",!,"or a single item for each group. You can also select to have all groups"
Line Location: INFO+1
Function Call: WRITE
Prompt: !,"contain a survey of a single organism. Surveys can be reported by",!,"Site/Specimen or Collection sample."