Routine: XUPSGS

Package	Total	Call Graph
Kernel	2	$$FMTE^XLFDT $$HLNAME^XLFNAME
VA Fileman	2	FILE^DIE $$GET1^DIQ
Registration	1	$$SITE^VASITE

Package	Total	Caller Graph
Kernel	1	XUPSSTF

Entry Points

Name	Comments	DBIA/ICR reference
BLDFDA(NEWCOR,COR,FDA)
LOGERR(XUERR)	;build error array from fileman's error array
GET(EN,ARRAY)	;GET DATA FROM FILE 200 AND SET INTO ARRAY
UPD(EN,ARRAY,ERROR)	;update New Person entry EN ; Input: EN is the IEN in file 200 to be updated ; ARRAY is an array with the values to be updated ; ERROR is an array that will return any error messages for any field that fails to update ; Returns: -1^error text if unsuccessful ; 0 if OK - doesn't mean ERROR isn't defined

External References

Name	Field # of Occurrence
FILE^DIE	UPD+17
$$GET1^DIQ	GET+16
$$SITE^VASITE	GET+8, GET+9
$$FMTE^XLFDT	BLDFDA+8
$$HLNAME^XLFNAME	GET+12

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(5 - [#5]	GET+25, BLDFDA+24, BLDFDA+25
^VA(200 - [#200]	GET+6, GET+28, GET+29, GET+30, GET+31, UPD+11, UPD+13, UPD+19, UPD+21

Label References

Name	Line Occurrences
BLDFDA	UPD+15
LOGERR	UPD+17

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARRAY	GET~, UPD~, UPD+15
ARRAY("DOB"	GET+18*
ARRAY("EnumerateComp"	GET+31*
ARRAY("EnumerateStart"	GET+30*
ARRAY("FirstName"	GET+14*
ARRAY("Gender"	GET+19*
ARRAY("MiddleName"	GET+15*
ARRAY("NPI"	GET+28*
ARRAY("PAID"	GET+29*
ARRAY("Prefix"	GET+16*
ARRAY("ResAddCity"	GET+24*
ARRAY("ResAddL1"	GET+21*
ARRAY("ResAddL2"	GET+22*
ARRAY("ResAddL3"	GET+23*
ARRAY("ResAddState"	GET+25*
ARRAY("ResAddZip4"	GET+26*
ARRAY("ResPhone"	GET+27*
ARRAY("SSN"	GET+20*
ARRAY("SourceID"	GET+10*
ARRAY("SourceSystemID"	GET+9*
ARRAY("SourceSystemIEN"	GET+8*
ARRAY("Suffix"	GET+17*
ARRAY("Surname"	GET+13*
CNT	GET+4~, UPD+7~
COR	GET+4~, UPD+7~, UPD+15, BLDFDA~
COR(	GET+6, GET+7, GET+11, GET+18, GET+19, GET+20, GET+21, GET+22, GET+23, GET+24 , GET+25, GET+26, GET+27, UPD+13, BLDFDA+5, BLDFDA+7, BLDFDA+10, BLDFDA+13, BLDFDA+16, BLDFDA+18 , BLDFDA+20, BLDFDA+22, BLDFDA+24, BLDFDA+27, BLDFDA+30
E	LOGERR+1~, LOGERR+2, LOGERR+3
ECNT	UPD+7~, UPD+19, LOGERR+1~, LOGERR+2, LOGERR+3
EN	GET~, GET+5, GET+6, GET+7, GET+10, GET+11, GET+16, GET+18, GET+19, GET+20 , GET+21, GET+22, GET+23, GET+24, GET+25, GET+26, GET+27, GET+28, GET+29, GET+30 , GET+31, UPD~, UPD+9, UPD+11, UPD+13, UPD+19, UPD+21, BLDFDA+5, BLDFDA+7, BLDFDA+8 , BLDFDA+10, BLDFDA+11, BLDFDA+13, BLDFDA+14, BLDFDA+16, BLDFDA+17, BLDFDA+18, BLDFDA+19, BLDFDA+20, BLDFDA+22 , BLDFDA+23, BLDFDA+24, BLDFDA+26, BLDFDA+27, BLDFDA+28, BLDFDA+30, BLDFDA+31
ERROR	GET+5, GET+7, UPD~, UPD+8!, UPD+9, UPD+19
ERROR(	LOGERR+3*
FDA	UPD+7~, UPD+15, UPD+17, BLDFDA~, BLDFDA+2!
FDA(200	BLDFDA+5, BLDFDA+8, BLDFDA+11, BLDFDA+14, BLDFDA+17, BLDFDA+19, BLDFDA+21, BLDFDA+23, BLDFDA+26, BLDFDA+28 , BLDFDA+31*
FLDCNT	UPD+7~, UPD+19
IDCNT	UPD+7~
IEN	UPD+7~, UPD+19, BLDFDA+21
MIEN	UPD+7~
MPIERR	UPD+7~
NAME	GET+4~, GET+12*, GET+13, GET+14, GET+15, GET+17
NAME2	GET+4~, GET+11*, GET+12
NAMEDIT	UPD+7~
NEWCOR	BLDFDA~
NEWCOR("DOB"	BLDFDA+7, BLDFDA+8
NEWCOR("FirstName"	BLDFDA+4
NEWCOR("Gender"	BLDFDA+10, BLDFDA+11
NEWCOR("MiddleName"	BLDFDA+4
NEWCOR("NAME"	BLDFDA+4*, BLDFDA+5
NEWCOR("ResAddCity"	BLDFDA+22, BLDFDA+23
NEWCOR("ResAddL1"	BLDFDA+16, BLDFDA+17
NEWCOR("ResAddL2"	BLDFDA+18, BLDFDA+19
NEWCOR("ResAddL3"	BLDFDA+20, BLDFDA+21
NEWCOR("ResAddState"	BLDFDA+24, BLDFDA+25
NEWCOR("ResAddZip4"	BLDFDA+27, BLDFDA+28
NEWCOR("ResPhone"	BLDFDA+30, BLDFDA+31
NEWCOR("SSN"	BLDFDA+13, BLDFDA+14
NEWCOR("Suffix"	BLDFDA+4
NEWCOR("Surname"	BLDFDA+4
RESSTIEN	BLDFDA+25~*, BLDFDA+26
RET	UPD+7~
TFUPDATE	UPD+7~
XUERR	UPD+17, LOGERR~
XUERR("DIERR"	UPD+17, LOGERR+3

Customize PDF page

Package: Kernel

Routine: XUPSGS

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: