Routine: PRCAI170

Information

PRCAI170 ;WISC/RFJ-post init patch 170 ; 26 Jan 01

Source file <PRCAI170.m>

Package	Total	Call Graph
VA FileMan	3	FILE^DICN ^DIE ^DIK
Kernel	1	(BMES,MES)^XPDUTL

Name	Comments	DBIA/ICR reference
PREINIT	; start pre init, check to make sure entries can be added to 430.2
POSTINIT	; start post init
33	;;ADULT DAY HEALTH CARE^AD^0
34	;;DOMICILIARY^DO^0
35	;;RESPITE CARE-INSTITUTIONAL^RC^0
36	;;RESPITE CARE-NON-INSTITUTIONAL^RN^0
37	;;GERIATRIC EVAL-INSTITUTIONAL^GE^0
38	;;GERIATRIC EVAL-NON-INSTITUTION^GN^0
39	;;NURSING HOME CARE-LTC^NL^0

Name	Field # of Occurrence
FILE^DICN	POSTINIT+17
^DIE	POSTINIT+27
^DIK	POSTINIT+12
BMES^XPDUTL	PREINIT+3, POSTINIT+3
MES^XPDUTL	PREINIT+4, PREINIT+11, PREINIT+12, PREINIT+14, POSTINIT+4, POSTINIT+29, POSTINIT+30

FileNo	Call Tags
^PRCA(430.2 - [#430.2]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^PRCA(430.2 - [#430.2]	PREINIT+8, POSTINIT+12

Name	Field # of Occurrence
%	PREINIT+1~, PREINIT+8*, POSTINIT+1~
CURDATA	PREINIT+1~, PREINIT+8*
D	POSTINIT+1~
D0	POSTINIT+1~
DA	POSTINIT+1~, POSTINIT+12, POSTINIT+20
DI	POSTINIT+1~
DIC	POSTINIT+1~, POSTINIT+9*
DIC(0	POSTINIT+9*
DIE	POSTINIT+1~, POSTINIT+9*
DIK	POSTINIT+1~, POSTINIT+12*
DINUM	POSTINIT+1~, POSTINIT+15*
DLAYGO	POSTINIT+1~, POSTINIT+9*
DQ	POSTINIT+1~
DR	POSTINIT+1~, POSTINIT+21, POSTINIT+23, POSTINIT+24, POSTINIT+26
NEWDATA	PREINIT+1~, PREINIT+8*
RCDATA	POSTINIT+1~, POSTINIT+8*, POSTINIT+16, POSTINIT+21, POSTINIT+23
RCDINUM	POSTINIT+1~, POSTINIT+7*, POSTINIT+12, POSTINIT+15, POSTINIT+20
RCERROR	PREINIT+1~, PREINIT+7, PREINIT+8, PREINIT+11, PREINIT+12
X	POSTINIT+1~, POSTINIT+16*
>> XPDQUIT	PREINIT+11*
Y	POSTINIT+1~

Name	Field # of Occurrence
$T(@%	PREINIT+8
$T(@RCDINUM	POSTINIT+8