Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^DIC(8

Package: Registration

Global: ^DIC(8


Information

FileMan FileNo FileMan Filename Package
8 ELIGIBILITY CODE Registration

Description

Directly Accessed By Routines, Total: 193

Package Total Routines
Registration 80 DG CONSISTENCY CHECKER    DG53114T    DG53121P    DG53177P    DG53285    DG53372A    DG53401P    DG53546P
DG53672E    DG53672R    DG5392PT    DG53P861    DG53P952    DGA4004    DGCOL    DGCOLLATERAL
DGEEREIM    DGEN NEACL    DGENCDRP    DGENCLEA    DGENELA    DGENUPL1    DGENUPL2    DGENUPL4
DGLOCK1    DGLOCK2    DGMTCOR    DGMTCOU1    DGMTDEL    DGMTOFA    DGMTR    DGMTR1
DGMTSC    DGODMT    DGODNP1    DGOVBC    DGPAR    DGPATV    DGPMV10    DGPT10CB
DGPTF1    DGPTFVC1    DGPTOLC2    DGPTUTL    DGREG    DGREGE    DGREGEO    DGRP11
DGRP7    DGRP7CC    DGRPC    DGRPC2    DGRPD    DGRPP    DGRPTX36    DGRPX75
DGRPXC    DGRPXCR    DGRPXR    DGRPXX72    DGRRLU1    DGRRLU2    DGRRLU6    DGRRLUA
DGRRPSEE    DGSEC    DGSEC4    DGUTL3    DGYPSDE3    SYNONYM    VADPT4    VADPT6
VADPT60    VAFCMGB3    ^DIC(8    VADPT61    VAFHLZBT    VAFHLZE1    VAUQWK    ^DGPM
Scheduling 53 CLINIC STOP CODE    PATIENT    SCDXMSG1    SCDXPOV    SCDXPOV1    SCDXPOV2    SCDXPOV3    SCDXUTL0
SCENIA2    SCRPO    SCRPU3    SCRPW24    SCRPW43    SCRPW62    SDAL0    SDAMA305
SDAMBAE2    SDAMEP1    SDAMEP2    SDAPIAE0    SDCLAS    SDCLAS1    SDCO1    SDCO22
SDECELG    SDECEPT    SDECWL    SDES2GETELIGCD    SDES881P    SDESAPTREQ44    SDESCREATEAPPT44    SDF
SDF1    SDM4    SDMEAN    SDOEOE    SDPCE    SDPPADD1    SDPPAPP1    SDPPAT1
SDPPDIS1    SDREV    SDROUT0    SDROUT1    SDROUT2    SDSCAPI    SDSCOMP    SDST
SDWLSC    ^SDAM(44.3    SDXA1    SDXACSE1    TEAM POSITIONS    
Integrated Billing 17 IB20PT86    IBAUTL5    IBCONS1    IBCONS2    IBCOPV    IBCOPV2    IBCSC1    IBJDF42
IBJDI1    IBJDI41    IBJDIPR    IBNCPDPU    IBOEMP1    IBTUBOU    IBXBCR    IBXS11
IBXSC16    
Automated Medical Information Exchange 6 DVBAVDPT    DVBAXA    DVBCUTIL    DVBCXFR2    DVBCXFRB    DVBCXFRC    
Beneficiary Travel 6 DGBT2    DGBTCD    DGBTCDSP    DGBTCR1    DGBTE1    DGBTEE1    
Income Verification Match 5 IVMCUC    IVMPTRN7    IVMUFNC5    IVMZ7CR    IVMZ7CS    
DSS Extracts 3 ECXADM    ECXSCX    ECXSETUP    
Clinical Information Resource Network 2 RGPRSSN    RGRSPARS    
Enrollment Application System 2 EASECU    EASPREC4    
Event Capture 2 ECED3    ECUERPC1    
HINQ 2 DVBHCE19    DVBHCE5    
PCE Patient Care Encounter 2 PXKMASC    VSITASK    
Radiology Nuclear Medicine 2 HL7 FIELD EXCEPTIONS    ^RADPT    
Remote Order Entry System 2 RMPFDD2    RMPFPOSU    
Accounts Receivable 1 RCXVDC2    
Albany OIFO 1 A1CKC    
Automated Information Collection System 1 IBDFBK3    
Clinical Reminders 1 PXRMOBJ    
Graphics 1 GRPX78    
Mental Health 1 YSDGDEM    
Quasar 1 ^ACK(509850.6    
VBECS 1 VBECLU    

Accessed By FileMan Db Calls, Total: 53

Package Total Routines
Registration 31 DG531048P    DG531061P    DG531075P    DG531081P    DG531098P    DG531109P    DG53114T    DG53121P
DG53546P    DG5392PT    DG53P314    DG53P952    DGENUPL4    DGENUPL7    DGENUPL8    DGENUPLA
DGLOCK3    DGOTHD    DGPPAPI    DGROHLR1    DGRP1152U    DGRP11A    DGRP7    DGRPTX35
DGRPTX37    DGRPX75    DGRPX76    DGRPXC    DGRPXR    VADPT60    VADPT61    
Scheduling 8 SDEC55A    SDECEPT    SDES2APPTYPES    SDES2GETELIGCD    SDES2PATSEARCH    SDESPATSEARCH    SDUTL2    SDWLTR
DSS Extracts 2 ECXUTL    ECXUTL3    
HINQ 2 DVBHCE5    DVBHCE6    
Integrated Billing 2 IBTUBO    IBXS11    
Albany OIFO 1 A1CKC    
Automated Medical Information Exchange 1 DVBAXA    
E Claims Management Engine 1 BPSVRX2    
Medicine 1 MCARAM6    
PCE Patient Care Encounter 1 VSITASK    
Quasar 1 ACKQUTL4    
VA Point of Service 1 VPSRPC16    
Womens Health 1 WVGETAL1    

Pointed To By FileMan Files, Total: 14

Package Total FileMan Files
Registration 6 MAS PARAMETERS(#43)[#43.08(.01)]    OTH ELIGIBILITY PATIENT(#33)[#33.02(.02)]    PATIENT MOVEMENT(#405)[.2]    PTF(#45)[20.1]    PERIOD OF SERVICE(#21)[#21.01(.01)]    PATIENT(#2)[.361, #2.0361(.01), #2.101(13)]
Scheduling 4 HOSPITAL LOCATION(#44)[#44.003(30)]    OUTPATIENT ENCOUNTER(#409.68)[.13]    APPOINTMENT TYPE(#409.1)[6]    SCHEDULING VISITS(#409.5)[#409.51(4)]    
Beneficiary Travel 1 BENEFICIARY TRAVEL CLAIM(#392)[3]    
PCE Patient Care Encounter 1 VISIT(#9000010)[.21]    
Quasar 1 A&SP CLINIC VISIT(#509850.6)[80]    
Womens Health 1 WV SITE PARAMETER(#790.02)[#790.13(.01), #790.14(.01)]    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Registration 2 MAS ELIGIBILITY CODE(#8.1)[8]    IDENTIFICATION FORMAT(#8.2)[9]    
Kernel 1 AGENCY(#4.11)[11]    

Fields, Total: 13

Field # Name Loc Type Details
.01 NAME 0;1

  • INPUT TRANSFORM:  K:$L(X)>30!(+X=X)!($L(X)<3)!'(X'?1P.E) X
  • HELP-PROMPT:  NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION
  • DESCRIPTION:  
    This field contains the site specific name for the eligibility. In most cases the name will be the same as the MAS ELIGIBILITY CODE pointed to by the MAS ELIGIBILITY CODE field of this file.
  • CROSS-REFERENCE:  8^B
    1)= S ^DIC(8,"B",$E(X,1,30),DA)=""
    2)= K ^DIC(8,"B",$E(X,1,30),DA)
.12 MAKE RECORD SENSITIVE? 0;12 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  APR 17, 1996
  • HELP-PROMPT:  Enter YES if patients with this eligibility should have their records automatically placed in the DG SECURITY LOG file.
  • DESCRIPTION:  
    Answer YES if patients with this eligibility should have there records automatically added to the DG SECURITY LOG file so that the patient's record will be listed as sensitive.
1 CARD COLOR 0;2 SET
************************REQUIRED FIELD************************
  • 'P' FOR PURPLE;
  • 'B' FOR BLUE;
  • 'R' FOR RED;

  • DESCRIPTION:  This field indicates the color of the patient's card for the MAS eligibility.
    This field is automatically updated with the value of the 'CARD COLOR' of the MAS ELIGIBILITY CODE(#8.1) entry pointed to by field #8, MAS ELIGIBILITY CODE.
    This field is uneditable.
    WRITE AUTHORITY: ^
  • NOTES:  TRIGGERED by the MAS ELIGIBILITY CODE field of the ELIGIBILITY CODE File
2 ABBREVIATION 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>4!($L(X)<1) X
  • HELP-PROMPT:  ANSWER MUST BE 1-4 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field may contain an abbreviation for the eligibility name. It may be used in place of the name in selected prints.
3 VA CODE NUMBER 0;4 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1.N) X
  • LAST EDITED:  MAR 15, 2019
  • HELP-PROMPT:  Type a number between 1 and 99, 0 decimal digits.
  • DESCRIPTION:  This field contains the VA CODE NUMBER that has been assigned to this eligibility.
    This field is automatically updated with the value of the 'VA CODE NUMBER' of the MAS ELIGIBILITY CODE(#8.1) entry pointed to by field #8, MAS ELIGIBILITY CODE.
    This field is uneditable.
    WRITE AUTHORITY: ^
    UNEDITABLE
  • NOTES:  TRIGGERED by the MAS ELIGIBILITY CODE field of the ELIGIBILITY CODE File
  • CROSS-REFERENCE:  8^C
    1)= S ^DIC(8,"C",$E(X,1,30),DA)=""
    2)= K ^DIC(8,"C",$E(X,1,30),DA)
    This index allows lookup and reporting based on the VA CODE NUMBER
4 TYPE 0;5 SET
************************REQUIRED FIELD************************
  • 'N' FOR NON-VETERAN;
  • 'Y' FOR VETERAN;

  • LAST EDITED:  SEP 12, 1984
  • DESCRIPTION:  This field indicates the type of patient that can be assigned this eligibility. The patient is either a 'veteran' or a 'non-veteran' type.
    This field is automatically updated with the value of the 'TYPE' of the MAS ELIGIBILITY CODE(#8.1) entry pointed to by field #8, MAS ELIGIBILITY CODE.
    This field is uneditable.
    WRITE AUTHORITY: ^
  • NOTES:  TRIGGERED by the MAS ELIGIBILITY CODE field of the ELIGIBILITY CODE File
5 PRINT NAME 0;6 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<1) X
  • LAST EDITED:  OCT 02, 1986
  • HELP-PROMPT:  Enter abbreviated Eligibility Code name for ouput in limited space.
  • DESCRIPTION:  
    This field contains a shorten eligibility name that is used for output that has limited space to print.
    UNEDITABLE
6 INACTIVE 0;7 SET
  • '1' FOR YES;

  • LAST EDITED:  NOV 21, 1986
  • DESCRIPTION:  
    If the eligibility is inactive then this field will be set to 'YES'.
7 SELECT AS ADDITIONAL 0;8 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  JUL 12, 2021
  • DESCRIPTION:  This field indicates whether patients may be assigned this eligibility as an 'additional' eligibility.
    If the field is set to 'NO' or is not filled in, then the eligibility can only be assigned as a primary eligibility.
    If set to 'YES', then the eligibility can be used as both a primary and an 'additional' eligibility.
    This field is automatically updated with the value of the 'SELECT AS ADDITIONAL' of the MAS ELIGIBILITY CODE(FILE #8.1) entry pointed to by field #8, MAS ELIGIBILITY CODE.
    This field is uneditable.
    WRITE AUTHORITY: ^
  • NOTES:  TRIGGERED by the MAS ELIGIBILITY CODE field of the ELIGIBILITY CODE File
8 MAS ELIGIBILITY CODE 0;9 POINTER TO MAS ELIGIBILITY CODE FILE (#8.1)
************************REQUIRED FIELD************************
MAS ELIGIBILITY CODE(#8.1)

  • INPUT TRANSFORM:  S DIC("S")="I '$P(^(0),U,7)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUL 30, 2021
  • DESCRIPTION:  This field is required. All entries in this file must be associated with an entry in the MAS ELIGIBILITY CODE file in order to be valid.
    This relationship with the MAS ELIGIBILITY CODE is used throughout the MAS software for statistics and reporting purposes. It is very important.
    When this field is entered or edited, then the fields CARD COLOR(#1), VA CODE NUMBER(#3), TYPE(#4), and SELECT AS ADDITIONAL(#7) are automatically updated. They are updated with the values of same fields entered for the
    MAS ELIGIBILITY CODE entry that was selected.
  • SCREEN:  S DIC("S")="I '$P(^(0),U,7)"
  • EXPLANATION:  Allows only 'active' MAS eligibility codes.
  • CROSS-REFERENCE:  8^D
    1)= S ^DIC(8,"D",$E(X,1,30),DA)=""
    2)= K ^DIC(8,"D",$E(X,1,30),DA)
  • CROSS-REFERENCE:  ^^TRIGGER^8^1
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DIC(8,D0,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S DIU=X K Y S X=DIV S X=$P(^DIC(8.1,X,0),U,2) S DIH=$G(^DIC(8,DIV(0),0)),DIV=X S $P(^(0),U,2)=DIV,DIH=8,DIG=1 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DIC(8,D0,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S DIU=X K Y S X="" S DIH=$G(^DIC(8,DIV(0),0)),DIV=X S $P(^(0),U,2)=DIV,DIH=8,DIG=1 D ^DICR
    CREATE VALUE)= S X=$P(^DIC(8.1,X,0),U,2)
    DELETE VALUE)= @
    FIELD)= CARD COLOR
  • CROSS-REFERENCE:  ^^TRIGGER^8^3
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DIC(8,D0,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV S X=$P(^DIC(8.1,X,0),U,4) S DIH=$G(^DIC(8,DIV(0),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=8,DIG=3 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DIC(8,D0,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X="" S DIH=$G(^DIC(8,DIV(0),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=8,DIG=3 D ^DICR
    CREATE VALUE)= S X=$P(^DIC(8.1,X,0),U,4)
    DELETE VALUE)= @
    FIELD)= VA CODE NUMBER
  • CROSS-REFERENCE:  ^^TRIGGER^8^4
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DIC(8,D0,0)):^(0),1:"") S X=$P(Y(1),U,5),X=X S DIU=X K Y S X=DIV S X=$P(^DIC(8.1,X,0),U,5) S DIH=$G(^DIC(8,DIV(0),0)),DIV=X S $P(^(0),U,5)=DIV,DIH=8,DIG=4 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DIC(8,D0,0)):^(0),1:"") S X=$P(Y(1),U,5),X=X S DIU=X K Y S X="" S DIH=$G(^DIC(8,DIV(0),0)),DIV=X S $P(^(0),U,5)=DIV,DIH=8,DIG=4 D ^DICR
    CREATE VALUE)= S X=$P(^DIC(8.1,X,0),U,5)
    DELETE VALUE)= @
    FIELD)= TYPE
  • CROSS-REFERENCE:  ^^TRIGGER^8^7
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DIC(8,D0,0)):^(0),1:"") S X=$P(Y(1),U,8),X=X S DIU=X K Y S X=DIV S X=$P(^DIC(8.1,X,0),U,8) S DIH=$G(^DIC(8,DIV(0),0)),DIV=X S $P(^(0),U,8)=DIV,DIH=8,DIG=7 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DIC(8,D0,0)):^(0),1:"") S X=$P(Y(1),U,8),X=X S DIU=X K Y S X="" S DIH=$G(^DIC(8,DIV(0),0)),DIV=X S $P(^(0),U,8)=DIV,DIH=8,DIG=7 D ^DICR
    CREATE VALUE)= S X=$P(^DIC(8.1,X,0),U,8)
    DELETE VALUE)= @
    FIELD)= SELECT AS ADDITIONAL
