Routine: PSOATRR

Information

PSOATRR ;BIR/SJA - INTERNET REFILL REPORT SORTED BY RESULT ;05/29/07 12:36pm

Source file <PSOATRR.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"NO DATA FOUND TO PRINT FOR THIS RANGE.",! Line Location: START+15
Function Call: WRITE	Prompt: @IOF Condition for execution: $E(IOST)="P" Line Location: START+15
Function Call: WRITE	Prompt: !,"INTERNET REFILL REPORT BY RESULT"_" - "_$S(PSODS="D":"Detail",1:"Summary") Line Location: HD+1
Function Call: WRITE	Prompt: ?45,$P(RDATE,":",1,2) Line Location: HD+2
Function Call: WRITE	Prompt: ?$S($G(PSORMZ):120,1:68),"PAGE: "_PAGE Line Location: HD+2
Function Call: WRITE	Prompt: !,$S(PSODS="D":"Not Filled - ",1:"")_"For date range "_$G(PSOSDX)_" through "_$G(PSOEDX)_" for "_$P(^PS(59,DIV,0),"^") Line Location: HD+3
Function Call: WRITE	Prompt: !!,"Result",?30,"Count" Line Location: HD+4
Function Call: WRITE	Prompt: ?$S($G(PSORMZ):58,1:20),"Reason" Line Location: HD+5
Function Call: WRITE	Prompt: !,LINE Line Location: HD+6
Function Call: WRITE	Prompt: ! Line Location: PRT+2
Function Call: WRITE	Prompt: ?$S($G(PSORMZ):58,1:20),$P(PNODE,"^",10) Line Location: PRT+6
Function Call: WRITE	Prompt: !!!,"Total: ",?30,(PSOT(1)+PSOT(2)) Line Location: FO+0
Function Call: WRITE	Prompt: !,"Filled = "_PSO(1)," Not Filled = ",PSO(2) Line Location: FO+3
Function Call: WRITE	Prompt: ! Line Location: T1+0
Function Call: WRITE	Prompt: !!,"NO DATA FOUND TO PRINT FOR THIS RANGE.",! Line Location: SUMM+2