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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: DGAUDIT2

Package: Registration

Routine: DGAUDIT2


Information

DGAUDIT2 ;PER/LAB,ISL/DKA - Patient Lookup Audit Report for VAS ;May 17, 2021@12:09

Source Information

Source file <DGAUDIT2.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
VA FileMan 5 $$FIND1^DIC  FILE^DID  UPDATE^DIE  ^DIK  ($$GET1,GETS)^DIQ  
Kernel 4 ($$DT,$$FMADD,$$FMTE,$$FMTHL7,$$NOW)^XLFDT  (DECODE,ENCODE)^XLFJSON  $$STA^XUAF4  $$KSP^XUPARAM  
Master Patient Index VistA 1 $$GETICN^MPIF001  
Registration 1 ($$ANON,$$PENDING,$$WEEK,GENERR)^DGAUDIT1  
Toolkit 1 $$GET^XPAR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Registration 4 DGAUDIT  DGAUDIT1  DGSEC  DGSEC4  

Entry Points

Name Comments DBIA/ICR reference
SELAUD(DGVFILNO,DGVDFN,REQTYP,DGOPT) ;Audit Patient records at selection
; VistA Security Remediation
; When a patient is manually selected to be viewed or edited, an
; audit record will be created.
PROCJSON(REQTYP,DGVDFN,DUZ,MENUOPT,DGVFILNO,DUZ2) ; Create the JSON from the individual fields in the DGAUD AUDIT QUEUE record
; ISL/DKA This copy is for playing around with using only FileMan calls to get the data
BADJSON(DGAUDCNT,DGAUDKPX,DGFDA) ; Purge bad JSON, send message

External References

