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

Package: Radiology Nuclear Medicine

Routine: RAHLRS


Information

RAHLRS ;HIRMFO/CRT/PDW - Resend HL7 messages for selected cases ; Jan 13, 2021@12:17:40

Source Information

Source file <RAHLRS.m>

Entry Points

Name Comments DBIA/ICR reference
RACNLU(RADFN,RADTI,RACNI) ; Select Case Number
RESEND(RADFN,RADTI,RACNI,QUIT) ; re-send exam message(s) to HL7 subscribers
RAED(RADFN,RADTI,RACNI) ; identify correct ^RAHLRPC entry point(s)
OK(RADFN,RADTI,RACNI) ; Get User to confirm continue
SETVARS ; Setup key Rad/Nuc Med variables
RAADT ;Send patient demographic update (A47/A08) to PACS - P137/KLM
TADT ;task entry or fall through
EXIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"You need imaging patch MAG*3.0*183 installed to use this option!"
  • Line Location: RAADT+2
Function Call: WRITE
  • Prompt: !!,"IHE is not enabled!",!,"See MAG*3.0*183 patch instructions to setup/enable ADT messages to PACS."
  • Line Location: RAADT+6
Function Call: WRITE
  • Prompt: !!,"This option will send patient demographic updates for selected patients.",!
  • Line Location: RAADT+7
Function Call: WRITE
  • Prompt: !,"It is recommended that you task this if you select 'ALL' patients.",!!
  • Line Location: RAADT+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: RAADT+12
Function Call: WRITE
  • Prompt: !!?3,$C(7),"No Patient selected."
  • Line Location: RAADT+14
Function Call: WRITE
  • Prompt: !,"Would you like to task this Job"
  • Line Location: RAADT+15
Function Call: WRITE
  • Prompt: !,"Task# "_ZTSK,!!
  • Line Location: RAADT+20
Function Call: WRITE
  • Prompt: !!,"Demographic updates sent for "_RACT_" patients"
  • Line Location: TADT+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^MAG(2006.1 - [#2006.1] GET1^DIQ
70.03 GET1^DIQ
^RA(72 - [#72] GET1^DIQ
^RARPT - [#74] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call