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

Package: Radiology Nuclear Medicine

Routine: RAORDR1


Information

RAORDR1 ;ABV/SCR/MKN - Refer Pending/Hold Requests continued ; Apr 14, 2025@11:55:42

Source Information

Source file <RAORDR1.m>

Entry Points

Name Comments DBIA/ICR reference
MAKECONS(RAOIFN) ;Create Consult using Order Dialog GMRCOR CONSULT
HOLD(RAOIFN,RAORIEN,RAOREA) ;p196 - put radiology order on hold set special comment.
USRPRMT() ;Prompt for consult/request service -p161 REMOVE!
CHECKDLG() ;
UPORDLG(RADLGNA,RADATA) ;Stuff answer into Order Dialog array ORDIALOG
DLGLST ;
ERROR(RAERR) ;
GETDIAG(RAORDIEN) ;RETURN POINTER TO #80 FROM ORDER ENTRY
MAMMO() ;p223 - modified
GETCON(RAOIEN,RAITYP,RAIL) ;p223 - get consult title
SPECPR(RAOIEN,RAIL) ;p223 - Check if procedure has a special CC Title mapped
MAP(RAIN) ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,RAERR
  • Line Location: ERROR+1
Function Call: WRITE
  • Prompt: !!,"Please select the type of Mammography order from the following options:"
  • Line Location: MAMMO+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^OR(100 - [#100] GETS^DIQ
^ORD(101.43 - [#101.43] FIND^DIC
^GMR(123 - [#123] GET1^DIQ
^RAMIS(71 - [#71] GET1^DIQ
^RAO(75.1 - [#75.1] GETS^DIQ
79.11 FIND1^DIC,  GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call