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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: RMPREOS

Package: Prosthetics

Routine: RMPREOS


Information

RMPREOS ;HINES-CIOFO/HNC,RN,ATG/JPN -Suspense Processing ;July 29, 2020@10:00

Source Information

Source file <RMPREOS.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;Add Manual Suspense
EX
EN2 ;edit MANUAL suspense record
PROC
ENIA ;initial action note
FORW ;forward consult
CLNT ;post closed note
OACT ;other notes - no initial needed 3/12/01
CANCEL ;cancel suspense
LINK60 ;link suspense to 2319 records
SCR(SERV,USR) ; SCREEN SERVICES THAT CAN BE FORWARDED TO ,RMPR*3*85

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " <Another user is editing this entry>"
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !,$C(7),?5,"Deleted..."
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !!!,"Can Not Edit This Suspense Record!",!!
  • Line Location: EN2+3
Function Call: WRITE
  • Prompt: " <Another user is editing this entry>"
  • Line Location: PROC+0
Function Call: WRITE
  • Prompt: " ",Y," ",$E($P(^DPT($P(RO,U,2),0),U,1),1,20)
  • Line Location: PROC+2
Function Call: WRITE
  • Prompt: " ",RR," ",$S($P(RO,U,5)?7N.N:"CLOSED",1:"OPEN")
  • Line Location: PROC+6
Function Call: WRITE
  • Prompt: !!!,"Initial Action Note Already Posted!",!!
  • Line Location: ENIA+2
Function Call: WRITE
  • Prompt: " <Another user is editing this entry>"
  • Line Location: ENIA+3
Function Call: WRITE
  • Prompt: !!!,"Can Not Forward.",!!
  • Line Location: FORW+1
Function Call: WRITE
  • Prompt: !!!,"Completion Note Already Posted!",!!
  • Line Location: FORW+2
Function Call: WRITE
  • Prompt: !!,"Not Forwarded! No Service Selected ."
  • Line Location: FORW+10
Function Call: WRITE
  • Prompt: " <Another user is editing this entry>"
  • Line Location: FORW+12
Function Call: WRITE
  • Prompt: !!,"Must Have Note to Forward. Consult Not Forwarded."
  • Line Location: FORW+22
Function Call: WRITE
  • Prompt: !!,"ERROR, DID NOT FORWARD!"
  • Line Location: FORW+53
Function Call: WRITE
  • Prompt: !!,"Consult Forwarded."
  • Line Location: FORW+54
Function Call: WRITE
  • Prompt: !!!,"Completion Note Already Posted!",!!
  • Line Location: CLNT+2
Function Call: WRITE
  • Prompt: " <Another user is editing this entry>"
  • Line Location: CLNT+3
Function Call: WRITE
  • Prompt: !!,$P(BDC,U,2)
  • Line Location: CLNT+37
Function Call: WRITE
  • Prompt: !!!,"No Initial Action Taken... ",!!
  • Line Location: OACT+3
Function Call: WRITE
  • Prompt: " <Another user is editing this entry>"
  • Line Location: OACT+5
Function Call: WRITE
  • Prompt: !!!,"This has already been completed, cannot cancel!",!!
  • Line Location: CANCEL+4
Function Call: WRITE
  • Prompt: " <Another user is editing this entry>"
  • Line Location: CANCEL+5
Function Call: WRITE
  • Prompt: !!!,"This will CANCEL/DELETE this Suspense Request."
  • Line Location: CANCEL+8
Function Call: WRITE
  • Prompt: !!,"Suspense Not Cancelled!"
  • Line Location: CANCEL+10
Function Call: WRITE
  • Prompt: !!,?5,"DELETED/CANCELLED!"
  • Line Location: CANCEL+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(123.5 - [#123.5] Classic Fileman Calls
^RMPR(668 - [#668] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call