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

Package: Kernel

Routine: XIPUTIL


Information

XIPUTIL ;ALB/BRM,OIFO/SO - POSTAL AND COUNTY CODE APIS ;2:16 PM 10 Jul 2003

Source Information

Source file <XIPUTIL.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 ($$FIND1,LIST)^DIC  ($$GET1,GETS)^DIQ  
Kernel 1 PBC^XIPUTIL1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 27

Package Total Caller Graph
Outpatient Pharmacy 10 PSO7P529  PSO7P684  PSODEAED  PSODEAMA  PSODEAME  PSODEAU1  PSODEAUT  PSOEPU1  
PSOEPUT  PSOERXA2  
Registration 5 DGREGAZL  DGREGDD1  DGREGTZL  DPTLK7  VAFCPTAD  
Kernel 4 XU8P328D  XUEPCSU1  XUEPCSUT  XUESSO4  
Oncology 2 ONCPCDX  ^ONCO(165.5  
Asists 1 OOPSGUI8  
Automated Medical Information Exchange 1 DVBABADR  
Enrollment Application System 1 EASAILK  
Income Verification Match 1 IVMPRECA  
Scheduling 1 SDECDEM  
VA Point of Service 1 VPSRPC21  

Entry Points

Name Comments DBIA/ICR reference
POSTAL(PCODE,XIP) ; return all data for the Prefered City for a postal code
  • ICR #3618
    • Status: Active
    • Usage: Supported
    INITXIP(ARRY) ;initialize the county code array
    FIPS(PCODE) ;API to return the FIPS code associated with the postal code
  • ICR #3618
    • Status: Active
    • Usage: Supported
    CCODE(FIPS,XIPC) ; return all data related to a FIPS county code
  • ICR #3618
    • Status: Active
    • Usage: Supported
    FIPSCHK(FIPS) ; does this FIPS code exist?
  • ICR #3618
    • Status: Active
    • Usage: Supported
    POSTALB(PCODE,XIP) ; return all data related to a postal code
  • ICR #3618
    • Status: Active
    • Usage: Supported

    External References

    Name Field # of Occurrence
    $$FIND1^DIC CCODE+28
    LIST^DIC POSTAL+34, FIPS+17
    $$GET1^DIQ FIPS+25
    GETS^DIQ CCODE+35
    PBC^XIPUTIL1 POSTALB+28

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DIC(5 - [#5] POSTAL+50
    ^XIP(5.12 - [#5.12] POSTAL+41, FIPS+23
    ^XIP(5.13 - [#5.13] POSTAL+51, POSTAL+52, CCODE+30, FIPSCHK+3

    Label References

    Name Line Occurrences
    INITXIP POSTAL+22, CCODE+19

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    ARRY INITXIP~
    ARRY( INITXIP+1*
    D POSTAL+20~, POSTALB+23~
    D512 POSTAL+31~
    D512("DILIST" POSTAL+37, POSTAL+38
    DA POSTAL+20~, POSTALB+23~
    DIC POSTAL+20~, POSTALB+23~
    DIERR POSTAL+31~, POSTAL+35, FIPS+15~, FIPS+18, CCODE+27~, CCODE+34~
    DIQ POSTAL+20~, POSTALB+23~
    ERR512 POSTAL+20~, POSTALB+23~
    ERR513 CCODE+17~, CCODE+36
    FIELDS POSTAL+31~, POSTAL+32*, POSTAL+34, FIPS+15~, FIPS+16*, FIPS+17
    FIPS FIPS+11~, FIPS+25*, FIPS+26, CCODE~, CCODE+15, CCODE+21, CCODE+23, CCODE+28, CCODE+30, FIPSCHK~
    , FIPSCHK+1, FIPSCHK+2, FIPSCHK+3
    I POSTAL+31~, POSTAL+36*, POSTAL+37*, POSTAL+38, FIPS+15~, FIPS+19*, FIPS+20*, FIPS+21
    IEN512 FIPS+11~, FIPS+13*, FIPS+21*, FIPS+22, FIPS+23
    IEN513 FIPS+11~, FIPS+23*, FIPS+24, FIPS+25
    IENS POSTAL+20~, CCODE+17~, POSTALB+23~
    LPCODE POSTAL+20~, POSTAL+28*, POSTAL+34, POSTALB+23~, POSTALB+27*
    PCODE POSTAL~, POSTAL+19, POSTAL+27, POSTAL+28, FIPS~, FIPS+8, FIPS+9, FIPS+12*, FIPS+17, POSTALB~
    , POSTALB+22, POSTALB+25, POSTALB+27
    S512 POSTAL+31~, POSTAL+33*, POSTAL+34
    X POSTAL+20~, POSTAL+24*, POSTAL+40~, POSTAL+41*, POSTAL+42, POSTAL+43, POSTAL+44, POSTAL+45, POSTAL+46, POSTAL+47
    , POSTAL+48, POSTAL+49, INITXIP+1*, CCODE+17~, POSTALB+23~
    XIP POSTAL~, POSTAL+22, POSTALB~, POSTALB+21*
    XIP( POSTAL+24*
    XIP("CITY ABB REVIATION" , POSTAL+48*
    XIP("CITY KEY " , POSTAL+46*
    XIP("CITY" POSTAL+42*
    XIP("COUNTY P OINTER" , POSTAL+43*, POSTAL+51, POSTAL+52
    XIP("COUNTY" POSTAL+51*
    XIP("ERROR" POSTAL+19*, POSTAL+27*, POSTAL+39*, POSTALB+22*, POSTALB+25*
    XIP("FIPS COD E" , POSTAL+52*
    XIP("INACTIVE DATE" , POSTAL+25!, POSTAL+45*
    XIP("POSTAL C ODE" , POSTAL+28*
    XIP("PREFERRE D CITY KEY" , POSTAL+47*
    XIP("STATE PO INTER" , POSTAL+44*, POSTAL+50
    XIP("STATE" POSTAL+50*
    XIP("UNIQUE K EY" , POSTAL+49*
    XIP512 POSTAL+20~, POSTAL+29*, POSTAL+38*, POSTAL+39, POSTAL+41, POSTALB+23~
    XIP513 CCODE+17~, CCODE+25*, CCODE+28*, CCODE+29, CCODE+30*, CCODE+31, CCODE+35, CCODE+38*, CCODE+39, CCODE+40
    , CCODE+41, CCODE+42, CCODE+43, CCODE+44
    XIPC CCODE~, CCODE+19
    XIPC("COUNTY" CCODE+39*
    XIPC("ERROR" CCODE+15*, CCODE+23*, CCODE+31*, CCODE+32*, CCODE+36*
    XIPC("FIPS CO DE" , CCODE+21*
    XIPC("INACTIV E DATE" , CCODE+42*
    XIPC("LATITUDE" CCODE+20*, CCODE+43*
    XIPC("LONGITUDE" CCODE+20*, CCODE+44*
    XIPC("STATE P OINTER" , CCODE+41*
    XIPC("STATE" CCODE+40*
    XIPCTMP CCODE+17~
    XIPCTMP( CCODE+39, CCODE+40, CCODE+41, CCODE+42, CCODE+43, CCODE+44
    XIPERR POSTAL+20~, POSTAL+31~, FIPS+15~, CCODE+27~, POSTALB+23~
    XIPTMP POSTAL+20~, FIPS+15~, POSTALB+23~
    XIPTMP("DILIST" FIPS+20, FIPS+21
    Y POSTAL+20~, POSTALB+23~
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All