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(21

Package: Registration

Global: ^DIC(21


Information

FileMan FileNo FileMan Filename Package
21 PERIOD OF SERVICE Registration

Description

Directly Accessed By Routines, Total: 51

Package Total Routines
Registration 28 DG531044P    DG53114T    DG53367A    DG53654P    DGCOL    DGDEATH    DGENELA1    DGENUPL1
DGENUPL3    DGENUPL4    DGLOCK1    DGPMBSR2    DGPMV    DGPMVODS    DGPTF4    DGPTR0
DGPTRI0    DGRP7    DGRPC    DGRPC1    DGRPC2    DGRPD    DGRRPSEE    DGYZODS
SYNONYM    VADPT4    VAFHLZSP    ^DIC(21    
Scheduling 6 SCDXUTL0    SCMSVUT1    SCMSVUT3    SDAMEP2    SDCO22    SDPPAT2    
Automated Medical Information Exchange 4 DVBCUTIL    DVBCXFR2    DVBCXFRB    DVBCXFRC    
Lab Service 4 LREPI3    LREPIRP2    LREPIRS1    LREPIRS3    
DSS Extracts 2 ECXSETUP    ECXUTL3    
Fee Basis 2 FBAA79    FBAAV4    
ODS 2 A1B2ADM    A1B2SUP    
Beneficiary Travel 1 DGBTCR1    
Clinical Information Resource Network 1 RGRSPARS    
Income Verification Match 1 IVMZ7CR    

Accessed By FileMan Db Calls, Total: 14

Package Total Routines
Registration 9 DG531048P    DG531118P    DG53111P    DG53132P    DG53P314    DG53P524    DG53P952    DGPTRNU
DGYQPOST    
ODS 2 A1B2PST    A1B2SUP    
Scheduling 2 SDECEPT    SDWLTR    
Visual Impairment Service Team 1 ANRVRP6    

Pointed To By FileMan Files, Total: 3

Package Total FileMan Files
Registration 2 POW PERIOD(#22)[101]    PATIENT(#2)[.323]    
Clinical Case Registries 1 ROR PATIENT(#798.4)[.323]    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Registration 1 ELIGIBILITY CODE(#8)[#21.01(.01)]    

Fields, Total: 12

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<4) X
  • LAST EDITED:  MAR 26, 1984
  • HELP-PROMPT:  ANSWER MUST BE 4-25 CHARACTERS IN LENGTH
  • DESCRIPTION:  This field contains the name of a period of service as determined by MAS VACO for use in DHCP. This name should not be altered in any way nor should entries be added to or removed from this file. This data is maintained
    by the MAS package and all updates to it will be made by that package during a release.
  • CROSS-REFERENCE:  21^B
    1)= S ^DIC(21,"B",$E(X,1,30),DA)=""
    2)= K ^DIC(21,"B",$E(X,1,30),DA)
.02 ABBREVIATION 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!(X'?.ANP)!(X<0) X I $D(X) K:$L(X)>9!($L(X)<2) X
  • HELP-PROMPT:  MAXIMUM LENGTH: 9, MINIMUM LENGTH: 2
  • DESCRIPTION:  
    This field contains an abbreviation for this period of service. Outputs and displays may alternately display the abbreviation if insufficient room exists for the full name of the period of service.
  • CROSS-REFERENCE:  21^C
    1)= S ^DIC(21,"C",X,DA)=""
    2)= K ^DIC(21,"C",X,DA)
.03 CODE 0;3 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1) X
  • LAST EDITED:  OCT 14, 1982
  • HELP-PROMPT:  ANSWER MUST BE 1 CHARACTER IN LENGTH
  • DESCRIPTION:  This field contains the single character code by which this period of service is known. This character is supplied by MAS VACO and MUST NOT BE ALTERED. This code is transmitted to Austin with PTF, OPC, and many other
    DHCP packages and modules. Editing of this code will have severe negative implications on the integrity of the data you are transmitting and it could cause rejected records and loss of reimbursement for your site.
  • CROSS-REFERENCE:  21^D
    1)= S ^DIC(21,"D",$E(X,1,30),DA)=""
    2)= K ^DIC(21,"D",$E(X,1,30),DA)
.04 BEGIN DATE 0;4 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • DESCRIPTION:  
    This field contains the beginning date of this period of service whether it be a war, conflict, police action, or period of peace. This data is determined by MAS VACO and must not be altered in any way.
.05 END DATE 0;5 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • DESCRIPTION:  
    This field contains the ending date of this period of service whether it be a war, conflict, police action, or period of peace. This data is determined by MAS VACO and must not be altered in any way.
.06 WAR/PEACE 0;6 SET
  • 'W' FOR WAR;
  • 'P' FOR PEACE;

  • DESCRIPTION:  
    This field contains a set of codes to determine whether this period of service was a wartime period or a period of peace. This information is determined by VACO and must not be altered in any way.
.07 LATEST DOB 0;7 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 26, 1984
  • HELP-PROMPT:  Enter the latest year in which a person could be born and still serve in this period.
  • DESCRIPTION:  This field contains the latest date of birth which a patient may have had in order to participate in this period of service. For example, If this field contained 1975, only persons born in 1975 or earlier would have been
    old enough to serve during this period of service.
