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 |  All
Print Page as PDF
Routine: AGED10B

Package: IHS Patient Registration

Routine: AGED10B


Information

AGED10B ; VNGT/HS/BEE - EDIT PG 10 - ETHNICITY/RACE/LANGUAGE/MIGRANT/HOMELESS/INTERNET/HOUSEHOLD INFO (CONT) ; MAR 19, 2010

Source Information

Source file <AGED10B.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 6 (,LIST)^DIC  FILE^DICN  (,FILE,UPDATE)^DIE  $$IENS^DILF  ($$GET1,GETS)^DIQ  ^DIR  
IHS Patient Registration 2 ($$RQETH,$$RQPRF,$$RQPRM,$$RQRACE)^AGEDERR4  $$RACE^AGUTL  

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
IHS Patient Registration 5 AG0  AGAPIPAT  AGED10A  AGEDERR2  AGFACE  

Entry Points

Name Comments DBIA/ICR reference
PROF1
CHKENG(IENS) ;EP - Get Count of Other Languages Spoken and whether English is one of them
ETHNIC ;EP
CHKRACE ;DECLINED/UNKNOWN RACE CHECK
LANG ;EP - EDIT PATIENT'S PRIMARY LANGUAGE
CLANG(AGPATDFN,OLNG) ;EP - Return the patients most recent language entry IEN and other Language Information
RACE ;EP - DISPLAY PATIENT'S RACE
PREF1
XETHNIC ;
PREF(LIEN) ;EP - EDIT Preferred Language
EDETHNIC ;EP
OLNG(LIEN) ;EP - EDIT PATIENT'S OTHER LANGUAGE SPOKEN
NEWLG(AGPATDFN) ;EP - Create a new Language multiple entry and copy in previous responses
INTRP1
EDRACE ;EP
PROF(LIEN) ;EP - EDIT ENGLISH PROFICIENCY prompt
THI ;EP - DISPLAY TOTAL HOUSEHOLD INCOME
LANG1
MOC(DA,DEF)
NIH ;EP - DISPLAY NUMBER IN HOUSEHOLD
THIP ;EP - EDIT/DISPLAY HOUSEHOLD INCOME PERIOD
INTRP(LIEN) ;EP - EDIT Interpreter required prompt
XLANG

External References

Name Field # of Occurrence
$$RQETH^AGEDERR4 EDETHNIC+22, EDETHNIC+45, MOC+25
$$RQPRF^AGEDERR4 PREF1+17
$$RQPRM^AGEDERR4 LANG1+55, INTRP1+15, PROF1+15
$$RQRACE^AGEDERR4 EDRACE+28
$$RACE^AGUTL EDRACE+28, CHKRACE+3
^DIC EDETHNIC+41
LIST^DIC CHKRACE+22
FILE^DICN NEWLG+18
^DIE LANG1+14, INTRP1+10, OLNG+8, PREF1+12, PROF1+10, EDRACE+20, NIH+6, THI+6, THIP+10
FILE^DIE LANG1+36, LANG1+42, LANG1+48, LANG1+83, LANG1+91, NEWLG+25, EDETHNIC+33, MOC+22, THI+13
UPDATE^DIE LANG1+27, CHKRACE+25
$$IENS^DILF LANG1+7, NEWLG+20, INTRP1+4, PREF1+6, PROF1+4
$$GET1^DIQ LANG1+8, LANG1+9, LANG1+17, LANG1+18, LANG1+89, CLANG+11, CLANG+15, CLANG+18, INTRP1+5, INTRP1+13
, PREF1+7, PREF1+15, PROF1+5, PROF1+13, EDETHNIC+9, EDETHNIC+25, EDETHNIC+29, THI+9, THIP+5, THIP+13
GETS^DIQ LANG1+24, CHKENG+2, CLANG+9
^DIR EDETHNIC+14, MOC+14, CHKRACE+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "?? Required"
  • Line Location: LANG1+55
Function Call: WRITE
  • Prompt: "?? Required"
  • Line Location: INTRP1+15
Function Call: WRITE
  • Prompt: "?? Required"
  • Line Location: PREF1+17
Function Call: WRITE
  • Prompt: "?? Required"
  • Line Location: PROF1+15
Function Call: WRITE
  • Prompt: "?? Required"
  • Line Location: EDETHNIC+22
Function Call: WRITE
  • Prompt: "?? Required"
  • Line Location: MOC+25
