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 |  Marked Items |  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 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

Caller Graph Total: 20

Package Total Caller Graph
Registration 10 DGPTX110  DGPTX111  DGPTX113  DGREGAZL  DGRPTX11  DGRPTX15  DGRPTX16  DGRPTX5  
DGRPX73  ^DPT  
Integrated Billing 8 DISPOSITION LOG-IN DATE/TIME  IBXSC114  IBXSC115  IBXSC117  IBXSC118  IBXSC19  IBXSC21  IBXSC22  
Scheduling 2 SDM1T  SDM1T1  

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+27, ALWEDT+8
    $$FIND1^DIC ZIP+32
    FILE^DIE ZIP+40
    $$GET1^DIQ KEY+11
    POSTAL^XIPUTIL ZIP+21, ZIP+28, ALWEDT+9, ALWEDT+10
    POSTALB^XIPUTIL MLT+6, MLT+7

    Interaction Calls

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

    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+34, ZIP+36
    ^DPT - [#2] SET+4*, KILL+4*, SETMULT+5*, KILLMULT+5, KILLMULT+6*
    ^XUSEC("EAS GMT COUNTY EDIT" ALWEDT+14

    Label References

    Name Line Occurrences
    $$ALWEDT KEY+12
    $$MLT ZIP+26, 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+24~, ZIP+31*, ZIP+32*, ZIP+33, ZIP+36*, ZIP+37, ZIP+38, ZIP+40
    DA ZIP~, ZIP+22, ZIP+37, ZIP+38
    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+7
    DGDATA( MLT+9, MLT+10, MLT+11, MLT+12
    DGDATA("ERROR" MLT+8
    DGFIPS MLT+3~, MLT+4*, MLT+10*, MLT+12
    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+24~, MLT+3~, MLT+4*, MLT+9*, MLT+10, MLT+11*, MLT+12
    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+14
    EASDATA ZIP+24~, ZIP+28, ALWEDT+4~, ALWEDT+10
    EASDATA("COUNTY" ZIP+38, ALWEDT+16
    EASDATA("ERROR" ALWEDT+11
    EASDATA("FIPS CODE" , ZIP+32, ZIP+35, ZIP+36, ALWEDT+12
    EASDATA("STAT E POINTER" , ZIP+32, ZIP+34, ZIP+36, ZIP+37
    EASDATA("STATE" ZIP+37, ALWEDT+13, ALWEDT+15
    EASDO2 ZIP+25*, KEY+8!
    EASZIPLK ZIP+22!, ZIP+23, ZIP+26!, ZIP+27!, ZIP+41!
    FDA ZIP+24~
    FDA(2 ZIP+37*, ZIP+38*
    MSG ZIP+24~, ZIP+42
    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+11, MLT+12*, MLT+13
    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+22, ZIP+26, ZIP+28, KEY+10~, KEY+11*, KEY+12, ALWEDT~, ALWEDT+5, ALWEDT+7
    , ALWEDT+10, MLT~, MLT+7

    Marked Items

    Name Field # of Occurrence
    $T(POSTALB^XIPUTIL MLT+6
    $T(POSTAL^XIPUTIL ZIP+21, ALWEDT+9
    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 |  Marked Items |  All