Routine: QAOSPTR1

Information

QAOSPTR1 ;HISC/DAD-REVIEW LEVEL TRACKING REPORT ;2/12/93 15:28

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"NO DATA FOUND FOR THIS REPORT" Line Location: QAOSPTR1+3
Function Call: WRITE	Prompt: !!,PAT,?35,SSN,?49,QAOSDT,?65,SCRN Line Location: LOOP2+3
Function Call: WRITE	Prompt: !?2,LOC,"#",$J(COUNT,2,0),": ",$E(X,1,60) Line Location: LOOP3+1
Function Call: WRITE	Prompt: !!,PAT,?35,SSN,?49,QAOSDT,?65,SCRN Line Location: LOOP3+2
Function Call: WRITE	Prompt: !!?80-$L(X)/2,X,?68,TODAY,!?QAQTART,QAQ2HED,?68,"PAGE: ",PAGE Line Location: HEAD+3
Function Call: WRITE	Prompt: !,"PATIENT",?35,"SSN",?49,"OCCURRENCE",?65,"SCREEN",!," PREVIOUS REVIEWS",?49,"DATE",!,UNDL Line Location: HEAD+4
Function Call: WRITE	Prompt: !!?3,"SERVICE: ",$S(SERV["~":$P(SERV,"~",2),1:SERV) Line Location: SHEAD+1