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 |  Used in RPC
Print Page as PDF
Routine: ORCNOTE

Package: Order Entry Results Reporting

Routine: ORCNOTE


Information

ORCNOTE ; SLC/MKB - Progress Note actions ;Aug 24, 2021@09:58:32

Source Information

Source file <ORCNOTE.m>

Entry Points

Name Comments DBIA/ICR reference
ELSIG ; Sign rec
ELSIGX
ACCEPT(ORPICK,NMBR) ; Adds item(s) to signature list
SIGN ; -- sign notes
ADDENDUM ; -- make addendum
EDIT ; -- edit notes
COPY ; -- copy notes
DELETE ; -- delete notes
SIGNERS ; -- Identify additional signers
PRINT ; Print selected documents
PRINTX
CHARTANY(ORNMBR) ; Evaluate selected documents for chart print
PRINTN ; Loop through selected doc's & invoke print code as appropriate
BROWSE ; -- browse document
EX ; -- exit action
GETTOT(ORY,DFN) ; --get total count of signed progress notes, not
; counting addendums and child interdisciplinary notes
; ^TIU(8925,"ACLPT",3) refers to progress notes class

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Electronic signature not yet enabled."
  • Line Location: ELSIG+3
Function Call: WRITE
  • Prompt: !!,"Item #: ",NMBR,!,$P(ASK,U,2),!
  • Line Location: ELSIG+21
Function Call: WRITE
  • Prompt: !,"Removed from signature list.",!
  • Line Location: ELSIG+22
Function Call: WRITE
  • Prompt: !!,"Item #",NMBR,": ",TIUTYPE," for "
  • Line Location: ELSIG+27
Function Call: WRITE
  • Prompt: $$PTNAME^TIULC1($P(TIU0,U,2))," will need cosignature..."
  • Line Location: ELSIG+28
Function Call: WRITE
  • Prompt: !!,"Item #",NMBR,": MUST have a cosigner, before you may sign."
  • Line Location: ELSIG+32
Function Call: WRITE
  • Prompt: !!,"Removed from signature list.",!
  • Line Location: ELSIG+33
Function Call: WRITE
  • Prompt: !!,"Item #",NMBR,": This note contains no text and cannot be signed."
  • Line Location: ELSIG+37
Function Call: WRITE
  • Prompt: !!,"Removed from signature list.",!
  • Line Location: ELSIG+38
Function Call: WRITE
  • Prompt: !,"Item #",NMBR," added to the signature list."
  • Line Location: ACCEPT+3
Function Call: WRITE
  • Prompt: !,$C(7),"You may not make addenda to addenda."
  • Line Location: ADDENDUM+7
Function Call: WRITE
  • Prompt: ""
  • Line Location: ADDENDUM+8
Function Call: WRITE
  • Prompt: !!,"Item #",ORI,": ",!,$P(TIUPRINT,U,2),!
  • Line Location: PRINTN+12

Used in RPC

RPC Name Call Tags
ORCNOTE GET TOTAL GETTOT
Info |  Source |  Entry Points |  Interaction Calls |  Used in RPC