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 |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AGGPTUPD

Package: Patient Registration GUI

Routine: AGGPTUPD


Information

AGGPTUPD ;VNGT/HS/ALA-Update Patient Data ; 16 Apr 2010 9:08 AM

Source Information

Source file <AGGPTUPD.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
VA Fileman 4 $$GET1^DID  (,FILE,WP)^DIE  $$ROOT^DILFD  GETS^DIQ  
Patient Registration GUI 3 EDIT^AGGEXPRT  COMM^AGGPTADD  ($$CTRL,$$DATE,$$TKO,EML)^AGGUL1  
IHS Patient Registration 2 ($$AETH,$$DETH,ARACE,DRACE)^AGAPIPAT  $$DECEASED^AGEDERR2  
Kernel 2 ^%ZTER  $$NOW^XLFDT  
Immunization Tracking 1 ADDPAT^BIPATE  

Entry Points

Name Comments DBIA/ICR reference
HRDST(FILE,DA,FIELD,VALUE) ; EP - Hard set data because they have triggers on them
RACE(DATA,DFN,TYPE,AGGRDA,AGRACE,AGRMET,PARMS) ; EP -- BQI UPDATE PAT RACE
; Updates for multiple races
ERR ;
ETHN(AGDFN,AGETH,AGMETH) ;EP - Update Ethnicity
SRACE(AGDFN,AGRACE,AGRMET) ;EP - Update Race
DONE ;
UPD(DATA,DEF,DFN,PARMS) ; EP - AGG UPDATE PATIENT
; Input
; DEF - Definition Name
; DFN - Patient IEN
; PARMS - Parameters

External References

Name Field # of Occurrence
^%ZTER ERR+1
$$AETH^AGAPIPAT ETHN+9
$$DETH^AGAPIPAT ETHN+3
ARACE^AGAPIPAT SRACE+10, RACE+27
DRACE^AGAPIPAT SRACE+5, RACE+21
$$DECEASED^AGEDERR2 UPD+130
EDIT^AGGEXPRT UPD+129
COMM^AGGPTADD UPD+91
$$CTRL^AGGUL1 UPD+55
$$DATE^AGGUL1 UPD+47, UPD+57
$$TKO^AGGUL1 UPD+23
EML^AGGUL1 UPD+92
ADDPAT^BIPATE UPD+130
$$GET1^DID HRDST+3
^DIE UPD+101
FILE^DIE UPD+120, UPD+121, UPD+128
WP^DIE UPD+115
$$ROOT^DILFD HRDST+2
GETS^DIQ UPD+24, UPD+28
$$NOW^XLFDT ERR+3

Used in RPC