Function Call: WRITE
  • Prompt: "?? Required"
  • Line Location: EDRACE+27
Function Call: WRITE
  • Prompt: "?? Required"
  • Line Location: EDRACE+28
Function Call: WRITE
  • Prompt: !,"A) Keep "_AGSTR,!,"B) Remove "_AGSTR
  • Line Location: CHKRACE+8
Function Call: WRITE
  • Prompt: !
  • Line Location: NIH+2
Function Call: WRITE
  • Prompt: !
  • Line Location: THI+2
Function Call: WRITE
  • Prompt: "?? Required"
  • Line Location: THIP+15
Routine Call
  • DIC
  • Line Location:
    • CHKRACE+22
Routine Call
  • DIE
  • Line Location:
    • LANG1+27
    • CHKRACE+25
Routine Call
  • DIE
  • Line Location:
    • LANG1+14
    • INTRP1+10
    • OLNG+8
    • PREF1+12
    • PROF1+10
    • EDRACE+20
    • NIH+6
    • THI+6
    • THIP+10
Routine Call
  • DIR
  • Line Location:
    • EDETHNIC+14
    • MOC+14
    • CHKRACE+13
Routine Call
  • DIC
  • Line Location:
    • EDETHNIC+41
Routine Call
  • DIE
  • Line Location:
    • LANG1+36
    • LANG1+42
    • LANG1+48
    • LANG1+83
    • LANG1+91
    • NEWLG+25
    • EDETHNIC+33
    • MOC+22
    • THI+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(10.3 - [#10.3] GET1^DIQ
^DPT - [#2] Classic Fileman Calls
2.02 LIST^DIC
2.06 GET1^DIQ
^AUPNPAT - [#9000001] Classic Fileman Calls,  GET1^DIQ
9000001.86 GET1^DIQ,  GETS^DIQ
^AUTTLANG - [#9999999.99] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT - [#9000001] NEWLG+17*, NEWLG+26*, CLANG+5, CLANG+6
^DPT - [#2] EDETHNIC+8, EDETHNIC+22

Label References

Name Line Occurrences
$$CHKENG LANG1+31, LANG1+76
$$CLANG NEWLG+5
$$NEWLG LANG1+3, PREF1+2
$$PROF LANG1+69, LANG1+77
CHKRACE EDRACE+23, CHKRACE+14
EDRACE EDRACE+28
ETHNIC EDETHNIC+22, EDETHNIC+28, EDETHNIC+45
INTRP LANG1+63
INTRP1 INTRP1+14, INTRP1+15
LANG1 LANG1+54, LANG1+55
MOC EDETHNIC+48
OLNG LANG1+73
PREF LANG1+86
PREF1 PREF1+16, PREF1+17
PROF1 PROF1+14, PROF1+15
THIP THIP+14, THIP+15
XETHNIC EDETHNIC+15
XLANG LANG1+51, LANG1+60, LANG1+66, LANG1+77, LANG1+86

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AGCNT LANG1+23~, LANG1+25*, LANG1+26, CHKRACE+1~, CHKRACE+23*, CHKRACE+24
AGDEC CHKRACE+1~, CHKRACE+5*, CHKRACE+6, CHKRACE+7, CHKRACE+16, CHKRACE+18
AGPATDFN LANG1+3, LANG1+6, NEWLG~, NEWLG+5, NEWLG+13, NEWLG+17, NEWLG+19, NEWLG+26, CLANG~, CLANG+5
, CLANG+6, CLANG+8, INTRP1+3, OLNG+4, PREF1+2, PREF1+5, PROF1+3, EDETHNIC+8, EDETHNIC+9, EDETHNIC+22
, EDETHNIC+29, EDETHNIC+31, EDETHNIC+37, MOC+20
AGRACE EDETHNIC+30~, MOC+5~, EDRACE+28!, CHKRACE+1~, CHKRACE+3*, CHKRACE+4, CHKRACE+5, CHKRACE+18
AGRACE( EDETHNIC+32*, MOC+21*
AGRES LANG1+23~, CHKRACE+1~
AGRES( LANG1+25, LANG1+26*
AGRES("DILIST" CHKRACE+23, CHKRACE+24
AGSCR CHKRACE+1~, CHKRACE+16*, CHKRACE+18*, CHKRACE+20*, CHKRACE+22
AGSTR CHKRACE+1~, CHKRACE+7*, CHKRACE+8, CHKRACE+12
AGUNK CHKRACE+1~, CHKRACE+5*, CHKRACE+6, CHKRACE+7, CHKRACE+16, CHKRACE+18
ALANG NEWLG+2~
ALANG( NEWLG+21*, NEWLG+22*, NEWLG+23*, NEWLG+24*
ATHI THI+11~
ATHI(9000001 THI+12*
CHK LANG1~, LANG1+31*, LANG1+32, LANG1+45, LANG1+76*, LANG1+77, LANG1+80, LANG1+86, PREF1~
CNT CHKENG+1~, CHKENG+3*, CHKENG+6
CPRF PROF1~, PROF1+5*, PROF1+14!, PROF1+15!
CTHIP THIP+2~, THIP+5*, THIP+14!, THIP+15!
DA LANG1~, LANG1+6*, LANG1+7, LANG1+54!, LANG1+55!, NEWLG+2~, NEWLG+19*, NEWLG+20, NEWLG+26, INTRP1~
, INTRP1+3*, INTRP1+4, INTRP1+14!, INTRP1+15!, OLNG+2~, OLNG+4*, PREF1~, PREF1+5*, PREF1+6, PREF1+16!
, PREF1+17!, PROF1~, PROF1+3*, PROF1+4, PROF1+14!, PROF1+15!, EDETHNIC+21~, EDETHNIC+22*!, EDETHNIC+28!, EDETHNIC+29
, EDETHNIC+32, EDETHNIC+42*, EDETHNIC+45!, EDETHNIC+48, MOC~, MOC+21, EDRACE+15~, EDRACE+17*, EDRACE+28!, NIH+4*
, THI+4*, THIP+2~, THIP+8*, THIP+14!, THIP+15!
DA(1 LANG1+6*, LANG1+12, NEWLG+13*, NEWLG+19*, INTRP1+3*, INTRP1+8, OLNG+4*, OLNG+5, PREF1+5*, PREF1+10
, PROF1+3*, PROF1+8, EDETHNIC+31*, EDETHNIC+32, EDETHNIC+37*, EDETHNIC+38, MOC+20*, MOC+21
DA(2 OLNG+4*
DD NEWLG+18!
DDUOUT EDETHNIC+15!
DEF NEWLG+2~, NEWLG+5*, NEWLG+6, NEWLG+7, NEWLG+8, NEWLG+9, NEWLG+10, EDETHNIC+2~, EDETHNIC+8*, EDETHNIC+9*
, EDETHNIC+10, EDETHNIC+15!, EDETHNIC+18!, MOC~, MOC+11, MOC+24*
>> DFN EDRACE+17, EDRACE+28, CHKRACE+3, CHKRACE+22, CHKRACE+24, NIH+4, THI+4, THI+9, THI+12, THIP+5
, THIP+8, THIP+13
DIC NEWLG+2~, NEWLG+13*, EDETHNIC+36~, EDETHNIC+38*, EDETHNIC+45!, NIH+1!, NIH+7!, THI+1!
DIC("P" NEWLG+16*
DIC(0 NEWLG+14*, EDETHNIC+39*
DIE LANG1~, LANG1+12*, LANG1+54!, LANG1+55!, INTRP1~, INTRP1+8*, INTRP1+14!, INTRP1+15!, OLNG+2~, OLNG+5*
, PREF1~, PREF1+10*, PREF1+16!, PREF1+17!, PROF1~, PROF1+8*, PROF1+14!, PROF1+15!, EDRACE+15~, EDRACE+16*
, EDRACE+28!, NIH+1!, NIH+3*, NIH+7!, THI+1!, THI+3*, THIP+2~, THIP+7*, THIP+14!, THIP+15!
DIR EDETHNIC+2~, EDETHNIC+15!, EDETHNIC+18!, MOC+5~, CHKRACE+2!
DIR("?" CHKRACE+10*, CHKRACE+11*
DIR("A" EDETHNIC+5*, MOC+8*, CHKRACE+9*
DIR("B" EDETHNIC+10*, MOC+11*
DIR("S" EDETHNIC+13*
DIR(0 EDETHNIC+4*, MOC+7*, CHKRACE+12*
DIROUT LANG1~, LANG1+54!, LANG1+55!, LANG1+60, PREF1~, PREF1+16!, PREF1+17!, EDETHNIC+2~, EDETHNIC+15!, EDETHNIC+18!
, MOC+5~, MOC+15, CHKRACE+2!, CHKRACE+14
DIRUT LANG1~, LANG1+54!, LANG1+55!, LANG1+60, PREF1~, PREF1+16!, PREF1+17!, EDETHNIC+2~, EDETHNIC+15!, EDETHNIC+18!
, MOC+5~, CHKRACE+2!, CHKRACE+14
DLAYGO NEWLG+2~, NEWLG+16*
DO NEWLG+18!
DR LANG1~, LANG1+13*, LANG1+54!, LANG1+55!, INTRP1~, INTRP1+9*, INTRP1+14!, INTRP1+15!, OLNG+2~, OLNG+6*
, PREF1~, PREF1+11*, PREF1+16!, PREF1+17!, PROF1~, PROF1+9*, PROF1+14!, PROF1+15!, EDRACE+15~, EDRACE+18*
, EDRACE+28!, NIH+1!, NIH+5*, NIH+7!, THI+1!, THI+5*, THIP+2~, THIP+9*, THIP+14!, THIP+15!
DR(2 OLNG+7*, EDRACE+19*
DT NEWLG+15
DTOUT LANG1~, LANG1+54!, LANG1+55!, LANG1+60, LANG1+66, LANG1+69*, LANG1+77*, INTRP1+10*, OLNG+2~, PREF1~
, PREF1+16!, PREF1+17!, PROF1~, PROF1+10, PROF1+14!, PROF1+15!, EDETHNIC+2~, EDETHNIC+15!, EDETHNIC+18!, MOC+5~
, MOC+15, CHKRACE+2!, CHKRACE+14, THIP+2~, THIP+11, THIP+14!, THIP+15!
DUOUT LANG1~, LANG1+54!, LANG1+55!, LANG1+60, PREF1~, PREF1+16!, PREF1+17!, EDETHNIC+2~, EDETHNIC+15, EDETHNIC+18!
, MOC+5~, MOC+15, EDRACE+15~, EDRACE+21*, EDRACE+28!, CHKRACE+2!, CHKRACE+14
DUZ(2 LANG1+55, INTRP1+15, PREF1+17, PROF1+15, EDETHNIC+22, EDETHNIC+45, MOC+25, EDRACE+28
ENG CHKENG+1~, CHKENG+3*, CHKENG+5*, CHKENG+6
ERROR LANG1+34~, LANG1+40~, LANG1+46~, LANG1+81~, CHKENG+1~
ETHNIC EDETHNIC+2~, EDETHNIC+15!, EDETHNIC+16*, EDETHNIC+22!, EDETHNIC+28!, EDETHNIC+40, EDETHNIC+45!
EXIT MOC~, MOC+2*, MOC+3, MOC+15*, MOC+26*
FDA CHKRACE+1~
FDA( CHKRACE+24*
IEN CHKENG+1~, CHKENG+3*, CHKENG+4, CLANG+2~, CLANG+8*, CLANG+9, CLANG+10, CLANG+12, CLANG+13, CLANG+14
, CLANG+16, CLANG+17, CLANG+18*
IENS LANG1~, LANG1+7*, LANG1+8, LANG1+17, LANG1+24, LANG1+31, LANG1+35, LANG1+41, LANG1+47, LANG1+54!
, LANG1+55!, LANG1+76, LANG1+82, LANG1+89, LANG1+90, NEWLG+2~, NEWLG+20*, NEWLG+21, NEWLG+22, NEWLG+23
, NEWLG+24, CHKENG~, CHKENG+2, INTRP1~, INTRP1+4*, INTRP1+5, INTRP1+13, INTRP1+14!, INTRP1+15!, PREF1~
, PREF1+6*, PREF1+7, PREF1+15, PREF1+16!, PREF1+17!, PROF1+4*, PROF1+5, PROF1+13
INT NEWLG+2~, NEWLG+7*, NEWLG+22, CLANG+2~, CLANG+4*, CLANG+12*, CLANG+25, INTRP1~, INTRP1+13*, INTRP1+14!
, INTRP1+15!
INTX CLANG+2~, CLANG+4*, CLANG+13*, CLANG+25
LDT CLANG+2~, CLANG+4*, CLANG+5*, CLANG+6
LIEN LANG+2~, LANG1+3*, LANG1+6, LANG1+63, LANG1+69, LANG1+73, LANG1+77, LANG1+86, NEWLG+2~, NEWLG+19*
, NEWLG+27, CLANG+2~, CLANG+4*, CLANG+6*, CLANG+7, CLANG+8, CLANG+25, INTRP~, INTRP1+3, OLNG~
, OLNG+4, PREF~, PREF1+2*, PREF1+5, PROF~, PROF1+3
LNG CHKENG+1~, CHKENG+4*, CHKENG+5
MOC EDETHNIC+21~, EDETHNIC+22!, EDETHNIC+25*, EDETHNIC+28!, EDETHNIC+29*, EDETHNIC+45!, EDETHNIC+48, MOC+5~, MOC+17*, MOC+21
, MOC+24, MOC+25
OIEN CLANG+2~, CLANG+18*
OINT INTRP1~, INTRP1+5*, INTRP1+14!, INTRP1+15!
OLIEN NEWLG+2~, NEWLG+6*, NEWLG+26
OLNG NEWLG+5, CHKENG+1~, CLANG~, CLANG+21*, CLANG+22*, CLANG+23*, CLANG+25
OLNG( CLANG+18*, CLANG+22, CLANG+23
OLNG("" CLANG+21
OLNG("9000001.8605" CHKENG+3, CHKENG+4
OPRE PREF1~, PREF1+7*, PREF1+16!, PREF1+17!
OPRM LANG1~, LANG1+8*, LANG1+9, LANG1+54!, LANG1+55!
OPRMX LANG1~, LANG1+6*, LANG1+9*, LANG1+33
PLANG LANG1~, LANG1+34~, LANG1+40~, LANG1+46~, LANG1+54!, LANG1+55!, LANG1+81~, PREF1~, PREF1+16!, PREF1+17!
PLANG( LANG1+47*, LANG1+90*
PLANG("9000001.86" LANG1+35*, LANG1+41*, LANG1+82*
PRE NEWLG+2~, NEWLG+8*, NEWLG+23, CLANG+2~, CLANG+4*, CLANG+14*, CLANG+15, CLANG+25, PREF1~, PREF1+15*
, PREF1+16!, PREF1+17!
PREX CLANG+2~, CLANG+4*, CLANG+15*, CLANG+25
PRF PROF1~, PROF1+13*, PROF1+14!, PROF1+15!
PRM LANG1~, LANG1+17*, LANG1+18, LANG1+54!, LANG1+55!, LANG1+89*, LANG1+90, NEWLG+2~, NEWLG+9*, NEWLG+21
, CLANG+2~, CLANG+4*, CLANG+10*, CLANG+11, CLANG+25
PRMX LANG1~, LANG1+17*, LANG1+18*, LANG1+22, LANG1+33, LANG1+39, LANG1+45, LANG1+54!, LANG1+55!, LANG1+60
, LANG1+66, LANG1+73, LANG1+80, CLANG+2~, CLANG+4*, CLANG+11*, CLANG+25
PRO NEWLG+2~, NEWLG+10*, NEWLG+24, CLANG+2~, CLANG+4*, CLANG+16*, CLANG+25
PROX CLANG+2~, CLANG+4*, CLANG+17*, CLANG+25
THI THI+1!, THI+9*, THI+10
THIP THIP+2~, THIP+13*, THIP+14!, THIP+15!
U LANG1+32, LANG1+45, LANG1+77, LANG1+80, LANG1+86, NEWLG+6, NEWLG+7, NEWLG+8, NEWLG+9, NEWLG+10
, CLANG+25, EDETHNIC+40, MOC+21, CHKRACE+24
VAR CLANG+2~, CLANG+4*
VAR( CLANG+10, CLANG+12, CLANG+13, CLANG+14, CLANG+16, CLANG+17, CLANG+18
X NEWLG+2~, NEWLG+15*, EDETHNIC+36~, EDETHNIC+40*, EDETHNIC+45!, MOC+5~
Y LANG1~, LANG1+23~, LANG1+51, LANG1+54!, LANG1+55!, NEWLG+2~, NEWLG+19, INTRP1~, INTRP1+10, OLNG+2~
, PREF1~, PREF1+12, PREF1+16!, PREF1+17!, PROF1~, PROF1+10, PROF1+14!, PROF1+15!, EDETHNIC+2~, EDETHNIC+15!
, EDETHNIC+16, EDETHNIC+18!, EDETHNIC+36~, EDETHNIC+42, EDETHNIC+45!, MOC+5~, MOC+17, EDRACE+15~, EDRACE+21, EDRACE+28!
, CHKRACE+1~, CHKRACE+18, CHKRACE+20, THIP+2~, THIP+11, THIP+14!, THIP+15!
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 |  All