Name Field # of Occurrence
$$ANON^DGAUDIT1 SELAUD+7
$$PENDING^DGAUDIT1 SELAUD+5
$$WEEK^DGAUDIT1 PROCJSON+48
GENERR^DGAUDIT1 BADJSON+30
$$FIND1^DIC SELAUD+9, PROCJSON+26, PROCJSON+89
FILE^DID PROCJSON+9
UPDATE^DIE PROCJSON+101
^DIK BADJSON+42
$$GET1^DIQ PROCJSON+16, PROCJSON+17, PROCJSON+20, PROCJSON+56, PROCJSON+57, PROCJSON+58, PROCJSON+62, PROCJSON+63, PROCJSON+64, PROCJSON+69
, PROCJSON+70, PROCJSON+72, PROCJSON+73, PROCJSON+90
GETS^DIQ PROCJSON+40
$$GETICN^MPIF001 PROCJSON+53
$$DT^XLFDT BADJSON+34
$$FMADD^XLFDT BADJSON+34
$$FMTE^XLFDT PROCJSON+15, PROCJSON+49
$$FMTHL7^XLFDT PROCJSON+46, PROCJSON+58
$$NOW^XLFDT PROCJSON+8, BADJSON+1
DECODE^XLFJSON PROCJSON+94, BADJSON+9
ENCODE^XLFJSON PROCJSON+93
$$GET^XPAR SELAUD+4
$$STA^XUAF4 PROCJSON+86
$$KSP^XUPARAM PROCJSON+86

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(19 - [#19] FIND1^DIC
^DPT - [#2] FIND1^DIC,  GET1^DIQ
^VA(200 - [#200] GET1^DIQ
^DIC(4 - [#4] FIND1^DIC,  GET1^DIQ
^DGAUDIT - [#46.3] Classic Fileman Calls,  GETS^DIQ
^XTV(8989.3 - [#8989.3] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGAUDIT - [#46.3] PROCJSON+102, BADJSON+9, BADJSON+13, BADJSON+35, BADJSON+36
^VA(200 - [#200] PROCJSON+68
^XTMP( BADJSON+34*, BADJSON+35*, BADJSON+36*, BADJSON+37*

Label References

Name Line Occurrences
BADJSON PROCJSON+100, PROCJSON+105
PROCJSON SELAUD+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D PROCJSON+2~
D0 PROCJSON+2~
DA SELAUD+12~, PROCJSON+2~, BADJSON+42~*
DGARR PROCJSON+2~, PROCJSON+39*, PROCJSON+44, PROCJSON+45, PROCJSON+46, PROCJSON+48, PROCJSON+49, PROCJSON+51*, PROCJSON+52*, PROCJSON+54
, PROCJSON+55, PROCJSON+56, PROCJSON+57, PROCJSON+58, PROCJSON+60*, PROCJSON+61*, PROCJSON+62, PROCJSON+63, PROCJSON+64, PROCJSON+66*
, PROCJSON+71, PROCJSON+74, PROCJSON+76*, PROCJSON+77*, PROCJSON+78, PROCJSON+79, PROCJSON+80, PROCJSON+82*, PROCJSON+83, PROCJSON+85*
, PROCJSON+87, PROCJSON+88*, PROCJSON+91
DGAUDARR PROCJSON+2~, PROCJSON+98, PROCJSON+103
DGAUDARR("data" PROCJSON+39, PROCJSON+51, PROCJSON+60, PROCJSON+66, PROCJSON+76
DGAUDARR("id" PROCJSON+82
DGAUDARR("site" PROCJSON+88
DGAUDARR("station" PROCJSON+85
DGAUDCNT BADJSON~, BADJSON+2, BADJSON+3, BADJSON+7, BADJSON+9, BADJSON+13, BADJSON+18, BADJSON+33, BADJSON+35, BADJSON+36
, BADJSON+39, BADJSON+42
DGAUDDATA PROCJSON+2~
DGAUDDATA( PROCJSON+14*, PROCJSON+15*, PROCJSON+16*, PROCJSON+17*, PROCJSON+18*, PROCJSON+19*, PROCJSON+20*, PROCJSON+22*, PROCJSON+23*, PROCJSON+24*
, PROCJSON+25*, PROCJSON+26*, PROCJSON+27*, PROCJSON+28*, PROCJSON+34, PROCJSON+42
DGAUDDFN PROCJSON+2~, PROCJSON+52*, PROCJSON+53, PROCJSON+56, PROCJSON+57, PROCJSON+58
DGAUDDT PROCJSON+2~, PROCJSON+47*, PROCJSON+48, PROCJSON+49
DGAUDDUZ PROCJSON+2~, PROCJSON+61*, PROCJSON+62, PROCJSON+63, PROCJSON+64, PROCJSON+68
DGAUDECNT PROCJSON+4~, PROCJSON+7*, PROCJSON+12, PROCJSON+14, PROCJSON+15, PROCJSON+16, PROCJSON+17, PROCJSON+18, PROCJSON+19, PROCJSON+20
, PROCJSON+22, PROCJSON+23, PROCJSON+24, PROCJSON+25, PROCJSON+26, PROCJSON+27, PROCJSON+28, PROCJSON+30, PROCJSON+31, PROCJSON+32
, PROCJSON+33, PROCJSON+34, PROCJSON+35, PROCJSON+36, PROCJSON+40, PROCJSON+42, PROCJSON+95, PROCJSON+97, PROCJSON+98, PROCJSON+99
, PROCJSON+103, PROCJSON+104
DGAUDERR PROCJSON+2~, PROCJSON+4~
DGAUDFILE PROCJSON+3~
DGAUDFILNO PROCJSON+3~, PROCJSON+77*
DGAUDIEN PROCJSON+4~, PROCJSON+101*, PROCJSON+102, PROCJSON+105
DGAUDIEN(1 PROCJSON+101
DGAUDJSON PROCJSON+3~
DGAUDJSON(1 PROCJSON+95
DGAUDKPX PROCJSON+100, PROCJSON+105, BADJSON~, BADJSON+32*, BADJSON+34
>> DGAUDMAX SELAUD+4*, SELAUD+5
DGAUDOFFN PROCJSON+3~, PROCJSON+70*, PROCJSON+71
DGAUDREF PROCJSON+3~, PROCJSON+42*, PROCJSON+45, PROCJSON+46, PROCJSON+47, PROCJSON+52, PROCJSON+55, PROCJSON+61, PROCJSON+67, PROCJSON+71
, PROCJSON+77, PROCJSON+78, PROCJSON+80
DGAUDSITEN PROCJSON+3~, PROCJSON+67*, PROCJSON+68*, PROCJSON+69*, PROCJSON+70, PROCJSON+72
DGAUDSTANUM PROCJSON+3~, PROCJSON+72*, PROCJSON+73*, PROCJSON+74
DGCTRL PROCJSON+4~, PROCJSON+11*, PROCJSON+18, PROCJSON+19, PROCJSON+20, PROCJSON+22, PROCJSON+24, PROCJSON+25, PROCJSON+26, PROCJSON+27
, PROCJSON+28, PROCJSON+32, PROCJSON+33, PROCJSON+34, PROCJSON+35, PROCJSON+36, PROCJSON+45, PROCJSON+47, PROCJSON+48, PROCJSON+52
, PROCJSON+55, PROCJSON+56, PROCJSON+57, PROCJSON+61, PROCJSON+62, PROCJSON+63, PROCJSON+64, PROCJSON+71, PROCJSON+72, PROCJSON+74
, PROCJSON+78, PROCJSON+80
DGDECODE BADJSON+8~
DGDECODE( BADJSON+10, BADJSON+11
DGEMPTY BADJSON+1~, BADJSON+12*, BADJSON+20*, BADJSON+30
DGERR PROCJSON+3~, BADJSON+1~*, BADJSON+2*, BADJSON+3*, BADJSON+4*, BADJSON+5*, BADJSON+13*, BADJSON+14*, BADJSON+15*, BADJSON+16*
, BADJSON+17*, BADJSON+23, BADJSON+24*, BADJSON+25*, BADJSON+26*, BADJSON+27*, BADJSON+28*, BADJSON+30
DGERR( BADJSON+2*, BADJSON+3*, BADJSON+4*, BADJSON+5*, BADJSON+13*, BADJSON+14*, BADJSON+15*, BADJSON+16*, BADJSON+17*, BADJSON+23*
, BADJSON+25*, BADJSON+26*, BADJSON+27*, BADJSON+28*
DGERRCAP PROCJSON+98~*, PROCJSON+100, PROCJSON+103~*, PROCJSON+105
DGERRCAP( PROCJSON+98*, PROCJSON+99*, PROCJSON+103*, PROCJSON+104*
DGFDA PROCJSON+3~, PROCJSON+4~, PROCJSON+98, PROCJSON+103, BADJSON~, BADJSON+37
DGFDA( PROCJSON+12*, PROCJSON+30*, PROCJSON+31*, PROCJSON+32*, PROCJSON+33*, PROCJSON+34*, PROCJSON+35*, PROCJSON+36*, PROCJSON+95*, PROCJSON+97
, BADJSON+10, BADJSON+11, BADJSON+14, BADJSON+15, BADJSON+16, BADJSON+17, BADJSON+20, BADJSON+22, BADJSON+23, BADJSON+25
, BADJSON+26, BADJSON+27, BADJSON+28
DGFIELD BADJSON+22~*, BADJSON+23, BADJSON+24
DGFILNAME PROCJSON+4~
DGFILNAME("NAME" PROCJSON+19
DGHEADER BADJSON+1~, BADJSON+23*, BADJSON+35
DGI BADJSON+22~*, BADJSON+23
DGJSONERR BADJSON+8~
DGMVI PROCJSON+3~, PROCJSON+53*, PROCJSON+54
DGNOW BADJSON+1~*, BADJSON+3, BADJSON+33
DGNOWDTM PROCJSON+4~, PROCJSON+8*, PROCJSON+12, PROCJSON+15, PROCJSON+23, PROCJSON+31, PROCJSON+83
DGOPT SELAUD~, SELAUD+13
DGOPTION BADJSON+8~, BADJSON+11*, BADJSON+12
DGREQUEST BADJSON+8~, BADJSON+10*, BADJSON+12
DGRESULT PROCJSON+5~
DGRESULT("DIERR" PROCJSON+104
DGSITEIEN PROCJSON+5~, PROCJSON+89*, PROCJSON+90
DGSITENAM PROCJSON+5~, PROCJSON+90*, PROCJSON+91
DGSTA PROCJSON+4~
DGSTATION PROCJSON+5~, PROCJSON+86*, PROCJSON+87, PROCJSON+89
DGTMPJSON BADJSON+8~, BADJSON+9*
DGVDFN SELAUD~, SELAUD+6, SELAUD+8*, SELAUD+9, SELAUD+15, PROCJSON~, PROCJSON+16, PROCJSON+24, PROCJSON+32, PROCJSON+83
DGVECNT SELAUD+12~
DGVFILNO SELAUD~, SELAUD+15, PROCJSON~, PROCJSON+9, PROCJSON+27, PROCJSON+35
DGXNODE BADJSON+1~, BADJSON+33*, BADJSON+34, BADJSON+35, BADJSON+36, BADJSON+37
DI PROCJSON+2~
DIC SELAUD+12~, PROCJSON+2~
DIE PROCJSON+2~
DIERR PROCJSON+2~
DIK BADJSON+42~*
DIX SELAUD+12~
DIY SELAUD+12~
DO SELAUD+12~, PROCJSON+2~
DQ PROCJSON+2~
DR PROCJSON+2~
DTOUT SELAUD+12~
DUOUT SELAUD+12~
DUZ SELAUD+7, SELAUD+15, PROCJSON~, PROCJSON+17, PROCJSON+25, PROCJSON+33, PROCJSON+83
DUZ(2 SELAUD+15
DUZ2 PROCJSON~, PROCJSON+20, PROCJSON+28, PROCJSON+36
I PROCJSON+11~*
INDX SELAUD+12~
JSONERR PROCJSON+4~, PROCJSON+94, PROCJSON+99*
JSONERR( PROCJSON+99
JSONERR(0 PROCJSON+97, PROCJSON+99
LFLAG SELAUD+12~
MENUOPT SELAUD+12~, SELAUD+13*, SELAUD+15, PROCJSON~, PROCJSON+18, PROCJSON+26
NINUM SELAUD+12~
REQTYP SELAUD~, SELAUD+15, PROCJSON~, PROCJSON+14, PROCJSON+22, PROCJSON+30
TMPJSON PROCJSON+5~
X SELAUD+12~, PROCJSON+2~
>> XQY0 SELAUD+13
Y SELAUD+12~, PROCJSON+3~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All