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

Package: Radiology Nuclear Medicine

Routine: RAO7VLD


Information

RAO7VLD ;HISC/GJC-Validate OE/RR data to Rad (frontdoor) ;1/6/98 13:02

Source Information

Source file <RAO7VLD.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA Fileman 1 (CHK,UPDATE)^DIE  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Radiology Nuclear Medicine 6 RAO7OKR  RAO7PURG  RAO7RCH  RAO7RO  RAO7RON  RAO7RON1  

Entry Points

Name Comments DBIA/ICR reference
EN3(X,Y) ; does entry exist in a file
; X-> file # 'Y'-> ien
; 0 if entry exists, 1 if entry does not exist
EN1(RAA,RAB,RAC,RAX,RAY,RAZ) ; Pass in parameters to validate data
; Returns '0' if data is valid, '1' if data is invalid
; This call is not used on pointer type data fields.
; ***** variable list *****
; RAA=file # RAB=field #
; RAC=flag parameters RAX=value being checked
; RAY=result of call array RAZ=Error Array (not used)
EN4(X) ;P75 Check CPRS entered CLINICAL HISTORY text for validity.
EN5(RAD0,RANSTAT,RADUZ,RAREA) ; update the 'REQUEST STATUS TIMES' multiple
; in the Rad/Nuc Med Orders file. All parameters must be in the
; internal format.
; RAD0=top level ien RANSTAT=new status
; RADUZ=user ien RAREA=reason for status change
; Pass back '1' if error, '0' if no error.
EN6(X) ; Check if parent procedure has descendents
; Passes back: 0 if descendents else 1
; X is the ien of the procedure (71)
EN2(T1,T2,T3) ;
; Pass in parameters to validate pointer type data.
; This call is only used on pointer type data fields.
; ***** variable list *****
; T1=file # T2=IEN (if app) T3=.01 fields value
; X=0 if proper match, 1 if no match Y=global node (assumed to be '0')

External References

Name Field # of Occurrence
CHK^DIE EN1+8
UPDATE^DIE EN5+11

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] EN2+10, EN3+3
^RAMIS(71 - [#71] EN6+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT(0 EN1+8!
ARR EN5+6~
ARR(7 EN5+7*, EN5+8*, EN5+9*, EN5+10*
CHAR EN4+5~, EN4+7*, EN4+8, EN4+9
CNT EN4+5~*, EN4+8*, EN4+9*, EN4+10
>> DIERR EN5+12
FLG EN4+5~*, EN4+6, EN4+10*, EN4+12
I EN4+5~, EN4+6*, EN4+7
LEN EN4+5~*, EN4+6
RAA EN1~, EN1+8
RAB EN1~, EN1+8
RAC EN1~, EN1+8
RAD0 EN5~, EN5+7, EN5+8, EN5+9, EN5+10
RADUZ EN5~, EN5+9
>> RALDT EN5+7
RANSTAT EN5~, EN5+8
RAREA EN5~, EN5+10
RAX EN1~, EN1+8
RAY EN1~, EN1+8, EN1+9
RAZ EN1~
T1 EN2~, EN2+8, EN2+10
T2 EN2~, EN2+8, EN2+10
T3 EN2~, EN2+8, EN2+11
X EN2+7~*, EN2+8*, EN2+9, EN3~, EN3+3, EN4~, EN4+5, EN4+7, EN6~, EN6+3
Y EN2+7~, EN2+10*, EN2+11, EN3~, EN3+3
Z EN2+7~, EN2+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Local Variables |  All