Routine: DGPFDIV1

Package	Total	Call Graph
VA Fileman	3	FILE^DIE $$EXTERNAL^DILFD GETS^DIQ
Kernel	1	$$NOW^XLFDT
Registration	1	$$CONTINUE^DGPFUT

Package	Total	Caller Graph
Registration	2	DG53P650 DGPFDIV

Entry Points

Name	Comments	DBIA/ICR reference
STODIV(DGIEN,DGIND)	;store PRF MEDICAL CENTER DIVISION object
LOCK(DGIEN)	;lock MEDICAL CENTER DIVISION record
UNLOCK(DGIEN)	;unlock MEDICAL CENTER DIVISION record
GETDIV(DGIEN,DGDIV)	;retrieve PRF MEDICAL CENTER DIVISION object
VIEW	;view medical center divisions

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: VIEW+16
Function Call: WRITE	Prompt: !," Medical Center Division: ",$P(DGOBJ("NAME"),U,2) Line Location: VIEW+28
Function Call: WRITE	Prompt: !," PRF Assignment Ownership: ",$P(DGOBJ("IND"),U,2) Line Location: VIEW+29
Function Call: WRITE	Prompt: !," Edited By: ",$P(DGOBJ("EDITBY"),U,2) Line Location: VIEW+30
Function Call: WRITE	Prompt: !," Edit Date/Time: ",$P(DGOBJ("EDITDT"),U,2) Line Location: VIEW+31
Function Call: WRITE	Prompt: !," Active PRF Assignments: ",DGOBJ("ACTIVE") Line Location: VIEW+32
Function Call: WRITE	Prompt: !,DGLINE,! Line Location: VIEW+33
Function Call: WRITE	Prompt: @IOF Line Location: VIEW+34
Routine Call	DIE Line Location: STODIV+27

FileNo	Call Tags
^DG(40.8 - [#40.8]	EXTERNAL^DILFD, GETS^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	LOCK+10, UNLOCK+8, GETDIV+28, STODIV+18, VIEW+18, VIEW+25
^DGPF(26.13 - [#26.13]	VIEW+26

Name	Line Occurrences
$$GETDIV	VIEW+20

Name	Field # of Occurrence
DGDIV	GETDIV~, GETDIV+25!*
DGDIV("EDITBY"	GETDIV+37*
DGDIV("EDITDT"	GETDIV+36*
DGDIV("IND"	GETDIV+35*
DGDIV("INST"	GETDIV+34*
DGDIV("NAME"	GETDIV+33*
DGERR	GETDIV+22~, GETDIV+31, STODIV+12~, STODIV+28
DGEXIT	VIEW+8~, VIEW+18, VIEW+34*
DGFDA	STODIV+13~
DGFDA(	STODIV+24, STODIV+25, STODIV+26*
DGFLDS	GETDIV+21~
DGFLDS(	GETDIV+33, GETDIV+34, GETDIV+35, GETDIV+36, GETDIV+37
DGIEN	LOCK~, LOCK+10, UNLOCK~, UNLOCK+8, GETDIV~, GETDIV+28, GETDIV+29, STODIV~, STODIV+18, STODIV+24 , STODIV+25, STODIV+26, VIEW+9~, VIEW+18*, VIEW+20, VIEW+25
DGIENS	GETDIV+20~, GETDIV+29*, GETDIV+30, GETDIV+33, GETDIV+34, GETDIV+35, GETDIV+36, GETDIV+37
DGIND	STODIV~, STODIV+21, STODIV+24
DGINST	VIEW+10~, VIEW+25*, VIEW+26
DGLINE	VIEW+11~, VIEW+15*, VIEW+33
DGOBJ	VIEW+12~, VIEW+19!, VIEW+20
DGOBJ(	VIEW+22*
DGOBJ("ACTIVE"	VIEW+26*, VIEW+32
DGOBJ("EDITBY"	VIEW+30
DGOBJ("EDITDT"	VIEW+31
DGOBJ("IND"	VIEW+24*, VIEW+29
DGOBJ("NAME"	VIEW+28
DGRSLT	GETDIV+23~, GETDIV+26, GETDIV+40, GETDIV+42, STODIV+14~, STODIV+16, STODIV+31, STODIV+33
DGSUB	VIEW+13~, VIEW+21*, VIEW+22
DUZ	STODIV+26
IOF	VIEW+16, VIEW+34
IOSL	VIEW+34
U	GETDIV+33, GETDIV+34, GETDIV+35, GETDIV+36, GETDIV+37, VIEW+22, VIEW+24, VIEW+25, VIEW+28, VIEW+29 , VIEW+30, VIEW+31