Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: ORS100A

Package: Order Entry Results Reporting

Routine: ORS100A


Information

ORS100A ;SLC/RAF - Continuation of ORS100 ;10/20/00 14:47

Source Information

Source file <ORS100A.m>

Entry Points

Name Comments DBIA/ICR reference
LOOP ;called from ORS100
PROV ;loops thru the TMP global for output sort by provider
SPROV ;sorts for a single provider
PAT ;loops thru the TMP global for output sort by patient
SPAT ;sorts for a single patient
WARD ;loops thru the TMP global for output sort by location
SWARD ;sorts for a single location
EXIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No unsigned orders found"
  • Line Location: PROV+7
Function Call: WRITE
  • Prompt: $P(^(IEN),U),?25,$P(^(IEN),U,2),?50,$P(^(IEN),U,3),?75,$P(^(IEN),U,4),?81,$P(^(IEN),U,5),?95,$P(^(IEN),U,6),?110,$P(^(IEN),U,7),!
  • Line Location: PROV+11
Function Call: WRITE
  • Prompt: $P(^(IEN),U),?25,$P(^(IEN),U,2),?50,$P(^(IEN),U,3),?75,$P(^(IEN),U,4),?81,$P(^(IEN),U,5),?95,$P(^(IEN),U,6),?110,$P(^(IEN),U,7),!
  • Line Location: SPROV+10
Function Call: WRITE
  • Prompt: !!,"No unsigned orders found for "_LONER
  • Line Location: SPROV+12
Function Call: WRITE
  • Prompt: !,"No unsigned orders found"
  • Line Location: PAT+7
Function Call: WRITE
  • Prompt: $P(^(IEN),U),?25,$P(^(IEN),U,2),?30,$P(^(IEN),U,3),?55,$P(^(IEN),U,4),?81,$P(^(IEN),U,5),?95,$P(^(IEN),U,6),?110,$P(^(IEN),U,7),!
  • Line Location: PAT+11
Function Call: WRITE
  • Prompt: @IOF,@HDR
  • Line Location: PAT+13
Function Call: WRITE
  • Prompt: $P(^(IEN),U),?25,$P(^(IEN),U,2),?30,$P(^(IEN),U,3),?55,$P(^(IEN),U,4),?81,$P(^(IEN),U,5),?95,$P(^(IEN),U,6),?110,$P(^(IEN),U,7),!
  • Line Location: SPAT+10
Function Call: WRITE
  • Prompt: !!,"No unsigned orders found for "_LONER
  • Line Location: SPAT+12
Function Call: WRITE
  • Prompt: !,"No unsigned orders found"
  • Line Location: WARD+7
Function Call: WRITE
  • Prompt: $P(^TMP("ORUNS",$J,LOC,PROV,IEN),U,2),?25,$P(^(IEN),U,3),?50,$P(^(IEN),U,4),?75,$P(^(IEN),U,5),?81,$P(^(IEN),U,6),?95,$P(^(IEN),U,7),?110,$P(^(IEN),U,8),!
  • Line Location: WARD+11
Function Call: WRITE
  • Prompt: $P(^TMP("ORUNS",$J,LOC,PROV,IEN),U,2),?25,$P(^(IEN),U,3),?50,$P(^(IEN),U,4),?75,$P(^(IEN),U,5),?81,$P(^(IEN),U,6),?95,$P(^(IEN),U,7),?110,$P(^(IEN),U,8),!
  • Line Location: SWARD+10
Function Call: WRITE
  • Prompt: !!,"No unsigned orders found for "_LONER
  • Line Location: SWARD+12
Info |  Source |  Entry Points |  Interaction Calls