RA12PST2 ;HIRMFO/CRT - Post-init functions (patch seventeen) ;5/20/99
Source file <RA12PST2.m>
Package | Total | Caller Graph |
---|---|---|
Radiology Nuclear Medicine | 4 | RA12PST1 RA12PST3 RA12PST4 RA12PST5 |
Name | Comments | DBIA/ICR reference |
---|---|---|
TCP() | ; return 'TCP' for LLP TYPE (2) field in file 870
|
|
Y() | ; return 'YES', for PERSISTENT (400.04) field in file 870
|
|
CLIENT() | ; return 'CLIENT (SENDER)', for CLIENT/SERVER (400.03) field
; in file 870 |
|
ACKTO() | ; Return the ACK timeout for CLIENT(SENDER)s
|
|
SLISTN() | ; return 'SINGLE LISTENER', for CLIENT/SERVER (400.03) field
; in file 870 |
|
TSTMP() | ; Timestamp the protocol entry point with current date/time (in $H format)
|
|
N() | ; return 'NO', for various fields in file 101
|
|
PKG() | ; Return the name of the package
|
|
VERSION | ;;5.0;Radiology/Nuclear Medicine;**17**;Mar 16, 1998
|
|
MSG(ENTRY,FILE,ERR) | ; display a status message pertaining to the addition
; of entries to files: 870 & 101. Display a status message ; when items are added to the Protocol (101) file. ; Variable list: ; ENTRY-> value of the .01 field for a particular file (60 chars max) ; FILE -> file # where the data will be added ; ERR -> err message? 1 if yes, else null |
|
DELITEM | ; Delete Item multiple from RA event driver protocols
|
|
PROID() | ; Delete the Processing ID field
|
FileNo | Call Tags |
---|---|
^ORD(101 - [#101] | FIND1^DIC, GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC - [#1] | MSG+10 |
^ORD(101 - [#101] | DELITEM+12*, DELITEM+13, DELITEM+14 |
^TMP("DIERR" | MSG+11 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DIERR | MSG+11 |
ENTRY | MSG~, MSG+9 |
ERR | MSG~, MSG+8, MSG+11, MSG+12 |
FILE | MSG~, MSG+10 |
>> RA101( | DELITEM+18* |
RAA | DELITEM+1~, DELITEM+15*, DELITEM+17 |
RAB | DELITEM+1~, DELITEM+16*, DELITEM+17 |
RACNT | MSG+7~*, MSG+15* |
RARR | DELITEM+1~ |
RARR( | DELITEM+3*, DELITEM+4*, DELITEM+7*, DELITEM+10, DELITEM+11 |
RATXT | MSG+7~, MSG+18 |
RATXT( | MSG+7*, MSG+15* |
RAX | DELITEM+1~, DELITEM+2*, DELITEM+3, DELITEM+4, DELITEM+6*, DELITEM+7, DELITEM+10*, DELITEM+11 |
RAX1 | DELITEM+1~, DELITEM+11*, DELITEM+12, DELITEM+13, DELITEM+14, DELITEM+18 |
RAY | DELITEM+1~, DELITEM+13*, DELITEM+14, DELITEM+18 |
RAZ | DELITEM+1~, DELITEM+14*, DELITEM+15, DELITEM+16 |
STRING | MSG+7~, MSG+8*, MSG+9*, MSG+10*, MSG+11*, MSG+12*, MSG+13, MSG+14, MSG+15, MSG+16* |
WORDS | MSG+7~, MSG+14*, MSG+15, MSG+16 |