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 | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All

Print Page as PDF

Global: ^FBAA(161.95

Package: Fee Basis

Global: ^FBAA(161.95

Information

FileMan FileNo	FileMan Filename	Package
161.95	IPAC VENDOR AGREEMENT FILE	Fee Basis

Description

This file contains Intra-governmental Payment and Collection System (IPAC) vendor agreement data that is applicable to Fee Basis invoices. Each record in this file is for a specific vendor and fiscal year. More than one record can be entered for the same vendor. When Fee invoices are entered, if the vendor being paid has an active IPAC vendor agreement on file the system will require the payment to be made via the IPAC system. This Department of Treasury system is used to transfer funds between government agencies. Per VHA Directive 2004-038, this file definition should not be modified.

Directly Accessed By Routines, Total: 19

Package	Total	Routines
Fee Basis	19	FBAAIAD FBAAIAE FBAAIAQ FBAAIAR FBAAIARB FBAAIAU FBAAMP FBAAMPG1 FBAAMPRG FBAAPIN FBAARMRA FBAAV0 FBAAV01 FBAAV2 FBAAV5 FBAAV8 FBCHVH ^FBAA(161.95 ^FBAA(163.98

Accessed By FileMan Db Calls, Total: 3

Package	Total	Routines
Fee Basis	3	FBAAIAD FBAAIAU FBAAMP

Pointed To By FileMan Files, Total: 4

Package	Total	FileMan Files
Fee Basis	4	IPAC VENDOR AGREEMENT MRA(#161.96)[1] FEE BASIS PHARMACY INVOICE(#162.1)[14] FEE BASIS PAYMENT(#162)[#162.03(.05)] FEE BASIS INVOICE(#162.5)[87]

Pointer To FileMan Files, Total: 1

Package	Total	FileMan Files
Fee Basis	1	FEE BASIS VENDOR(#161.2)[1]

Fields, Total: 18

Field #	Name	Loc	Type	Details
.01	ID	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>10!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `MAR 05, 2014` HELP-PROMPT: `Answer must be 3-10 characters in length.` DESCRIPTION: `The ID is automatically generated by the software when a new record is created.` CROSS-REFERENCE: `161.95^B` `1)= S ^FBAA(161.95,"B",$E(X,1,30),DA)=""` `2)= K ^FBAA(161.95,"B",$E(X,1,30),DA)`
1	VENDOR	0;2	POINTER TO FEE BASIS VENDOR FILE (#161.2)	**********************REQUIRED FIELD********************** FEE BASIS VENDOR(#161.2) INPUT TRANSFORM: `S DIC("S")="I $P($G(^(""AMS"")),""^"",4)=""F""" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X` LAST EDITED: `MAR 05, 2014` HELP-PROMPT: `Enter a vendor associated with this agreement. It must be a federal vendor.` DESCRIPTION: `The federal vendor associated with the agreement. If a vendor has an active agreement on file, the system will force all payments to that vendor to be made via IPAC.` SCREEN: `S DIC("S")="I $P($G(^(""AMS"")),""^"",4)=""F"""` EXPLANATION: `The vendor must have a FMS VENDOR TYPE equal to F (federal)` CROSS-REFERENCE: `161.95^V` `1)= S ^FBAA(161.95,"V",$E(X,1,30),DA)=""` `2)= K ^FBAA(161.95,"V",$E(X,1,30),DA)` RECORD INDEXES: `AVA (#1211)`
2	FISCAL YEAR	0;3	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<2000)!(X?.E1"."1N.N) X` LAST EDITED: `MAR 05, 2014` HELP-PROMPT: `Enter a four digit fiscal year (e.g. 2010).` DESCRIPTION: `The fiscal year is used to identify the applicable period for an agreement record. It is displayed as an identifier to assist in selection of the appropriate record.`
3	STATUS	0;4	SET	**********************REQUIRED FIELD********************** 'N' FOR NEW; 'A' FOR ACTIVE; 'I' FOR INACTIVE; LAST EDITED: `MAR 05, 2014` HELP-PROMPT: `Please select a code from the list.` DESCRIPTION: `Status of the record. The NEW status is only set by the system and it indicates a record that is partially entered and is missing some required fields. Once all required fields have been filed, the status is automatically` `changed to ACTIVE.` TECHNICAL DESCR: `The status of NEW will be automatically set when the record is created. The users may specify ACTIVE or INACTIVE with the application software if they are editing an agreement has data for all of its required fields. If` `the user is editing an agreement that has no data for one or more required fields, the Status field is not editable.` SCREEN: `S DIC("S")="I Y'=""N"""` EXPLANATION: `The NEW status is automatically set by the system.` RECORD INDEXES: `AVA (#1211)`
4	DESCRIPTION	0;5	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>60!($L(X)<3) X` LAST EDITED: `MAR 05, 2014` HELP-PROMPT: `Answer must be 3-60 characters in length.` DESCRIPTION: `The description is an identifier. It is displayed during selection of an agreement to assist the user to make an appropriate choice.`
5	SHARING AGREEMENT NO.	0;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>13!($L(X)<1) X` LAST EDITED: `MAR 05, 2014` HELP-PROMPT: `Answer must be 1-13 characters in length.` DESCRIPTION: `The sharing agreement number that is related to the IPAC vendor agreement.`
6	CUSTOMER ALC	1;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>8!($L(X)<1) X` LAST EDITED: `MAR 05, 2014` HELP-PROMPT: `Answer must be 1-8 characters in length.` DESCRIPTION: `The customer ALC is the agency location code (ALC) of the government agency that will be paid.`
7	RECEIVER TAS	1;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>27!($L(X)<27) X` LAST EDITED: `OCT 08, 2014` HELP-PROMPT: `Answer must be 27 characters in length.` DESCRIPTION: `The Treasury Account Symbol (TAS) for the government agency that will receive the IPAC transaction. This is a composite field which contains 9 different component fields. Each part of the TAS must be specified according to` `the following character position layout.` `Pos# Field Name` `----- ----------` `1-2 Sub-level Prefix (SP): " " 2 spaces` `3-5 Allocation Transfer Agency ID (ATA): " " 3 spaces` `6-8 Agency Identifier (AID): "097" is for DoD/DFAS` `9-12 Beginning Period of Availability (BPOA): FY` `13-16 Ending Period of Availability (EPOA): FY` `17-17 Availability Type Code (A): " " or "X" (see below)` `18-21 Main Account Code (MAIN): "0130"` `22-24 Sub-Account Code (SUB): "000"` `25-27 CGAC Component TAS indicator: " C" 2 spaces + "C"` `The Availability Type Code is a blank space if using the BPOA/EPOA FY Funds. For No-Year Funds, the Availability Type Code is "X" and the BPOA and EPOA values should both be 4 blank spaces.`
7.5	SENDER TAS	1;5	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>27!($L(X)<1) X` LAST EDITED: `OCT 08, 2014` HELP-PROMPT: `Answer must be 1-27 characters in length.` DESCRIPTION: `The Treasury Account Symbol (TAS) for the government agency that will send the IPAC transaction. Please enter '036' as the Agency ID Number for the VA. Central Fee will construct the full Sender TAS based on the Obligation` `Number received in the payment batch transmission.`
8	AGENCY FIELD STATION NUMBER	1;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>8!($L(X)<1) X` LAST EDITED: `OCT 27, 2014` HELP-PROMPT: `Answer must be 1-8 characters in length.` DESCRIPTION: `Please enter the DoD Fiscal Station Number. This station number will be used in the IPAC field called 'FSN/AAA/ADSN'. Do NOT enter the VA station number here.`
9	OBLIGATING DOCUMENT NO.	1;4	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>17!($L(X)<1) X` LAST EDITED: `OCT 27, 2014` HELP-PROMPT: `Answer must be 1-17 characters in length.` DESCRIPTION: `Please enter the DoD Obligating Document Number. This is the internal accounting document number of the billing agency.`
10	STATION CONTACT NAME	2;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>60!($L(X)<1) X` LAST EDITED: `MAR 05, 2014` HELP-PROMPT: `Answer must be 1-60 characters in length.` DESCRIPTION: `Name of VA employee that should be contacted if there are questions about the IPAC transaction. This value will be included in the IPAC transaction.`
11	STATION CONTACT PHONE	2;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>17!($L(X)<1) X` LAST EDITED: `MAR 05, 2014` HELP-PROMPT: `Answer must be 1-17 characters in length.` DESCRIPTION: `Phone number for the station contact name.`
12	STATION CONTACT EMAIL	2;3	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>100!($L(X)<1) X` LAST EDITED: `MAR 05, 2014` HELP-PROMPT: `Answer must be 1-100 characters in length.` DESCRIPTION: `E-mail address for the VA employee who is the station contact.`
13	COMPLETE LINE OF ACCOUNTING	3;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>60!($L(X)<1) X` LAST EDITED: `OCT 27, 2014` HELP-PROMPT: `Answer must be 1-60 characters in length.` DESCRIPTION: `Please enter '097' as the Agency ID Number for the DoD/DFAS. The actual Complete Line of Accounting will be entered into the DESC. OF GOODS & SERVICES field.`
14	DESC. OF GOODS & SERVICES	4;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>200!($L(X)<1) X` LAST EDITED: `OCT 27, 2014` HELP-PROMPT: `Answer must be 1-200 characters in length.` DESCRIPTION: `This is a 200 character free text field. Please enter the full and complete Line of Accounting (LOA) including the FSN and the DoD Obligating Document number and any other information required by DFAS in the Transaction` `Description field on the IPAC transaction.`
15	MISCELLANEOUS INFO (1)	5;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>220!($L(X)<1) X` LAST EDITED: `OCT 27, 2014` HELP-PROMPT: `Answer must be 1-220 characters in length.` DESCRIPTION: `The text (if any) in MISCELLANEOUS INFO (1) will be included in the Miscellaneous Information block of the IPAC transaction. Miscellaneous Information may be used to specify the address of the military treatment facility` `that is being paid and/or a point of contact at DFAS.`
16	MISCELLANEOUS INFO (2)	6;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<1) X` LAST EDITED: `OCT 27, 2014` HELP-PROMPT: `Answer must be 1-80 characters in length.` DESCRIPTION: `The text (if any) in MISCELLANEOUS INFO (2) will be included in the Miscellaneous Information block of the IPAC transaction immediately after the text from MISCELLANEOUS INFO (1). Miscellaneous Information may be used to` `specify the address of the military treatment facility that is being paid and/or a point of contact at DFAS.`

ICR, Total: 1

ICR LINK	Subscribing Package(s)	Fields Referenced	Description
ICR #6234	Fee Basis

External References

Name	Field # of Occurrence
^DIC	1+1
Y^DIQ	ID1+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(161.2	ID1+1
^FBAA(161.95 - [#161.95]	IXAVASL+1*, IXAVAKL+1!, IXAVAKEIC+1!, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K)
^FBAAV - [#161.2]	ID1+1

Naked Globals

Name	Field # of Occurrence
^(0	ID1+1, ID2+1, ID4+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%I	ID1+1*!
>> C	ID1+1*
>> DA	IXAVASL+1, IXAVAKL+1, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K)
DIC	ID1+1, ID3+1, 1+1!*
DIC("S"	1+1, 1SCR+1, 3SCR+1*
>> DIE	1+1
U	ID1+1, ID2+1, ID4+1
X	.01+1!, .01(XREF 1S), .01(XREF 1K), 1+1*!, 1(XREF 1S), 1(XREF 1K), 2+1!, 4+1!, 5+1!, 6+1! , 7+1!, 7.5+1!, 8+1!, 9+1!, 10+1!, 11+1!, 12+1!, 13+1!, 14+1!, 15+1! , 16+1!
X(1	IXAVASL+1, IXAVAKL+1
X(2	IXAVASL+1, IXAVAKL+1
>> Y	ID1+1*, 1+1

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointed To By FileMan Files | Pointer To FileMan Files | Fields | ICR | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All