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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: DGREGDD1

Package: Registration

Routine: DGREGDD1


Information

DGREGDD1 ;ALB/REW/BRM - REGISTRATION PATIENT FILE MUMPS X-REF ; 10/22/02 2:17pm

Source Information

Source file <DGREGDD1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 3 $$FIND1^DIC  FILE^DIE  $$GET1^DIQ  
Kernel 1 (POSTAL,POSTALB)^XIPUTIL  
Registration 1 $$FOREIGN^DGREGAZL  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 28

Package Total Caller Graph
Integrated Billing 11 IBXS11  IBXS121  IBXS16  IBXS17  IBXS21  IBXSC114  IBXSC117  IBXSC121  
IBXSC21  IBXSC22  IBXSC23  
Registration 9 DGREGAZL  DGREGTZL  DGRPT 10-10T REGISTRATION  DGRPTX  DGRPTX1  DGRPTX10  DGRPTX11  DGRPTX9  
DGRPXX7  
Automated Medical Information Exchange 3 DVBAXA1  DVBAXA15  DVBAXA2  
HINQ 3 DVBHCE13  DVBHCE14  DVBHCE8  
Graphics 1 GRPX71  
Scheduling 1 SDM1T5  

Entry Points

Name Comments DBIA/ICR reference
KILLMULT(DFN,DFN1,MULTNUM,MULTNODE,DGFLD,DGNODE,DGPIECE,X) ; KILL
ZIP(DA,ZIP,CITY) ; update city, state and county based on zip code change
KILL(DFN,DGFLD,DGNODE,DGPIECE,X) ; KILL OLD FIELD & DO KILL X-REFS
SET(DFN,DGFLD,DGNODE,DGPIECE,X) ; SET NEW FIELD & DO SET X-REFS
ALWEDT(DUZ,ZIP) ; determine if a security key is necessary for editing
; Input: zip code
; Output: 1: allow edit state and county
; 0: don't allow edit state and county
SETMULT(DFN,DFN1,MULTNUM,MULTNODE,DGFLD,DGNODE,DGPIECE,X) ; SET
; SETSNEW FIELD & DOES SET X-REFS
KEY(DUZ,DFN) ; determine if a security key is necessary for editing
; a patient's state and county fields. If it is necessary,
; determine if this user holds it.
  • ICR #3619
    • Status: Active
    • Usage: Controlled Subscription
    MLT(ZIP) ;Determine if a zip correspond to multiple state and\or county

    External References

    Name Field # of Occurrence
    $$FOREIGN^DGREGAZL ZIP+26, ALWEDT+8
    $$FIND1^DIC ZIP+31
    FILE^DIE ZIP+39
    $$GET1^DIQ KEY+11
    POSTAL^XIPUTIL ZIP+27, ALWEDT+9
    POSTALB^XIPUTIL MLT+6

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"STATE: ",$G(EASDATA("STATE"))
    • Line Location: ALWEDT+14
    Function Call: WRITE
    • Prompt: !,"COUNTY: ",$G(EASDATA("COUNTY"))
    • Line Location: ALWEDT+15
    Routine Call
    • DIC
    • Line Location:
      • ZIP+31
    Routine Call
    • DIE
    • Line Location:
      • ZIP+39

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DPT - [#2] GET1^DIQ
    5.01 FIND1^DIC

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD( SETMULT+6, KILLMULT+7
    ^DD(2 SET+5, KILL+5
    ^DIC(5 - [#5] ZIP+33, ZIP+35
    ^DPT - [#2] SET+4*, KILL+4*, SETMULT+5*, KILLMULT+5, KILLMULT+6*
    ^XUSEC("EAS GMT COUNTY EDIT" ALWEDT+13

    Label References

    Name Line Occurrences
    $$ALWEDT KEY+12
    $$MLT ZIP+25, ALWEDT+7

    Naked Globals

    Name Field # of Occurrence
    ^( SET+5, KILL+5, SETMULT+6, KILLMULT+7

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    CITY ZIP~
    CNTYIEN ZIP+23~, ZIP+30*, ZIP+31*, ZIP+32, ZIP+35*, ZIP+36, ZIP+37, ZIP+39
    DA ZIP~, ZIP+21, ZIP+36, ZIP+37
    DFN SET~, SET+4, KILL~, KILL+4, SETMULT~, SETMULT+2, SETMULT+5, KILLMULT~, KILLMULT+2, KILLMULT+5
    , KILLMULT+6, KEY~, KEY+9, KEY+11
    DFN1 SETMULT~, SETMULT+2, SETMULT+5, KILLMULT~, KILLMULT+2, KILLMULT+5, KILLMULT+6
    DGCNTY MLT+3~, MLT+4*
    DGDATA MLT+3~, MLT+6
    DGDATA( MLT+8, MLT+9, MLT+10, MLT+11
    DGDATA("ERROR" MLT+7
    DGFIPS MLT+3~, MLT+4*, MLT+9*, MLT+11
    DGFLD SET~, SET+1, SET+5, KILL~, KILL+1, KILL+5, SETMULT~, SETMULT+2, SETMULT+6, KILLMULT~
    , KILLMULT+2, KILLMULT+7
    DGIX SET+2~, SET+5*, KILL+2~, KILL+5*, SETMULT+3~, SETMULT+6*, KILLMULT+3~, KILLMULT+7*
    DGN ZIP+23~, MLT+3~, MLT+4*, MLT+8*, MLT+9, MLT+10*, MLT+11
    DGNODE SET~, SET+1, SET+4, KILL~, KILL+1, KILL+4, SETMULT~, SETMULT+2, SETMULT+5, KILLMULT~
    , KILLMULT+2, KILLMULT+5, KILLMULT+6
    DGPIECE SET~, SET+1, SET+4, KILL~, KILL+1, KILL+4, SETMULT~, SETMULT+2, SETMULT+5, KILLMULT~
    , KILLMULT+2, KILLMULT+5, KILLMULT+6
    DGR KEY+10~, KEY+12*, KEY+13
    DGRGFL1 SET+1, SET+2~, SET+3*, KILL+1, KILL+2~, KILL+3*, SETMULT+2, SETMULT+3~, SETMULT+4*, KILLMULT+2
    , KILLMULT+3~, KILLMULT+4*
    DGRGX SET+2~, SET+3*, SET+4, SET+5, KILL+2~, KILL+3*, KILL+5, SETMULT+3~, SETMULT+4*, SETMULT+5
    , SETMULT+6, KILLMULT+3~, KILLMULT+4*, KILLMULT+5*, KILLMULT+7
    DGST MLT+3~, MLT+4*
    DUZ KEY~, KEY+9, KEY+12, ALWEDT~, ALWEDT+6, ALWEDT+13
    EASDATA ZIP+23~, ZIP+27, ALWEDT+4~, ALWEDT+9
    EASDATA("COUNTY" ZIP+37, ALWEDT+15
    EASDATA("ERROR" ALWEDT+10
    EASDATA("FIPS CODE" , ZIP+31, ZIP+34, ZIP+35, ALWEDT+11
    EASDATA("STAT E POINTER" , ZIP+31, ZIP+33, ZIP+35, ZIP+36
    EASDATA("STATE" ZIP+36, ALWEDT+12, ALWEDT+14
    EASDO2 ZIP+24*, KEY+8!
    EASZIPLK ZIP+21!, ZIP+22, ZIP+25!, ZIP+26!, ZIP+40!
    FDA ZIP+23~
    FDA(2 ZIP+36*, ZIP+37*
    MSG ZIP+23~, ZIP+41
    MULTNODE SETMULT~, SETMULT+2, SETMULT+5, KILLMULT~, KILLMULT+2, KILLMULT+5, KILLMULT+6
    MULTNUM SETMULT~, SETMULT+2, SETMULT+6, KILLMULT~, KILLMULT+2, KILLMULT+7
    POP MLT+3~, MLT+5*, MLT+10, MLT+11*, MLT+12
    U SET+4, KILL+4, SETMULT+5, KILLMULT+5, KILLMULT+6
    X SET~, SET+1, SET+3, SET+5*, KILL~, KILL+1, KILL+3, KILL+5*, SETMULT~, SETMULT+2
    , SETMULT+4, SETMULT+6*, KILLMULT~, KILLMULT+2, KILLMULT+4, KILLMULT+7*
    ZIP ZIP~, ZIP+21, ZIP+25, ZIP+27, KEY+10~, KEY+11*, KEY+12, ALWEDT~, ALWEDT+5, ALWEDT+7
    , ALWEDT+9, MLT~, MLT+6
    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 |  Naked Globals |  Local Variables |  All