Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ACMADDM2

Package: Case Management System

Routine: ACMADDM2


Information

ACMADDM2 ; IHS/TUCSON/TMJ - CONTINUATION OF ADD IHS PRE-DIABETES REGISTER ; [ 10/17/05 11:49 AM ]

Source Information

Source file <ACMADDM2.m>

Call Graph

Call Graph Total: 4

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

Caller Graph

Caller Graph Total: 1

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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All