Prompt: !!,">>> Checking to see if any PIMS files are unprotected...",!
Line Location: DGVPT2+2
Function Call: WRITE
Prompt: !!,">>> No unprotected files found..."
Line Location: DGVPT2+6
Function Call: WRITE
Prompt: !,$P(DGF(F),"^",6)," (#",F,") has no "
Line Location: DGVPT2+8
Function Call: WRITE
Prompt: $P(X,"^",C),$S(C2=C1:".",1:",")
Line Location: DGVPT2+8
Function Call: WRITE
Prompt: !!,">>> Please note that this information is provided for informational purposes",!?4,"only. Lack of file protection does not necessarily indicate a problem since",!?4,"need and level of protection is determined by the local facility."