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: DGQESC5

Package: Registration

Routine: DGQESC5


Information

DGQESC5 ;ALB/JFP - ID Card - standalone;01/09/96

Source Information

Source file <DGQESC5.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 3 ^DIC  YN^DICN  ^DIE  
Registration 1 $$EVENT^DGQEHL71  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Registration 2 DGQE VIC MANUAL  DGQEMA  

Entry Points

Name Comments DBIA/ICR reference
VIC ; -- Ask if user wants to download demographic data to photo capture
; station. Checks MAS paramter file. Called from DGREG00, DG10,
; and DG1010P.
EN ; -- Main entry point for VIC download
; -- Checks for valid DFN
  • ICR #3413
    • Status: Withdrawn
    • Usage: Supported
    OK ; -- Ask if ok to download data, if data missing
    ERR
    ADD ; -- Strips # characters, updates field
    DOWN ; -- Call routine to download information via HL7 to photo capture stat
    CKADD ; -- Checks address
    EXIT
    FUNC ; -- Convert characters from lower case to uppercase
    ERROR ;Error messages for incomplete data
    END ; -- End of code
    NONVET
    MAN ; -- Entry point for manual card

    External References

    Name Field # of Occurrence
    $$EVENT^DGQEHL71 DOWN+1
    ^DIC MAN+1
    YN^DICN VIC+4, OK+1
    ^DIE EN+7, CKADD+2, CKADD+3, ADD+1

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"Download VIC data"
    • Line Location: VIC+4
    Function Call: WRITE
    • Prompt: !," Enter YES to download patient demographic data to photo capture station"
    • Line Location: VIC+5
    Function Call: WRITE
    • Prompt: !,"Embosser files not correctly set up...contact your site manager"
    • Line Location: CKADD+5
    Function Call: WRITE
    • Prompt: !,"Data not downloaded. Error - ",$P(RESULTS,"^",2)
    • Line Location: DOWN+2
    Function Call: WRITE
    • Prompt: !,"Do you still wish to download data "
    • Line Location: OK+1
    Function Call: WRITE
    • Prompt: !?3,"Enter 'Y'es to download data, otherwise, 'N'o."
    • Line Location: OK+2
    Function Call: WRITE
    • Prompt: !," - ",Y," MISSING"
    • Line Location: ERR+0
    Routine Call
    • DIE
    • Line Location:
      • EN+7
      • CKADD+2
      • CKADD+3
      • ADD+1
    Routine Call
    • DIC
    • Line Location:
      • MAN+1

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DPT - [#2] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD("FUNC" - [#.5] FUNC+1
    ^DD(2 NONVET, NONVET+1
    ^DPT - [#2] EN+2, EN+6, CKADD+1, CKADD+3, ERROR+1, ERROR+2, ERROR+3, ERROR+4, NONVET, NONVET+1
    , NONVET+2

    Label References

    Name Line Occurrences
    ADD CKADD+1
    CKADD CKADD+1
    EN VIC+6, MAN+1
    ERR ERROR+1, ERROR+3, ERROR+4, NONVET, NONVET+1, NONVET+2
    ERROR CKADD+7
    EXIT EN+2, CKADD+8
    FUNC EN+7, CKADD+2, CKADD+3
    NONVET ERROR+2
    OK CKADD+8, OK+2
    VIC VIC+5

    Naked Globals

    Name Field # of Occurrence
    ^( ERROR+1, ERROR+3, ERROR+4

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % VIC+4*, VIC+5, VIC+6, EXIT!, OK+1*, OK+2, OK+3
    DA EN+7*, CKADD+2*, CKADD+3*, EXIT!, ADD+1*
    DFN MAN+1*, MAN+2!, EN+2, EN+6, EN+7, CKADD+1, CKADD+2, CKADD+3, DOWN+1, ADD+1
    , ERROR+1, ERROR+2, ERROR+3, ERROR+4, NONVET, NONVET+1, NONVET+2
    DGE CKADD+8, EXIT!, ERROR+1*, NONVET+2*, ERR*
    DGFL CKADD+8, EXIT!, OK+1*, OK+3*
    DGPT MAN+2!
    DIC MAN+1*, MAN+2!
    DIC(0 MAN+1*
    DIE EN+7*, CKADD+2*, CKADD+3*, EXIT!, ADD+1*
    DR EN+7*, CKADD+2*, CKADD+3*, EXIT!, ADD+1*
    >> DTOUT MAN+1
    I EXIT!, FUNC+1*, ADD+1*, NONVET*, NONVET+1*
    L EN+2*, EXIT!
    RESULTS DOWN+1*, DOWN+2, DOWN+3, EXIT!
    S EXIT!, OK+1~
    X MAN+2!, EN+6*, EN+7, CKADD+1*, CKADD+2, CKADD+3*, EXIT!, ADD+1*, NONVET*, NONVET+1*
    X1 ADD+1*, ADD+2!
    Y MAN+1, MAN+2!, EXIT!, ERROR+1*, ERROR+3*, ERROR+4*, NONVET*, NONVET+1*, NONVET+2*, ERR
    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