RPC Name Call Tags
AGG UPDATE PATIENT UPD

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPAT - [#9000001] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AGG(9009068.3 - [#9009068.3] UPD+16, UPD+18, UPD+22, UPD+27, UPD+44, UPD+46, UPD+51, UPD+52, UPD+58, UPD+68
, UPD+70, UPD+71, UPD+74, UPD+135
^AUTTCOM - [#9999999.05] UPD+89
^DD("DD" ERR+3
^DIC(10 - [#10] SRACE+8, RACE+25
^DIC(10.2 - [#10.2] ETHN+7
^DIC(10.3 - [#10.3] ETHN+6, RACE+26
^DPT - [#2] UPD+130, SRACE+5
^TMP("AGGPTRCE" RACE+12
^TMP("AGGPTUPD" UPD+8

Label References

Name Line Occurrences
HRDST UPD+76, UPD+77

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AGDFN ETHN~, ETHN+3, ETHN+9, SRACE~, SRACE+5, SRACE+10
AGETH ETHN~, ETHN+5, ETHN+7*, ETHN+9
AGGDATA UPD+6~, UPD+120, UPD+133!
AGGDATA( UPD+81*, UPD+84*, UPD+85*, UPD+86*
AGGDATA(9000001 UPD+89*
AGGDATAI UPD+121, UPD+133!
AGGDATAI( UPD+80*, UPD+83*
AGGDATAI(9000001 UPD+127*
AGGINT UPD+6~
AGGINT( UPD+59, UPD+60, UPD+79, UPD+82, UPD+85, UPD+86
>> AGGPTCDT UPD+57*, UPD+91
>> AGGPTCOM UPD+88, UPD+89, UPD+91
AGGPTEML UPD+6~, UPD+92
>> AGGPTHRN UPD+97, UPD+100
AGGRDA SRACE+1~, SRACE+4*, SRACE+5*, RACE~, RACE+21
AGGWP UPD+105, UPD+117!
AGGWP( UPD+108, UPD+110, UPD+112
>> AGI UPD+54*, UPD+55
>> AGJ UPD+54*, UPD+55
AGMETH ETHN~, ETHN+6*, ETHN+9
AGRACE SRACE~, SRACE+7, SRACE+8, RACE~, RACE+25
AGRMET SRACE~, SRACE+2, RACE~, RACE+26
AGWP UPD+117!
AGWP( UPD+55*
>> BMXSEC UPD+17*, UPD+38, UPD+45*, UPD+65, UPD+69*, ERR+4*
BN UPD+5~, UPD+32*, UPD+33*
>> BQ UPD+38*, UPD+39, UPD+65*, UPD+66
CHIEN UPD+5~, UPD+51*, UPD+52
CROOT HRDST+1~, HRDST+2*, HRDST+6*
DA UPD+96~, UPD+98*, HRDST~, HRDST+6
DATA UPD~, UPD+8*, UPD+9, UPD+13, UPD+132, DONE+1, RACE~, RACE+12*, RACE+13, RACE+17
, RACE+30, RACE+31, ERR+5
DEF UPD~, UPD+16, UPD+17
DFN UPD~, UPD+24, UPD+28, UPD+59, UPD+60, UPD+76, UPD+77, UPD+79, UPD+80, UPD+81
, UPD+82, UPD+83, UPD+84, UPD+85, UPD+86, UPD+89, UPD+91, UPD+92, UPD+98, UPD+127
, UPD+129, UPD+130, RACE~, RACE+21, RACE+27
DIE UPD+96~, UPD+98*
DR UPD+96~, UPD+99*
DR(2 UPD+100*
DT UPD+127
DUZ UPD+127
DUZ(2 UPD+99, UPD+130
ERRDTM ERR+2~, ERR+3*, ERR+4
ERROR UPD+6~, UPD+95, UPD+118, UPD+119!, UPD+122, ETHN+1~, ETHN+3, ETHN+9, ETHN+10, SRACE+1~
, SRACE+5, SRACE+10, SRACE+12, RACE+10~, RACE+21, RACE+27, RACE+29
ERROR("DIERR" UPD+118, UPD+122, ETHN+10, SRACE+12, RACE+29
EXEC UPD+5~, UPD+71*, UPD+72
FD UPD+106~, UPD+111*, UPD+112*, UPD+115
FIELD UPD+5~, UPD+58*, UPD+59, UPD+70*, UPD+73, UPD+76, UPD+79, UPD+80, UPD+81, UPD+85
, HRDST~, HRDST+3
FILE UPD+5~, UPD+18*, UPD+24, UPD+59, UPD+76, UPD+79, UPD+80, UPD+81, UPD+85, HRDST~
, HRDST+2, HRDST+3
FL UPD+106~, UPD+107*, UPD+108*, UPD+110, UPD+112, UPD+115
FLAG UPD+106~, UPD+113*, UPD+115
FLD UPD+21~, UPD+22*, UPD+26~, UPD+27*
IENS UPD+106~, UPD+109*, UPD+110*, UPD+112, UPD+115
II UPD+5~, UPD+11*, UPD+13, UPD+132*, DONE+1*, RACE+10~, RACE+15*, RACE+17, RACE+30*, RACE+31*
, ERR+5*
LIST UPD+5~, UPD+21~, UPD+22*, UPD+23*, UPD+24, UPD+26~, UPD+27*, UPD+28, UPD+32*, UPD+33*
, UPD+35, UPD+36!
MET SRACE+1~, SRACE+2*, SRACE+10, RACE+24~, RACE+26*, RACE+27
NAME UPD+5~, UPD+40*, UPD+41, UPD+44, UPD+45, UPD+63, UPD+67*, UPD+68, UPD+69, UPD+75
, UPD+76, UPD+77, UPD+79, UPD+80, UPD+81, UPD+82, UPD+83, UPD+84, UPD+85, UPD+86
, UPD+134*, UPD+135*
NOD HRDST+1~, HRDST+5*, HRDST+6
OK ETHN+1~, ETHN+3*, ETHN+9*, SRACE+1~
OTHPARM UPD+5~, UPD+15*, UPD+103, UPD+118, UPD+122, UPD+123
PARMS UPD~, UPD+30*, UPD+31, UPD+34!, UPD+35*, UPD+38, UPD+39, UPD+65, UPD+66, RACE~
PARMS( UPD+33
PDATA UPD+5~, UPD+39*, UPD+40, UPD+66*, UPD+67
PEC HRDST+1~, HRDST+5*, HRDST+6
>> PFIEN UPD+44*, UPD+45, UPD+46, UPD+51, UPD+52, UPD+58, UPD+68*, UPD+69, UPD+70, UPD+71
, UPD+74
PTYP UPD+5~, UPD+46*, UPD+47, UPD+49, UPD+53, UPD+74*, UPD+78
RACE SRACE+1~, SRACE+8*, SRACE+10, RACE+24~, RACE+25*, RACE+27
RESULT UPD+6~, UPD+103*, UPD+118*, UPD+122*, UPD+123*, UPD+126, UPD+132, ETHN+5*, ETHN+10*, ETHN+11*
, SRACE+7*, SRACE+12*, SRACE+13*, RACE+10~, RACE+19*, RACE+29*, RACE+30
>> SECFILE UPD+18*, UPD+28, UPD+60, UPD+77, UPD+82, UPD+83, UPD+84, UPD+86
>> SECFLD UPD+58*, UPD+60, UPD+70*, UPD+73, UPD+77, UPD+82, UPD+83, UPD+84, UPD+86
TYPE RACE~, RACE+21, RACE+23
U UPD+18, UPD+46, UPD+52, UPD+58, UPD+70, UPD+74, UPD+89, UPD+103, UPD+118, UPD+122
, UPD+123, UPD+126, UPD+130, ETHN+5, ETHN+6, ETHN+7, ETHN+10, ETHN+11, SRACE+7, SRACE+8
, SRACE+12, SRACE+13, RACE+19, RACE+25, RACE+26, RACE+29, HRDST+6
UID UPD+5~, UPD+7*, UPD+8, RACE+10~, RACE+11*, RACE+12
VALUE UPD+5~, UPD+40*, UPD+41, UPD+47*, UPD+50, UPD+51, UPD+52*, UPD+54, UPD+59*, UPD+60*
, UPD+63, HRDST~, HRDST+6
VFIEN UPD+5~, UPD+16*, UPD+17, UPD+18, UPD+22, UPD+27, UPD+44, UPD+46, UPD+51, UPD+52
, UPD+58, UPD+68, UPD+70, UPD+71, UPD+74, UPD+135
WDATA UPD+6~, UPD+115
WHERE HRDST+1~, HRDST+3*, HRDST+4, HRDST+5
Y ERR+2~, ERR+3*
>> ZTSK UPD+7, RACE+11
Info |  Source |  Call Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All