Routine: ACMADDM2

Package	Total	Call Graph
VA Fileman	3	^DIE (,ENALL)^DIK ^DIR
Case Management System	1	^ACMRGA02

Package	Total	Caller Graph
Case Management System	1	ACMADDP

Entry Points

Name	Comments	DBIA/ICR reference
MATCHR	;
CHGD1
CHGC	;LOOPS AND CHANGES COMPLICATIONS TO NEW VALUES
CHGD	;LOOPS AND CHANGES DIAGNOSES TO NEW VALUES
MATCHD	;
MATCHC	;MATCHES COMPLICATION TO STD
CHGDD	;
CHGR	;
CHGRD	;
SETD	;FINDS STANDARD DIAGNOSIS AND PUT IN ^TMP($J,"STD"
CDIAG	;EP;CONVERTS USER DIAGNOSES TO IHS STANDARD DIAGNOSES
SETC	;FINDS STANDARD COMPLICATIONS AND PUT IN ^TMP($J,"STD"
DIRYNC
SETDC	;FINDS STANDARD DX CRITERIA AND PUT IN ^TMP($J,"STD"
CHGCD	;
CDXCR	;EP;CONVERT DIAGNOSTIC CRITERIA TO STANDARD
DIRYND
SETR	;FINDS THE STANDARDS AND PUTS IN ^TMP($J,"STD"
DIRYNR
MATCHDC	;
DIRYNDC
END	;CLEANUP IHS/OHPRD/TMJ Patch #1 - Removed Kill ACMQ
FINDD	;FINDS REGISTER DIAGNOSIS AND PUT IN ^TMP($J,"REG"
FINDC	;FINDS REGISTER COMPLICATION AND PUT IN ^TMP($J,"REG"
CHGC1
FINDR	;
CHGDC	;LOOPS & CHANGES DX CRITERIA TO NEW VALUES
CRISK	;EP;FINDS STANDARD RISK FACTORS AND PUT IN ^TMP($J,"STD"
CHGDC1
FINDDC	;FINDS REGISTER DX CRIERIA AND PUT IN TMP($J,"REG"
CHGR1
CCOMP	;EP;CONVERTS USER COMPLICATIONS TO IHS STANDARD COMPLICATIONS
CHGDCD	;

External References

Name	Field # of Occurrence
^ACMRGA02	SETD+1, SETC+1, SETR+1, SETDC+1
^DIE	CHGD1+2, CHGC1+2, CHGR1+2, CHGDC1+2
^DIK	CHGDD+1, CHGDD+2, CHGDD+3, CHGCD+1, CHGCD+2, CHGCD+3, CHGRD+1, CHGRD+2, CHGRD+3, CHGDCD+1 , CHGDCD+2, CHGDCD+3
ENALL^DIK	CHGD1+3, CHGC1+3, CHGR1+3, CHGDC1+3
^DIR	DIRYND+1, MATCHD+3, DIRYNC+1, MATCHC+3, DIRYNR+1, MATCHR+3, DIRYNDC+1, MATCHDC+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"I will now check your patient's diagnoses against the IHS standards:" Line Location: CDIAG+1
Function Call: WRITE	Prompt: ! Line Location: DIRYND+1
Function Call: WRITE	Prompt: !,"Changing diagnosis..." Line Location: CHGD+1
Function Call: WRITE	Prompt: "." Line Location: CHGD1+2
Function Call: WRITE	Prompt: "." Line Location: CHGDD+1
Function Call: WRITE	Prompt: !,"Choose a new diagnosis from the list below:",! Line Location: MATCHD+1
Function Call: WRITE	Prompt: !,"for your diagnosis: ",$P(^ACM(44.1,ACMD,0),U,1) Line Location: MATCHD+2
Function Call: WRITE	Prompt: !,"I will now check your patient's complications against the IHS standards:" Line Location: CCOMP+1
Function Call: WRITE	Prompt: ! Line Location: DIRYNC+1
Function Call: WRITE	Prompt: !,"Changing complication..." Line Location: CHGC+1
Function Call: WRITE	Prompt: "." Line Location: CHGC1+2
Function Call: WRITE	Prompt: "." Line Location: CHGCD+1
Function Call: WRITE	Prompt: !,"Choose a new complication from the list below:",! Line Location: MATCHC+1
Function Call: WRITE	Prompt: !,"for your complication: ",$P(^ACM(42.1,ACMD,0),U,1) Line Location: MATCHC+2
Function Call: WRITE	Prompt: !,"I will now check your patient's Risk Factors against the IHS standards:" Line Location: CRISK+1
Function Call: WRITE	Prompt: ! Line Location: DIRYNR+1
Function Call: WRITE	Prompt: !,"Changing Risk Factors..." Line Location: CHGR+1
Function Call: WRITE	Prompt: "." Line Location: CHGR1+2
Function Call: WRITE	Prompt: "." Line Location: CHGRD+1
Function Call: WRITE	Prompt: !,"Choose a new Risk Factor from the list below:",! Line Location: MATCHR+1
Function Call: WRITE	Prompt: !,"for your Risk Factor: ",$P(^ACM(45.1,ACMD,0),U,1) Line Location: MATCHR+2
Function Call: WRITE	Prompt: !,"I will now check your patient's Diagnostic Criteria agains the IHS Standards:" Line Location: CDXCR+1
Function Call: WRITE	Prompt: ! Line Location: DIRYNDC+1
Function Call: WRITE	Prompt: !,"Changing Diagnostic Criteria..." Line Location: CHGDC+1
Function Call: WRITE	Prompt: "." Line Location: CHGDC1+2
Function Call: WRITE	Prompt: "." Line Location: CHGDCD+1
Function Call: WRITE	Prompt: !,"Choose a new Diagnostic Criteria from the list below:",! Line Location: MATCHDC+1
Function Call: WRITE	Prompt: !,"for your Diagnostic Criteria: ",$P(^ACM(51.1,ACMD,0),U,1) Line Location: MATCHDC+2
Routine Call	DIE Line Location: CHGD1+2 CHGC1+2 CHGR1+2 CHGDC1+2
Routine Call	DIR Line Location: DIRYND+1 MATCHD+3 DIRYNC+1 MATCHC+3 DIRYNR+1 MATCHR+3 DIRYNDC+1 MATCHDC+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ACM(42 - [#9002242]	Classic Fileman Calls
^ACM(42.1 - [#9002242.1]	Classic Fileman Calls
^ACM(44 - [#9002244]	Classic Fileman Calls
^ACM(44.1 - [#9002244.1]	Classic Fileman Calls
^ACM(45 - [#9002245]	Classic Fileman Calls
^ACM(45.1 - [#9002245.1]	Classic Fileman Calls
^ACM(51 - [#9002251]	Classic Fileman Calls
^ACM(51.1 - [#9002251.1]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACM(42 - [#9002242]	FINDC+1, CHGC1+3!, CHGCD+1
^ACM(42.1 - [#9002242.1]	SETC+1, FINDC+1, CHGCD+3, MATCHC+2
^ACM(44 - [#9002244]	FINDD+1, CHGD1+3!, CHGDD+1
^ACM(44.1 - [#9002244.1]	SETD+1, FINDD+1, CHGDD+3, MATCHD+2
^ACM(45 - [#9002245]	FINDR+1, CHGR1+3!, CHGRD+1
^ACM(45.1 - [#9002245.1]	SETR+1, FINDR+1, CHGRD+3, MATCHR+2
^ACM(51 - [#9002251]	FINDDC+1, CHGDC1+3!, CHGDCD+1
^ACM(51.1 - [#9002251.1]	SETDC+1, FINDDC+1, CHGDCD+3, MATCHDC+2
^TMP($J	SETD+1, FINDD+1, FINDD+2, FINDD+4, CHGD+1, CHGD1, CHGD1+1, CHGD1+2, MATCHD+4, MATCHD+6 , SETC+1, FINDC+1, FINDC+2, FINDC+4, CHGC+1, CHGC1, CHGC1+1, CHGC1+2, MATCHC+4, MATCHC+6 , SETR+1, FINDR+1, FINDR+2, FINDR+4, CHGR+1, CHGR1, CHGR1+1, CHGR1+2, MATCHR+4, MATCHR+6 , SETDC+1, FINDDC+1, FINDDC+2, FINDDC+4, CHGDC+1, CHGDC1, CHGDC1+1, CHGDC1+2, MATCHDC+4, MATCHDC+6 , END+1!

Label References

Name	Line Occurrences
CHGC	DIRYNC+1
CHGC1	CHGC+1
CHGCD	CHGC1+1
CHGD	DIRYND+1
CHGD1	CHGD+1
CHGDC	DIRYNDC+1
CHGDC1	CHGDC+1
CHGDCD	CHGDC1+1
CHGDD	CHGD1+1
CHGR	DIRYNR+1
CHGR1	CHGR+1
CHGRD	CHGR1+1
DIRYNC	FINDC+4
DIRYND	FINDD+4
DIRYNDC	FINDDC+4
DIRYNR	FINDR+4
END	FINDD+5, FINDC+5, FINDR+5, FINDDC+5
MATCHC	FINDC+2
MATCHD	FINDD+2
MATCHDC	FINDDC+2
MATCHR	FINDR+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACMD	SETD+1, FINDD+1, FINDD+2, CHGD+1, CHGD1, CHGD1+1, CHGD1+2, CHGDD+1, CHGDD+2, CHGDD+3 , MATCHD+2, MATCHD+4, MATCHD+6, SETC+1, FINDC+1, FINDC+2, CHGC+1, CHGC1, CHGC1+1, CHGC1+2 , CHGCD+1, CHGCD+2, CHGCD+3, MATCHC+2, MATCHC+4, MATCHC+6, SETR+1, FINDR+1, FINDR+2, CHGR+1 , CHGR1, CHGR1+1, CHGR1+2, CHGRD+1, CHGRD+2, CHGRD+3, MATCHR+2, MATCHR+4, MATCHR+6, SETDC+1* , FINDDC+1, FINDDC+2, CHGDC+1*, CHGDC1, CHGDC1+1, CHGDC1+2, CHGDCD+1, CHGDCD+2, CHGDCD+3, MATCHDC+2 , MATCHDC+4, MATCHDC+6, END+1!
ACMDIR	SETD+1, SETD+2, SETD+3, MATCHD+3, SETC+1, SETC+2, SETC+3, MATCHC+3, SETR+1, SETR+2 , SETR+3, MATCHR+3, SETDC+1, SETDC+2, SETDC+3, MATCHDC+3, END+1!
ACME	SETD+1!, FINDD+1, CHGD1+2, SETC+1!, FINDC+1, CHGC1+2, SETR+1!, FINDR+1, CHGR1+2, SETDC+1! , FINDDC+1, CHGDC1+2, END+1!
>> ACMQ	FINDD+2, FINDD+3, MATCHD+5, FINDC+2, FINDC+3, MATCHC+5, FINDR+2, FINDR+3, MATCHR+5, FINDDC+2* , FINDDC+3, MATCHDC+5*
>> ACMRG	FINDD+1, CHGDD+2, FINDC+1, CHGCD+2, FINDR+1, CHGRD+2, FINDDC+1, CHGDCD+2
>> ACMX	CHGDD+1, CHGCD+1, CHGRD+1, CHGDCD+1
DA	CHGD1+2!, CHGDD+1!, CHGDD+2!, CHGDD+3!, CHGC1+2!, CHGCD+1!, CHGCD+2!, CHGCD+3!, CHGR1+2!, CHGRD+1! , CHGRD+2!, CHGRD+3!, CHGDC1+2!, CHGDCD+1!, CHGDCD+2!, CHGDCD+3!, END+1!
DA(1	CHGDD+2!, CHGCD+2!, CHGRD+2!, CHGDCD+2!
DIE	CHGD1+2, CHGC1+2, CHGR1+2, CHGDC1+2, END+1!
DIK	CHGD1+3!, CHGDD+1!, CHGDD+2!, CHGDD+3!, CHGC1+3!, CHGCD+1!, CHGCD+2!, CHGCD+3!, CHGR1+3!, CHGRD+1! , CHGRD+2!, CHGRD+3!, CHGDC1+3!, CHGDCD+1!, CHGDCD+2!, CHGDCD+3!
DIK(1	CHGD1+3, CHGC1+3, CHGR1+3, CHGDC1+3
DIR	DIRYND+1!, DIRYNC+1!, DIRYNR+1!, DIRYNDC+1!, END+1!
DIR("A"	DIRYND, MATCHD+3, DIRYNC, MATCHC+3, DIRYNR, MATCHR+3, DIRYNDC, MATCHDC+3
DIR("B"	DIRYND, DIRYNC, DIRYNR, DIRYNDC
DIR(0	DIRYND, MATCHD+3, DIRYNC, MATCHC+3, DIRYNR, MATCHR+3, DIRYNDC, MATCHDC+3
DR	CHGD1+2!, CHGC1+2!, CHGR1+2!, CHGDC1+2!, END+1!
I	SETD+1, SETD+2, SETD+3, FINDD+1, SETC+1, SETC+2, SETC+3, FINDC+1, SETR+1, SETR+2 , SETR+3, FINDR+1, SETDC+1, SETDC+2, SETDC+3, FINDDC+1, END+1!
U	FINDD+1, MATCHD+2, FINDC+1, MATCHC+2, FINDR+1, MATCHR+2, FINDDC+1, MATCHDC+2
>> Y	DIRYND+1, MATCHD+4, MATCHD+5, DIRYNC+1, MATCHC+4, MATCHC+5, DIRYNR+1, MATCHR+4, MATCHR+5, DIRYNDC+1 , MATCHDC+4, MATCHDC+5
>> Y(0	MATCHD+6, MATCHC+6, MATCHR+6, MATCHDC+6

Marked Items

Name	Field # of Occurrence
$T(COMP+I^ACMRGA02	SETC+1
$T(DIAG+I^ACMRGA02	SETD+1
$T(DXCRIT+I^ACMRGA02	SETDC+1
$T(RISK+I^ACMRGA02	SETR+1

Customize PDF page

Package: Case Management System

Routine: ACMADDM2

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items