.08 INACTIVE 0;8 SET
  • '1' FOR YES;

  • LAST EDITED:  NOV 25, 1986
  • DESCRIPTION:  If this period of service has been inactivated and should no longer be selectable, this field should contain YES. Periods of service are maintained by VACO and the MAS software module. Therefore, this information should
    not be altered by the site. Should it be necessary to inactivate a period of service, this will occur through the release of the MAS module via a regular software release.
.09 PTF CODE 0;9 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1)!'(X?1AN) X
  • LAST EDITED:  NOV 30, 1986
  • HELP-PROMPT:  ANSWER MUST BE 1 CHARACTER IN LENGTH
  • DESCRIPTION:  This field contains the code for this period of service which is transmitted as part of the PTF portion of the MAS module. This field is determined by MAS VACO and is maintained by the MAS software module. Editing of
    this information can have severe negative impacts on the operation of the MAS software and may cause records to be rejected in Austin.
10 ELIGIBILITY E;0 POINTER Multiple #21.01 21.01

  • DESCRIPTION:  
    This multiple contains all eligibilities a person with this period of service may have.
15 SYNONYM S;0 Multiple #21.02 21.02

  • DESCRIPTION:  This multiple contains all alternate names by which this period of service can be selected. Entry of either the period of service name or one of the synonyms contained in this multiple will cause this period of service to
    be selected.
20 BRIEF DESCRIPTION 0;20 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>26!($L(X)<3) X
  • LAST EDITED:  AUG 04, 1987
  • HELP-PROMPT:  ANSWER MUST BE 3-26 CHARACTERS IN LENGTH
  • DESCRIPTION:  This field contains a brief description of this period of service. It may contain the date range for the conflict or a brief explanation of the period of service. If the user enters two question marks at a PERIOD OF
    SERVICE prompt, this description will appear in addition to the period of service name and code.

Found Entries, Total: 36

NAME: KOREAN    NAME: WORLD WAR I    NAME: WORLD WAR II    NAME: SPANISH AMERICAN    NAME: PRE-KOREAN    NAME: POST-KOREAN    NAME: VIETNAM ERA    NAME: POST-VIETNAM    
NAME: OTHER OR NONE    NAME: ARMY--ACTIVE DUTY    NAME: NAVY, MARINE--ACTIVE DUTY    NAME: USAF, USSF - ACTIVE DUTY    NAME: COAST GUARD--ACTIVE DUTY    NAME: OTHER USPHS BENEFICIARIES    NAME: OFFICE OF WORKERS COMP.    NAME: OTHER REIMBURS. (NON-VET)    
NAME: RETIRED, UNIFORMED FORCES    NAME: MEDICAL REMEDIAL ENLIST    NAME: MERCHANT SEAMEN--USPHS    NAME: BENEFICIARIES-FOREIGN GOV    NAME: HUMANITARIAN (NON-VET)    NAME: DONORS (NON-VET)    NAME: OTHER NON-VETERANS    NAME: CZECHOSLOVAKIA/POLAND SVC    
NAME: CAV/NPS    NAME: CHAMPVA--SPOUSE, CHILD    NAME: JOB CORPS/PEACE CORPS    NAME: MERCHANT MARINE    NAME: OBSERVATION/EXAMINATION    NAME: RAILROAD RETIREMENT    NAME: CHAMPUS RESTORE    NAME: TRICARE    
NAME: OTHER FEDERAL - DEPENDENT    NAME: SPECIAL STUDIES (NON-VET)    NAME: OPERATION DESERT SHIELD    NAME: PERSIAN GULF WAR    

ICR, Total: 8

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #702
  • Fee Basis
  • ICR #732
  • Automated Medical Information Exchange
  • ICR #913
  • Lab Service
  • Accounts Receivable
  • NAME (.01).
    Access: Direct Global Read & w/Fileman

    ICR #1847
  • DSS - DECISION SUPPORT SYSTEM EXTRACTS
  • CODE (.03).
    Access: Read w/Fileman

    ICR #2504
  • Lab Service
  • ABBREVIATION (2).
    Access: Read w/Fileman

    ICR #3529
  • Beneficiary Travel
  • Scheduling
  • CODE (.03).
    Access: Direct Global Read & w/Fileman

    ICR #4280
  • Lab Service
  • CODE (.03).
    Access: Direct Global Read & w/Fileman

    ICR #5346
  • Fee Basis
  • CODE (.03).
    Access: Direct Global Read & w/Fileman

    External References

    Name Field # of Occurrence
    ^%DT .04+1, .05+1, .07+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DIC(21 - [#21] .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .03(XREF 1S), .03(XREF 1K)

    Naked Globals

    Name Field # of Occurrence
    ^(0 IDWRITE+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT .04+1*, .05+1*, .07+1*
    >> DA .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .03(XREF 1S), .03(XREF 1K)
    X .01+1!, .01(XREF 1S), .01(XREF 1K), .02+1!, .02(XREF 1S), .02(XREF 1K), .03+1!, .03(XREF 1S), .03(XREF 1K), .04+1*!
    , .05+1*!, .07+1*!, .09+1!, 20+1!
    >> Y .04+1, .05+1, .07+1
    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