Routine: QAOSPSR0

Information

QAOSPSR0 ;HISC/DAD-OCCURRENCE SCREENS BY SERVICE ;2/12/93 15:26

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: DEV+1
Function Call: WRITE	Prompt: !!,"* NO OCCURRENCES FOUND IN THE SELECTED DATE RANGE *" Line Location: PRINT+1
Function Call: WRITE	Prompt: ! Line Location: EXIT+1
Function Call: WRITE	Prompt: !!,NAME,?32,SSN,?43,Y,?56,STAT,?65,$E(TXSP,1,15),!?1,SCRN,?8,$E(SCRNTXT,1,72) Line Location: PRT2+2
Function Call: WRITE	Prompt: !!?29,"OCCURRENCES BY SERVICE",?68,TODAY,!?QAQTART,QAQ2HED,?68,"PAGE: ",PAGE Line Location: HEAD+2
Function Call: WRITE	Prompt: !,"PATIENT / SCREEN",?32,"SSN",?43,"DATE",?56,"STATUS",?65,"TREATING SPEC.",!,UNDL Line Location: HEAD+4
Function Call: WRITE	Prompt: !!," SERVICE: ",SERV Line Location: SUBHEAD+1