Prompt: !!,"This option will loop thru the PHARMACY AOU STOCK FILE (#58.1) and",!,"locate all ""ACTIVE"" AOUs that do not have an INPATIENT SITE defined."
Line Location: START+1
Function Call: WRITE
Prompt: *7,!!,"ALL ACTIVE AOUs HAVE INPATIENT SITE DEFINED!!"
Line Location: START+3
Function Call: WRITE
Prompt: *7,!!,"LOOP COMPLETED!"
Line Location: START+4
Function Call: WRITE
Prompt: !!,"=> ",AOU
Line Location: ED+1
Function Call: WRITE
Prompt: *7,!!,"LOOP INTERRUPTED!",!!," *** Please complete this editing soon, it is VERY IMPORTANT that ***",!," *** all your AOUs have the INPATIENT SITE field defined. ***"