Routine: DGENUPA1

Package	Total	Call Graph
Registration	5	$$EXT^DGENCDU $$EXT^DGENELA3 $$EXT^DGENPTA $$EXT^DGENSEC ($$STORE,ADDCHNG,CREATE)^DGENUPA
Kernel	1	$$LJ^XLFSTR

Package	Total	Caller Graph
Registration	1	DGENUPL7

Name	Comments	DBIA/ICR reference
CDISHDR	;
ELIG	;
PAT	;
DRDISHDR	;
SECHDR	; ; Description: Header for changes in PATIENT SECURITY object
RDISB	;
PATHDR	;
ELGHDR	;
ARDISHDR	;
SEC	; ; Description: Changes in PATIENT SECURITY object
AUDIT(ERROR,MSGID,OLDPAT,NEWPAT,OLDELG,NEWELG,OLDCDIS,NEWCDIS,NEWSEC,OLDSEC)	;
ELGCODES	;
CDIS	;
AELGHDR	;
DELGHDR	;

External References

Name	Field # of Occurrence
$$EXT^DGENCDU	CDIS+9, CDIS+16, CDIS+17
$$EXT^DGENELA3	ELIG+6, ELIG+15, ELGCODES+8, ELGCODES+18, RDISB+20, RDISB+32
$$EXT^DGENPTA	PAT+12
$$EXT^DGENSEC	SEC+11
$$STORE^DGENUPA	AUDIT+15
ADDCHNG^DGENUPA	ELIG+8, ELIG+17, ELGHDR+3, ELGHDR+4, ELGHDR+5, ELGHDR+6, ELGCODES+8, ELGCODES+18, AELGHDR+3, AELGHDR+4 , DELGHDR+3, DELGHDR+4, RDISB+20, RDISB+32, DRDISHDR+3, DRDISHDR+4, ARDISHDR+3, ARDISHDR+4, PAT+11, PAT+13 , PATHDR+3, PATHDR+4, PATHDR+5, CDIS+11, CDIS+19, CDISHDR+3, CDISHDR+4, CDISHDR+5, CDISHDR+6, SEC+13 , SECHDR+3, SECHDR+4, SECHDR+5, SECHDR+6
CREATE^DGENUPA	AUDIT+8
$$LJ^XLFSTR	ELIG+6, ELIG+15, RDISB+20, RDISB+32, PAT+12, CDIS+9, CDIS+15, CDIS+16, SEC+11

