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

The PERIOD OF SERVICE file contains 37 entries as determined by VACO MAS. Alteration of existing entries or addition of new ones will undoubtedly have a negative impact on the efficient operation of the MAS module and other modules. Updates to this file will be provided by the MAS developers by way of regular releases.

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 ^DIC(21 VAFHLZSP
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: 13

Package	Total	Routines
Registration	8	DG531048P 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