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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: VAFHLPID

Package: Registration

Routine: VAFHLPID


Information

VAFHLPID ;ALB/MLI/ESD - Create generic PID segment ; 21 Nov 2002 3:13 PM

Source Information

Source file <VAFHLPID.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Registration 4 (4,KVA)^VADPT  ($$SEQ3,SEQ10,SEQ22)^VAFHLPI1  SEQ11^VAFHLPI2  MAKEIT^VAFHLU  
Health Level Seven 1 ($$HLDATE,$$HLPHONE,$$M10)^HLFNC  
Kernel 1 $$HLNAME^XLFNAME  

Caller Graph

Caller Graph Total: 32

Package Total Caller Graph
Registration 8 DGMSTHL7  DGPFHLU  VAFHADT2  VAFHCA08  VAFHCOPT  VAFHLA04  VAFHLA34  VAFHQRY  
Automated Lab Instruments 4 LA7DVC  LA7DVM  LA7VORR1  LA7VPID  
Integrated Billing 3 IBCNEHLQ  IBTRH8  IBTRHLO  
Controlled Substances 2 PSDADT  PSDADT1  
Income Verification Match 2 IVMLINS2  IVMPTRN5  
Mental Health 2 YSGAFHL7  YTQHL7  
Radiology Nuclear Medicine 2 RAHLR  RAHLRPTT  
Surgery 2 SRHLUO  SRHLVUO  
Barcode Medication Administration 1 ALPBINP  
Clinical Case Registries 1 RORHL01  
Clinical Procedures 1 MDCPID  
Imaging 1 MAGDHLS  
Lab Service 1 LREPI3  
Outpatient Pharmacy 1 PSOHLSG1  
Scheduling 1 SDRPA07  

Entry Points

Name Comments DBIA/ICR reference
EN(DFN,VAFSTR,VAFNUM,PTID) ; returns PID segment
; Input - DFN as internal entry number of the PATIENT file
; VAFSTR as string of fields requested separated by commas
; VAFNUM as sequential number for SET ID (default=1)
; PTID is flag denoting which Patient ID (seq 3) to use
; 0 - Use DFN formatted as data type CK (default)
; 1 - Use ICN
; 2 - Use DFN formatted as data type CX
; 3 - Use SSN (with dashes)
  • ICR #263
    • Status: Active
    • Usage: Supported
    QUIT

    External References

    Name Field # of Occurrence
    $$HLDATE^HLFNC EN+49
    $$HLPHONE^HLFNC EN+68, EN+70
    $$M10^HLFNC EN+32, EN+35
    4^VADPT EN+26
    KVA^VADPT QUIT
    $$SEQ3^VAFHLPI1 EN+38
    SEQ10^VAFHLPI1 EN+57
    SEQ22^VAFHLPI1 EN+82
    SEQ11^VAFHLPI2 EN+63
    MAKEIT^VAFHLU QUIT+1
    $$HLNAME^XLFNAME EN+43, EN+47

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DIC(11 - [#11] EN+72
    ^DIC(13 - [#13] EN+74
    ^DIC(5 - [#5] EN+65
    ^DPT - [#2] EN+66

    Label References

    Name Line Occurrences
    QUIT EN+24

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DFN EN~, EN+23*, EN+24, EN+35, EN+38, EN+42, EN+46, EN+66
    DGMMN EN+21~, EN+47
    DGMMN("FIELD" EN+46*
    DGMMN("FILE" EN+46*
    DGMMN("IENS" EN+46*
    DGNAME EN+21~, EN+43
    DGNAME("FIELD" EN+42*
    DGNAME("FILE" EN+42*
    DGNAME("IENS" EN+42*
    >> HLECH EN+38, EN+43, EN+47
    >> HLQ EN+32, EN+38, EN+40, EN+43, EN+47, EN+57, EN+63, EN+65, EN+68, EN+70
    , EN+72, EN+76, EN+82
    HOW EN+54~, EN+56*, EN+57, EN+60~, EN+62*, EN+63, EN+79~, EN+81*, EN+82
    I EN+21~
    OUTPUT EN+21~, QUIT+1, QUIT+2
    PTID EN~, EN+34*, EN+35, EN+36, EN+37
    VA EN+21~
    VA("BID" EN+40
    VA("PID" EN+32
    VADM EN+21~
    VADM(10 EN+72
    VADM(2 EN+76
    VADM(3 EN+49
    VADM(5 EN+51
    VADM(9 EN+74
    VAFNUM EN~, EN+30
    >> VAFPID QUIT+1
    VAFSTR EN~, EN+22*, EN+27*, EN+30, EN+32, EN+40, EN+45, EN+49, EN+51, EN+53
    , EN+55, EN+56, EN+59, EN+61, EN+62, EN+65, EN+68, EN+70, EN+72, EN+74
    , EN+76, EN+78, EN+80, EN+81
    VAFY EN+21~, EN+28!, QUIT+1
    VAFY(1 EN+30*
    VAFY(12 EN+65*
    VAFY(13 EN+68*
    VAFY(14 EN+70*
    VAFY(16 EN+72*
    VAFY(17 EN+74*
    VAFY(19 EN+76*
    VAFY(2 EN+32*
    VAFY(3 EN+35*, EN+38*
    VAFY(4 EN+40*
    VAFY(5 EN+43*
    VAFY(6 EN+47*
    VAFY(7 EN+49*
    VAFY(8 EN+51*
    VAPA EN+21~
    VAPA("P" EN+26*
    VAPA(5 EN+65
    VAPA(7 EN+65
    X EN+21~, EN+32*, EN+37*, EN+38, EN+40*, EN+43*, EN+47*, EN+51*, EN+66*, EN+68
    , EN+70, EN+72*, EN+74*, EN+76*
    X1 EN+21~, EN+65*, EN+68*, EN+70*
    Y EN+21~, EN+55*, EN+56, EN+61*, EN+62, EN+80*, EN+81
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All