Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

Entry Points

Name Comments DBIA/ICR reference
SET(DFN,DGFLD,DGNODE,DGPIECE,X) ; SET NEW FIELD & DO SET X-REFS
KILL(DFN,DGFLD,DGNODE,DGPIECE,X) ; KILL OLD FIELD & DO KILL X-REFS
SETMULT(DFN,DFN1,MULTNUM,MULTNODE,DGFLD,DGNODE,DGPIECE,X) ; SET
; SETSNEW FIELD & DOES SET X-REFS
KILLMULT(DFN,DFN1,MULTNUM,MULTNODE,DGFLD,DGNODE,DGPIECE,X) ; KILL
ZIP(DA,ZIP,CITY) ; update city, state and county based on zip code change
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
    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
    MLT(ZIP) ;Determine if a zip correspond to multiple state and\or county

    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

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DPT - [#2] GET1^DIQ
    5.01 FIND1^DIC
    Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call