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.
  • ICR #7480
    • Status: Pending
    • Usage: Controlled Subscription
    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