Routine: RAIPS206

Information

RAIPS206 ;WOIFO/KLM - Post-init Driver, patch 206 ; Sep 26, 2023@09:50:23

Source file <RAIPS206.m>

Package	Total	Call Graph
VA FileMan	2	(FILE,UPDATE)^DIE $$GET1^DIQ
Kernel	1	BMES^XPDUTL

Name	Comments	DBIA/ICR reference
BIRADS	;updates to BIRADS
ABN	;Set "Print on Abnormal Report" field for 1101 and 1102
EXP	;Expression field update (data type changed from 757.01 pointer to free text).
CODES	; NUMBER^CODE^DESC^PRINT^ALERT

FileNo	Call Tags
^LEX(757.01 - [#757.01]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^RA(78.3 - [#78.3]	EXP+3, EXP+4*

Name	Field # of Occurrence
RA001	BIRADS+2~, BIRADS+4*, BIRADS+5, BIRADS+10, BIRADS+11, BIRADS+15
RA01	BIRADS+2~, BIRADS+4*, BIRADS+6
RA2	BIRADS+2~, BIRADS+4*, BIRADS+7
RA3	BIRADS+2~, BIRADS+4*, BIRADS+8
RA4	BIRADS+2~, BIRADS+4*, BIRADS+9
RADNUM	BIRADS+2~
RADNUM(1	BIRADS+11*
RADX	BIRADS+2~, BIRADS+3, BIRADS+4, ABN+1~, ABN+2, ABN+5, ABN+6, EXP+1~, EXP+2*, EXP+3 , EXP+4
RAERR	ABN+4!, ABN+8!
RAERR("DIERR"	ABN+5
RAEXP	EXP+1~, EXP+3*, EXP+4
RAFDA	BIRADS+2~
RAFDA(	BIRADS+6, BIRADS+7, BIRADS+8, BIRADS+9, BIRADS+10, ABN+3
RAI	BIRADS+2~, BIRADS+3*
RAIENS	ABN+1~, ABN+2*, ABN+3
RAMSG	BIRADS+2~
RAMSG("DIERR"	BIRADS+14
RATXT	BIRADS+15, ABN+7, ABN+8!
RATXT(1	BIRADS+15, ABN+5, ABN+6*
U	EXP+3, EXP+4

Name	Field # of Occurrence
$T(CODES+RAI	BIRADS+3