Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Local Variables |  All
Print Page as PDF
Routine: RAIPST12

Package: Radiology Nuclear Medicine

Routine: RAIPST12


Information

RAIPST12 ;HIRMFO/BNT - Post-init functions (patch twelve) ;5/20/99

Source Information

Source file <RAIPST12.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Kernel 2 ($$FMTH,$$NOW)^XLFDT  MES^XPDUTL  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Radiology Nuclear Medicine 4 RAIPST13  RAIPST14  RAIPST15  RAIPST16  

Entry Points

Name Comments DBIA/ICR reference
TCP() ; return 'TCP' for LLP TYPE (.02) field in file 869.2
Y() ; return 'YES', for PERMANENT (400.04) field in file 869.2
CLIENT() ; return 'CLIENT (SENDER)', for CLIENT/SERVER (400.03) field
; in file 869.2
US() ; return 'US', for COUNTRY CODE (7) field in file 771
SLISTN() ; return 'SINGLE LISTENER', for CLIENT/SERVER (400.03) field
; in file 869.2
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;**12**;Mar 16, 1998
MSG(ENTRY,FILE,ERR) ; display a status message pertaining to the addition
; of entries to files: 869.2, 870, 771 & 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
ACTIVE() ; return 'ACTIVE', for ACTIVE/INACTIVE (2) field in file
; 771
PROID() ; Return the Processing ID data ;IHS/ITSC/CLS 04/25/2003 replaced “PRODUCTION” with “”

External References

Name Field # of Occurrence
$$FMTH^XLFDT TSTMP+1
$$NOW^XLFDT TSTMP+1
MES^XPDUTL MSG+18

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] MSG+10
^TMP("DIERR" MSG+11

Local Variables

Legend:

>> 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
RACNT MSG+7~*, MSG+15*
RATXT MSG+7~, MSG+18
RATXT( MSG+7*, MSG+15*
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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Local Variables |  All