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: PSJMPRTU

Package: Inpatient Medications

Routine: PSJMPRTU


Information

PSJMPRTU ;BIR/MV-SETUP AND PRINT UD ORDER ;25 NOV 96 / 1:34 PM

Source Information

Source file <PSJMPRTU.m>

Entry Points

Name Comments DBIA/ICR reference
START ;
NEWPG ;
SETALL ;
P ;
G ;
W ;
PSJPRT(C1,C2,C3,C4,C5,C6,C7,C8,C9)
SETPVAR ;
PRT ;
HDR ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,PSJPRT(1),?39,PSGLOD," | "
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: "P E N D I N G"
  • Line Location: PRT+3
Function Call: WRITE
  • Prompt: PSGLSD," | ",PSGLFD
  • Line Location: PRT+4
Function Call: WRITE
  • Prompt: !,$G(PSJPRT(X+1))
  • Line Location: PRT+7
Function Call: WRITE
  • Prompt: ?39,MARX(X)
  • Line Location: PRT+7
Function Call: WRITE
  • Prompt: !?39
  • Line Location: PRT+8
Function Call: WRITE
  • Prompt: !?39
  • Condition for execution: ($L(Y1)+$X)>79
  • Line Location: PRT+8
Function Call: WRITE
  • Prompt: Y1_" "
  • Line Location: PRT+8
Function Call: WRITE
  • Prompt: !?39,"RN/LPN Init: ________"
  • Line Location: PRT+12
Function Call: WRITE
  • Prompt: !
  • Line Location: PRT+13
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: PSJHL62
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,PSJHL1,?66,"Page: ",PSGPG,!,PSJHL2
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $E(PSJADT,1,2)="88"
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !,PSJHL3,!
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !,"For date: ",$E($$ENDTC^PSGMI(PSJADT1),1,8),!
  • Line Location: HDR+9
Info |  Source |  Entry Points |  Interaction Calls