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

Package: Medicine

Routine: MCAREH


Information

MCAREH ;WISC/MLH-ENTER/EDIT CARDIAC PROCEDURES-HELP ;5/2/96 10:26

Source Information

Source file <MCAREH.m>

Entry Points

Name Comments DBIA/ICR reference
DATE ; provide guidance for the date prompt
CENTER(TEXT,MGN) ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @$G(IOF)
  • Line Location: DATE+2
Function Call: WRITE
  • Prompt: *27,"#",I,$$CENTER(HEADING,40),!
  • Line Location: DATE+4
Function Call: WRITE
  • Prompt: $$CENTER(HEADING,80),!
  • Line Location: DATE+5
Function Call: WRITE
  • Prompt: !,"TO ENTER A NEW PROCEDURE:"
  • Line Location: DATE+6
Function Call: WRITE
  • Prompt: !!?5,"Enter the date and time when the procedure was performed."
  • Line Location: DATE+7
Function Call: WRITE
  • Prompt: !!,"TO EDIT AN EXISTING PROCEDURE:"
  • Line Location: DATE+8
Function Call: WRITE
  • Prompt: !!?5,"Enter the patient's name, last name first, or 1st initial of the"
  • Line Location: DATE+9
Function Call: WRITE
  • Prompt: !,?5,"last name and the last 4 digits of the social security number.",!
  • Line Location: DATE+10
Function Call: WRITE
  • Prompt: !?5,"A partial name may be entered"_$S($G(MCESON)=1:" or a release status",1:"")_"."
  • Line Location: DATE+11
Function Call: WRITE
  • Prompt: !?5,"This will bring up all entries matching that part of the name."
  • Line Location: DATE+12
Function Call: WRITE
  • Prompt: !!?5,"Or you may enter the date and time when the procedure was"
  • Line Location: DATE+13
Function Call: WRITE
  • Prompt: !?5,"performed. This must be an exact match."
  • Line Location: DATE+14
Function Call: WRITE
  • Prompt: !!?5,"Or enter a ? to choose from a list of procedures."
  • Line Location: DATE+15
Function Call: WRITE
  • Prompt: !!?5,"Release Control is "_$S($G(MCESON)=1:"available",1:"not available")_". "
  • Line Location: DATE+16
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+22
Function Call: WRITE
  • Prompt: $J("",MGN-$L(TEXT)/2),TEXT
  • Line Location: CENTER+1
Info |  Source |  Entry Points |  Interaction Calls