Routine: ECX3P120

Information

ECX3P120 ;ALB/JAP - DSS FY2010 Conversion, Post-init ; 6/18/09 9:51am

Source file <ECX3P120.m>

Name	Comments	DBIA/ICR reference
POST	;post-init
TS
TEST	;turn-on fld #73 in file #728 for Field Test Site;
OPT	;delete ECX LBB SOURCE AUDIT from ECX SOURCE AUDITS
OTS	;Add Observation Treating Specialty to DSS TREATING SPECIALTY TRANSLATION File (#727.831)
OTSP	;Treating Specialty #^Treating Specialty Name^Observation Pat Indicator^Inpat Outpat Code^Observation Stop Code

Name	Field # of Occurrence
^DIC	OPT+4, OPT+6, OTS+9
^DIE	OTS+25
^DIK	OPT+8
TESTON^ECXTREX	TEST+4
BMES^XPDUTL	OTS+1
MES^XPDUTL	TEST+2, TEST+3, TEST+7, OPT+2, OTS+12, OTS+13, OTS+16, OTS+17, OTS+20, OTS+21

FileNo	Call Tags
^DIC(19 - [#19]	Classic Fileman Calls
^ECX(727.831 - [#727.831]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^ECX(728.44 - [#728.44]	TEST+15*
^SC - [#44]	TEST+13, TEST+14

Name	Field # of Occurrence
^(0	TEST+14

Name	Field # of Occurrence
DA	OPT+7, OTS+2~, OTS+24
DA(1	OPT+5*, OPT+6, OPT+8
DIC	OPT+3~, OPT+4, OPT+6, OTS+2~, OTS+4*, OTS+22
DIC(0	OPT+4, OPT+6, OTS+5*
DIE	OTS+2~, OTS+22*
>> DIK	OPT+8*
DINUM	OTS+2~, OTS+6*
DLAYGO	OTS+2~, OTS+8*
DR	OTS+2~, OTS+23*
EC	TEST+12~, TEST+13*, TEST+14, TEST+15
ECD	TEST+12~, TEST+14*, TEST+15
>> ECXERR	OTS+3, OTS+18
ECXFILE	OTS+2~
ECXI	POST+2~, TS*
>> ECXIFN	OTS+10*, OTS+11, OTS+15, OTS+20, OTS+24
>> ECXOTS	TS*, OTS+1, OTS+6, OTS+7, OTS+15, OTS+23
U	TEST+14, TEST+15, OTS+1, OTS+6, OTS+7, OTS+15, OTS+20, OTS+23
X	TEST+12~, TEST+15, OPT+4, OPT+6, OTS+2~, OTS+7
>> XPDNM	TEST+4
Y	OPT+3~, OPT+4, OPT+5, OPT+6, OPT+7, OTS+2~, OTS+10

Name	Field # of Occurrence
$T(OTSP+ECXI	TS