9 ID FORMAT 0;10 POINTER TO IDENTIFICATION FORMAT FILE (#8.2)
************************REQUIRED FIELD************************
IDENTIFICATION FORMAT(#8.2)

  • LAST EDITED:  NOV 25, 2012
  • HELP-PROMPT:  Select the ID format to be used.
  • DESCRIPTION:  This field indicates which identification format is to be used when setting a patient's ID who has been assigned this eligibility.
    Most eligibilities should be associated with 'VA STANDARD' format. This format is the patient's Social Security Number.
    If your site has a DOD/VA sharing agreement AND are running the VA/DOD software developed by the Dallas ISC, then you may have to associate some DOD specific eligibilities with a format other than 'VA STANDARD'.
  • CROSS-REFERENCE:  8^AF
    1)= S ^DIC(8,"AF",$E(X,1,30),DA)=""
    2)= K ^DIC(8,"AF",$E(X,1,30),DA)
10 SYNONYM S;0 Multiple #8.01 8.01

  • DESCRIPTION:  
    This multiple contains all of the alternative names by which a user may call up this eligibility code. This can be modified at the site level.
11 AGENCY 0;11 POINTER TO AGENCY FILE (#4.11) AGENCY(#4.11)

  • LAST EDITED:  JAN 04, 1990
  • DESCRIPTION:  
    This field contains the AGENCY that is associated with this eligibility. Normally, the agency is the VA.

Found Entries, Total: 30

NAME: SERVICE CONNECTED 50% to 100%    NAME: AID & ATTENDANCE    NAME: SC LESS THAN 50%    NAME: NSC, VA PENSION    NAME: NSC    NAME: OTHER FEDERAL AGENCY    NAME: ALLIED VETERAN    NAME: HUMANITARIAN EMERGENCY    
NAME: SHARING AGREEMENT    NAME: REIMBURSABLE INSURANCE    NAME: DOM. PATIENT    NAME: CHAMPVA    NAME: COLLATERAL OF VET.    NAME: EMPLOYEE    NAME: HOUSEBOUND    NAME: MEXICAN BORDER WAR    
NAME: WORLD WAR I    NAME: PRISONER OF WAR    NAME: SITE SPECIFIC CODE #1    NAME: TRICARE    NAME: CATASTROPHICALLY DISABLED    NAME: PURPLE HEART RECIPIENT    NAME: EXPANDED MH CARE NON-ENROLLEE    NAME: COMPACT ACT ELIGIBLE    
NAME: SPECIAL TX AUTHORITY CARE    NAME: HUD-VASH    NAME: CLINICAL EVALUATION    NAME: PRESUMPTIVE PSYCHOSIS ELIGIBLE    NAME: WORLD WAR II    NAME: SERVICE ACT    

ICR, Total: 6

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #427
  • Integrated Billing
  • DSS - DECISION SUPPORT SYSTEM EXTRACTS
  • Clinical Information Resource Network
  • Pharmacy Benefits Management
  • Beneficiary Travel
  • Scheduling
  • Accounts Receivable
  • Event Capture
    		•  NAME (.01).
    Access: Direct Global Read & w/Fileman

    VA CODE NUMBER (3).
    Access: Direct Global Read & w/Fileman

    PRINT NAME (5).
    Access: Direct Global Read & w/Fileman

    MAS ELIGIBILITY CODE (8).
    Access: Direct Global Read & w/Fileman

    INACTIVE (6).
    Access: Direct Global Read & w/Fileman

    TYPE (4).
    Access: Direct Global Read & w/Fileman
    ICR #480
  • VISIT TRACKING
    		•  NAME (.01).
    Access: Pointed to

    NAME (.01).
    Access: Direct Global Read & w/Fileman
    ICR #548
  • Mental Health
  • Quasar
  • Automated Information Collection System
  • Womens Health
  • Clinical Reminders
    		•
    ICR #602
  • Remote Order Entry System
  • Outpatient Pharmacy
  • PCE Patient Care Encounter
    		•
    ICR #731
  • Automated Medical Information Exchange
  • Scheduling
    		•
    ICR #7050
  • Scheduling
    		•  NAME (.01).
    Access: Read w/Fileman

    TYPE (4).
    Access: Read w/Fileman

    MAS ELIGIBILITY CODE (8).
    Access: Read w/Fileman

    External References

    Name Field # of Occurrence
    ^DIC 8+1
    ^DICR 8(XREF 2S), 8(XREF 2K), 8(XREF 3S), 8(XREF 3K), 8(XREF 4S), 8(XREF 4K), 8(XREF 5S), 8(XREF 5K)

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DIC(8 - [#8] .01(XREF 1S), .01(XREF 1K), 3(XREF 1S), 3(XREF 1K), 8(XREF 1S), 8(XREF 1K), 8(XREF 2S), 8(XREF 2K), 8(XREF 3S), 8(XREF 3K)
    , 8(XREF 4S), 8(XREF 4K), 8(XREF 5S), 8(XREF 5K), 9(XREF 1S), 9(XREF 1K)
    ^DIC(8.1 - [#8.1] 8(XREF 2S), 8(XREF 3S), 8(XREF 4S), 8(XREF 5S)

    Naked Globals

    Name Field # of Occurrence
    ^("0" ID3+1
    ^(0 IDWRITE+1, 8(XREF 2S), 8(XREF 2K), 8(XREF 3S), 8(XREF 3K), 8(XREF 4S), 8(XREF 4K), 8(XREF 5S), 8(XREF 5K)

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> D0 8(XREF 2S), 8(XREF 2K), 8(XREF 3S), 8(XREF 3K), 8(XREF 4S), 8(XREF 4K), 8(XREF 5S), 8(XREF 5K)
    >> DA .01(XREF 1S), .01(XREF 1K), 3(XREF 1S), 3(XREF 1K), 8(XREF 1S), 8(XREF 1K), 8(XREF 2S), 8(XREF 2K), 8(XREF 3S), 8(XREF 3K)
    , 8(XREF 4S), 8(XREF 4K), 8(XREF 5S), 8(XREF 5K), 9(XREF 1S), 9(XREF 1K)
    DIC IDWRITE+1, 8+1!*
    DIC("S" 8+1*, 8SCR+1*
    >> DIE 8+1
    >> DIG 8(XREF 2S), 8(XREF 2K), 8(XREF 3S), 8(XREF 3K), 8(XREF 4S), 8(XREF 4K), 8(XREF 5S), 8(XREF 5K)
    >> DIH 8(XREF 2S), 8(XREF 2K), 8(XREF 3S), 8(XREF 3K), 8(XREF 4S), 8(XREF 4K), 8(XREF 5S), 8(XREF 5K)
    >> DIU 8(XREF 2S), 8(XREF 2K), 8(XREF 3S), 8(XREF 3K), 8(XREF 4S), 8(XREF 4K), 8(XREF 5S), 8(XREF 5K)
    DIV 8(XREF 2S), 8(XREF 2K), 8(XREF 3S), 8(XREF 3K), 8(XREF 4S), 8(XREF 4K), 8(XREF 5S), 8(XREF 5K)
    DIV(0 8(XREF 2S), 8(XREF 2K), 8(XREF 3S), 8(XREF 3K), 8(XREF 4S), 8(XREF 4K), 8(XREF 5S), 8(XREF 5K)
    U ID3+1, IDWRITE+1, 8(XREF 2S), 8(XREF 2K), 8(XREF 3S), 8(XREF 3K), 8(XREF 4S), 8(XREF 4K), 8(XREF 5S), 8(XREF 5K)
    X .01+1!, .01(XREF 1S), .01(XREF 1K), 2+1!, 3+1!, 3(XREF 1S), 3(XREF 1K), 5+1!, 8+1*!, 8(XREF 1S)
    , 8(XREF 1K), 8(XREF 2S), 8(XREF 2K), 8(XREF 3S), 8(XREF 3K), 8(XREF 4S), 8(XREF 4K), 8(XREF 5S), 8(XREF 5K), 9(XREF 1S)
    , 9(XREF 1K)
    Y 8+1, 8(XREF 2S), 8(XREF 2K), 8(XREF 3S), 8(XREF 3K), 8(XREF 4S), 8(XREF 4K), 8(XREF 5S), 8(XREF 5K)
    Y(1 8(XREF 2S), 8(XREF 2K), 8(XREF 3S), 8(XREF 3K), 8(XREF 4S), 8(XREF 4K), 8(XREF 5S), 8(XREF 5K)
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All