Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSGPOR

Package: Inpatient Medications

Routine: PSGPOR


Information

PSGPOR ;BIR/CML3-PATIENT ORDER PURGE REPORT ;24 JAN 94 / 11:15 AM

Source Information

Source file <PSGPOR.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Inpatient Medications 1 $$ENDTC^PSGMI  
VA FileMan 1 NOW^%DTC  

Entry Points

Name Comments DBIA/ICR reference
DONE ;
HEADER ;
WRT ;

External References

Name Field # of Occurrence
NOW^%DTC PSGPOR+2
$$ENDTC^PSGMI PSGPOR+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!?31,"NO ORDERS PURGED."
  • Line Location: PSGPOR+2
Function Call: WRITE
  • Prompt: !!!,LN2,!!?3,"PATIENTS: ",PT,?55,$J(NDT,5,0)
  • Line Location: PSGPOR+4
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: PSGPOR+4
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HEADER+1
Function Call: WRITE
  • Prompt: !!?25,"PATIENT ORDER PURGE REPORT",?64,PSGOD,!?16,"(FOR PATIENTS DISCHARGED ON OR BEFORE ",PSGPOD,")",?73-$L(PG),"Page: ",PG,!?5,"Patient",?55,"Number of",!?55,"Orders Purged",!,LN1
  • Line Location: HEADER+1
Function Call: WRITE
  • Prompt: !!?2,$S($P(PN,"^")]"":$P(PN,"^"),1:PSGP),$S($P(PN,"^",9):" ("_$E($P(PN,"^",9),6,10)_")",1:""),?55,$J(ND,5,0)
  • Line Location: WRT+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] WRT+1
^PS(53.43 - [#53.43] PSGPOR+2, PSGPOR+3, DONE+1!

Label References

Name Line Occurrences
DONE PSGPOR+2
HEADER PSGPOR+2, PSGPOR+3, PSGPOR+4
WRT PSGPOR+3

Naked Globals

Name Field # of Occurrence
^( PSGPOR+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PSGPOR+2
IO PSGPOR+2
IOF PSGPOR+4, DONE+1, HEADER+1
IOSL PSGPOR+3, PSGPOR+4
LN1 PSGPOR+2*, DONE+1!, HEADER+1
LN2 PSGPOR+2*, PSGPOR+4, DONE+1!
ND PSGPOR+3*, DONE+1!, WRT+1
NDT PSGPOR+3*, PSGPOR+4, DONE+1!, WRT+1*
>> PG PSGPOR+2*, PSGPOR+3*, HEADER+1*
>> PN WRT+1*
PSGID DONE+1!
>> PSGJ PSGPOR+2, PSGPOR+3, DONE+1
PSGOD PSGPOR+2*, DONE+1!, HEADER+1
PSGP PSGPOR+3*, DONE+1!, WRT+1
>> PSGPOD PSGPOR+2*, HEADER+1
PT PSGPOR+3*, PSGPOR+4, DONE+1!, WRT+1*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All