RAIPST4 ;HIRMFO/GJC - Post-init number four ;12/18/97 09:08
Source file <RAIPST4.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
VERSION | ;;5.0;Radiology/Nuclear Medicine;;Mar 16, 1998
|
|
EN1 | ; Add Exam Statuses with an Imaging Type of 'Mammography'.
; Exam Statuses created: Cancelled; Waiting For Exam; Called ; For Exam; Examined; Transcribed and Complete. |
|
ERMSG72(X) | ; Display error message when an Exam Status is not filed.
|
|
XIST(X,Y) | ; Check if an Exam Status for a particular imaging type exists
; in file 72. ; Input: X-Exam Status, Y-imaging type (pointer) |
|
EN2 | ; For the HL7 Application Parameter (file 771) 'Radiology',
; change the 'ORU' HL7 Message processing routine from RAHLO ; to the new bridge routine RAHLBKVR. |
|
ADD(X) | ; Add the HL7 Message to the 'RADIOLOGY' entry on the HL7 Application
; Parameter file. ; Input: 'X'-the HL7 Message we are trying to add ; Sets: RA77106('X')=the ien of the newly added HL7 Message |
|
FIND(X) | ; Find the ien of the various HL7 Messages used by our HL7 Application
; Input: 'X'-the HL7 Message we are trying to find. ; Output: ien of the HL7 Message entry (if exists), else 0 |
FileNo | Call Tags |
---|---|
^HL(771 - [#771] | FIND1^DIC |
771.06 | FIND1^DIC |