Name	Line Occurrences
AELGHDR	ELGCODES+7
ARDISHDR	RDISB+19
CDIS	AUDIT+13
CDISHDR	CDIS+10, CDIS+18
DELGHDR	ELGCODES+17
DRDISHDR	RDISB+31
ELGCODES	AUDIT+11
ELGHDR	ELIG+7, ELIG+16
ELIG	AUDIT+10
PAT	AUDIT+9
PATHDR	PAT+10
RDISB	AUDIT+12
SEC	AUDIT+14
SECHDR	SEC+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AUDIT	AUDIT+7~, AUDIT+8, AUDIT+15, ELIG+8, ELIG+17, ELGHDR+3, ELGHDR+4, ELGHDR+5, ELGHDR+6, ELGCODES+8 , ELGCODES+18, AELGHDR+3, AELGHDR+4, DELGHDR+3, DELGHDR+4, RDISB+20, RDISB+32, DRDISHDR+3, DRDISHDR+4, ARDISHDR+3 , ARDISHDR+4, PAT+11, PAT+13, PATHDR+3, PATHDR+4, PATHDR+5, CDIS+11, CDIS+19, CDISHDR+3, CDISHDR+4 , CDISHDR+5, CDISHDR+6, SEC+13, SECHDR+3, SECHDR+4, SECHDR+5, SECHDR+6
COUNT	RDISB+3~, RDISB+5, RDISB+6, RDISB+7, RDISB+8
ERROR	AUDIT~, AUDIT+15
FIELD	ELIG+2~, ELIG+10, ELIG+11, ELIG+12, ELIG+13, ELIG+15, ELGCODES+3~, PAT+3~, PAT+5, PAT+6 , PAT+7, PAT+8, PAT+11, PAT+12, CDIS+3~, CDIS+5, CDIS+6, CDIS+7, CDIS+8, CDIS+9 , CDIS+12, CDIS+13, CDIS+14, CDIS+15, CDIS+16, CDIS+17, SEC+3~, SEC+5, SEC+6*, SEC+8 , SEC+9, SEC+11
HDR	ELIG+2~, ELIG+3, ELIG+7, ELIG+16, ELGHDR+7, ELGCODES+3~, ELGCODES+4, ELGCODES+7, ELGCODES+10, ELGCODES+17 , AELGHDR+5, DELGHDR+5, RDISB+3~, RDISB+11, RDISB+19, RDISB+23, RDISB+31, DRDISHDR+5, ARDISHDR+5, PAT+3~ , PAT+4, PAT+10, PATHDR+6, CDIS+3~, CDIS+4, CDIS+10, CDIS+18, CDISHDR+7, SEC+3~, SEC+4* , SEC+12, SECHDR+7*
IEN	ELIG+2~, ELGCODES+3~, ELGCODES+5, ELGCODES+6, ELGCODES+8, ELGCODES+11, ELGCODES+12, ELGCODES+15, ELGCODES+18, RDISB+3~ , RDISB+12, RDISB+13, RDISB+15, RDISB+17, RDISB+18, RDISB+20, RDISB+24, RDISB+25, RDISB+27, RDISB+29 , RDISB+30, RDISB+32, PAT+3~, CDIS+3~, SEC+3~
LINE	ELIG+2~, ELIG+6, ELIG+8, ELIG+15, ELIG+17, ELGCODES+3~, PAT+3~, PAT+11, PAT+12, PAT+13 , CDIS+3~, CDIS+9, CDIS+11, CDIS+15, CDIS+16, CDIS+17, CDIS+19, SEC+3~, SEC+11*, SEC+13
MSGID	AUDIT~, AUDIT+8
NEWCDIS	AUDIT~
NEWCDIS(	CDIS+8, CDIS+9, CDIS+13, CDIS+14, CDIS+17
NEWDIBS	RDISB+3~
NEWDIBS(	RDISB+6*, RDISB+13, RDISB+15, RDISB+17, RDISB+30
NEWELG	AUDIT~
NEWELG(	ELIG+13, ELIG+15
NEWELG("ELIG"	ELIG+4, ELIG+6, ELGCODES+6, ELGCODES+12, ELGCODES+15
NEWELG("RATEDIS"	RDISB+6
NEWPAT	AUDIT~
NEWPAT(	PAT+8, PAT+12
NEWSEC	AUDIT~
NEWSEC(	SEC+9, SEC+11
OLDCDIS	AUDIT~
OLDCDIS(	CDIS+6, CDIS+7, CDIS+8, CDIS+9, CDIS+13, CDIS+14, CDIS+16
OLDDIBS	RDISB+3~
OLDDIBS(	RDISB+8*, RDISB+18, RDISB+25, RDISB+27, RDISB+29
OLDELG	AUDIT~
OLDELG(	ELIG+11, ELIG+13, ELIG+15
OLDELG("ELIG"	ELIG+4, ELIG+6, ELGCODES+6, ELGCODES+12, ELGCODES+15
OLDELG("RATEDIS"	RDISB+8
OLDPAT	AUDIT~
OLDPAT(	PAT+6, PAT+8, PAT+12
OLDPAT("DFN"	AUDIT+8
OLDSEC	AUDIT~
OLDSEC(	SEC+6, SEC+9, SEC+11
PER	RDISB+3~, RDISB+14, RDISB+15, RDISB+17, RDISB+18, RDISB+20, RDISB+26, RDISB+27, RDISB+29, RDISB+30 , RDISB+32
SC	RDISB+3~, RDISB+16, RDISB+17, RDISB+18, RDISB+20, RDISB+28, RDISB+29, RDISB+30, RDISB+32
SUBFIELD	CDIS+3~, CDIS+13*, CDIS+14, CDIS+16, CDIS+17

Customize PDF page

Package: Registration

Routine: DGENUPA1

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Label References

Local Variables

Legend: