Sub-Field: 9002325.02

Answer must be 4 numeric characters in length.

SEQUENCE NO. (4 DIGITS) WITHIN BATCH

1)= S ^AFSLAFP(DA(2),1,DA(1),1,"B",$E(X,1,30),DA)=""

2)= K ^AFSLAFP(DA(2),1,DA(1),1,"B",$E(X,1,30),DA)

Enter the ARMS document number to which this payment applies.

Enter the appropriate code to indicate whether or not the ARMS DHR has been filed.

Answer must be 1 character in length.

FISCAL YEAR OF FUNDS TO USE FOR PAYMENT

1)= S ^AFSLAFP(DA(2),1,"C",$E(X,1,30),DA(1),DA)=""

2)= K ^AFSLAFP(DA(2),1,"C",$E(X,1,30),DA(1),DA)

1)= S ^AFSLAFP("D",$E(X,1,30),DA(2),DA(1),DA)=""

2)= K ^AFSLAFP("D",$E(X,1,30),DA(2),DA(1),DA)

TYPE OF PAYMENT CODE.  DERIVED FROM MENU SELECTION.

DERIVED FROM MENU SELECTION.  TYPE OF PMT CODE.

1)= S ^AFSLAFP("F",$E(X,1,30),DA(2),DA(1),DA)=""

2)= K ^AFSLAFP("F",$E(X,1,30),DA(2),DA(1),DA)

Enter a description of what was paid for with this payment.

TYPE OF RECORD.  USUALLY TYPE 2

TYPE OF RECORD.

Enter a 3 character Document Reference code.

3 CHARS-VALID DOC. REF CODE

Enter the specific obligation number on the purchase order,travel order, contract etc. It must be 10 characters in length.

10 char. obligation no.

1)= S ^AFSLAFP("N",$E(X,1,30),DA(2),DA(1),DA)=""

2)= K ^AFSLAFP("N",$E(X,1,30),DA(2),DA(1),DA)

1)= S ^AFSLAFP(DA(2),1,"D",$E(X,1,30),DA(1),DA)=""

2)= K ^AFSLAFP(DA(2),1,"D",$E(X,1,30),DA(1),DA)

Enter a 2nd Document Reference code if one exists. It must be 3 characters in length.

Optional depending on payment type.

Enter a 2nd Document number if one exists. It must be 10 characters in length.

Optional depending on payment type.

7 chars...J:Agency (IHS)+2 Digit A/P+4 Alpha-Numeric.

7 Chars...J:Agency(IHS) + 2-digit A/P + 4 Alpha-Numeric chars.

4 characters...must be a valid Object Class

4 characters... must be a valid existing Object Class

2 character DOC-TYPE code referring to source document.

2 character Document Type code referring to the source document used.

9-12 CHARACTERS (SHOULD NOT INCLUDE SUFFIX)...POINTS TO VENDOR FILE

9-12 CHARACTERS (SHOULD NOT INCLUDE SUFFIX)...POINTS TO VENDOR FILE

1)= S ^AFSLAFP("E",$E(X,1,30),DA(2),DA(1),DA)=""

2)= K ^AFSLAFP("E",$E(X,1,30),DA(2),DA(1),DA)

Enter the dollar amount of this payment. The answer must be 8 digits followed by a decimal point, followed by two digits after the decimal point.

8 DIGITS + 1 DECIMAL POINT + 2 DIGITS (I.E., 99999999.99).

Enter the amount of the disbursement. It must be 8 numerals, followed by a decimal point,followed by 2 numerals after the decimal point.

i.e., 99999999.99

DATE PAYMENT IS MADE (ENTERED)

A DATE/TIME FIELD...NO TIME ENTRY ALLOWED

This is a free-text field to describe what service is being paid.  Answer must be 1-30 characters in length.

FREE-TEXT, 1-30 CHARS DESCRIBING SERVICE/ITEM

1)= I $D(DA),$D(DA(1)),$D(DA(2)) S ^AFSLAFP("PF",$P(X,",",1),DA,DA(1),DA(2))=""

2)= I $D(DA(2)),$D(DA(1)),$D(DA) K ^AFSLAFP("PF",$P(X,",",1),DA,DA(1),DA(2))

Enter "1" for non-federal sources and "2" for federal sources.

1:NON-FED 2:AT LEAST 1 INVOLVED IS FEDERAL

Enter 1 numeric character.

1:FINAL/FULL PMT 2:PARTIAL/SOME PAID BY 3RD PARTY

Enter the piggy-back workload. It must be 4 numeric characters in length.

4-DIGIT WORKLOAD

Answer must be 5 numeric characters in length.

5 CHAR TRANSACTION CODE.

Answer must be 5 numeric characters in length.

OTHER TRANSACTION CODE...5 DIGITS

9-DIGIT SSN OF PROVIDER

9-DIGIT SSN OF PROVIDER

1)= S ^AFSLAFP("G",$E(X,1,30),DA(2),DA(1),DA)=""

2)= K ^AFSLAFP("G",$E(X,1,30),DA(2),DA(1),DA)

9-DIGIT SSN OF EMPLOYEE BEING PAID

9-DIGIT SSN

1)= S ^AFSLAFP("H",$E(X,1,30),DA(2),DA(1),DA)=""

2)= K ^AFSLAFP("H",$E(X,1,30),DA(2),DA(1),DA)

Enter the Person to direct payment to. Answer must be 1-20 characters in length.

THE ATTENTION FIELD FOR AN ADDRESS

1)= S ^AFSLAFP("I",$E(X,1,30),DA(2),DA(1),DA)=""

2)= K ^AFSLAFP("I",$E(X,1,30),DA(2),DA(1),DA)

Enter the Payee's street address. Answer must 1-30 characters in length.

1-30 CHAR PAYEE ADDRESS (STREET)

The city in which the Payee is located. Answer must be 1-20 characters in length.

1-20 CHAR CITY OF PAYEE'S ADDRESS

The state in which the Payee is located. Answer must be 2 characters in length.

2 CHAR STATE CODE OF PAYEE ADDRESS

Enter the Payee's 5 digit Zip Code-Extension.

ZIP CODE OF PAYEE ADDRESS

Enter the Payee's name. Answer must be 1-40 characters in length.

1-40 CHAR PAYEE NAME

1)= S ^AFSLAFP("P",$E(X,1,30),DA(2),DA(1),DA)=""

2)= K ^AFSLAFP("P",$E(X,1,30),DA(2),DA(1),DA)

Enter the 6 digit Schedule number,followed by a dash, followed by a 4 digit sequence number.

6-DIGIT, HYPHEN, 4 DIGIT SEQUENCE# UNDER WHICH A RELATED INTEREST PAYMENT IS FILED.

Enter 8 numerals, followed by a decimal point, followed by 2 numerics after the decimal point.

I.E., 99999999.99 - AMOUNT OF A RELATED INTEREST PAYMENT

DIGITS 1-99 INDICATING NODE IN OBLIG.DOCUMENT FILE WHERE PAYMENT IS FILED

THE DIGITS 1-99 INDICATE NODE IN OBLIG.DOCUMENT FILE (^AFSLODOC( ) WHERE PAYMENT IS FILED.

Enter the Interest Document number. Answer must be 1-10 characters in length.

GENERATED DOCUMENT# OF RELATED INTEREST PAYMENT.

1)= S ^AFSLAFP("Q",$E(X,1,30),DA(2),DA(1),DA)=""

2)= K ^AFSLAFP("Q",$E(X,1,30),DA(2),DA(1),DA)

VALID COST CENTER FOUND IN COST CENTER FILE

VALID COST CENTER FOUND IN COST CENTER FILE

I.D. OF A SECONDARY RECIPIENT

1-15 CHAR I.D. OF SECONDARY RECIPIENT

Answer must be 1-6 characters in length.

1-6 CHAR PAYMENT/COLLECTION DOCUMENT NUMBER

Enter 1 "*" if the Vendor's address has been changed. Leave blank otherwise.

"*" INDICATES VENDOR ADDRESS IS DIFFERENT FROM THAT RECEIVED FROM FIELD.

Enter 1 "*" if the employee's address has been changed. Leave blank otherwise.

"*" INDICATES EMPLOYEE ADDRESS DIFFERENT FROM THAT RECEIVED FROM FIELD.

Enter a number between 1 and 99, 0 decimal digits.

DIGITS 1-99 INDICATING YEAR NODE (INTERNAL ENTRY) IN FILE ^AFSLODOC( WHERE THE DOCUMENT AND PAYMENT ARE FILED.

Enter a number between 1 and 9999999, 0 decimal digits.

3-DIGIT (LEADING ZEROS) CODE OF LOCATION FROM LOCATION CODE FILE

3-DIGITS (LEADING ZEROS) OF VALID CODE FROM LOCATION CODE FILE

Enter a "Y" If this record has been exported to H.A.S. and Treasury.  Enter a "N" If it hasn't been. Answer must be 1 character in length and can only be a "Y" or "N".

Y:HAS BEEN EXPORTED N/BLANK:HAS NOT BEEN EXPORTED

Enter a "D" to cause this payment to be withheld from next export.

D:WITHHOLD THIS PAYMENT FROM EXPORTING WITH THIS BATCH

THE DATE OF SERVICES

DATE FIELD, NO TIME MAY BE ENTERED.

Enter "+" to indicate that the schedule this record is on has been certified.

"+" INDICATES THE SCHEDULE CONTAINING THIS PAYMENT RECORD HAS BEEN CERTIFIED

1)= S ACRX=$P($G(^AFSLAFP(DA(2),0)),U),ACRY=$P($G(^(1,DA(1),0)),U),ACRZ=$P($G(^(1,DA,1)),U,21) I ACRX]"",ACRY]"",ACRZ]"" S ^AFSLAFP("PROBAT",ACRX,ACRZ,ACRY,DA(2),DA(1),DA)=""

2)= S ACRX=$P($G(^AFSLAFP(DA(2),0)),U),ACRY=$P($G(^(1,DA(1),0)),U),ACRZ=$P($G(^(1,DA,1)),U,21) I ACRX]"",ACRY]"",ACRZ]"" K ^AFSLAFP("PROBAT",ACRX,ACRZ,ACRY,DA(2),DA(1),DA)

1)= S ACRX=$P($G(^AFSLAFP(DA(2),0)),U),ACRY=$P($G(^(1,DA(1),2)),U,6),ACRZ=$P($G(^(1,DA,1)),U,21) I ACRX]"",ACRY]"",ACRZ]"" S ^AFSLAFP("PROSCH",ACRX,ACRZ,ACRY,DA(2),DA(1),DA)=""

2)= S ACRX=$P($G(^AFSLAFP(DA(2),0)),U),ACRY=$P($G(^(1,DA(1),2)),U,6),ACRZ=$P($G(^(1,DA,1)),U,21) I ACRX]"",ACRY]"",ACRZ]"" K ^AFSLAFP("PROSCH",ACRX,ACRZ,ACRY,DA(2),DA(1),DA)

1)= S ACRX=$P($G(^AFSLAFP(DA(2),0)),U),ACRY=$P($G(^(1,DA(1),2)),U,6),ACRZ=$P($G(^(1,DA,1)),U,21) I ACRX]"",ACRY]"",ACRZ]"" S ^AFSLAFP("SCHPRO",ACRX,ACRY,ACRZ,DA(2),DA(1),DA)=""

2)= Q

1)= S ^AFSLAFP("O",$E(X,1,30),DA(2),DA(1),DA)=""

2)= K ^AFSLAFP("O",$E(X,1,30),DA(2),DA(1),DA)

This is a link-pointer to the parameters file.

Enter the second street address.

This is the travel or grant begin date for the DHR.  It is in MMYY format and occupies positions 126-129 of the DHR record string.  This field is a new requirement of the CORE system.

This is the travel or grant end date for the DHR.  It is in MMYY format and occupies positions 130-133 of the DHR record string.  This field is a new requirement of the CORE system.

This is the 2 digit fiscal year of the document for the DHR. It is in YY format and occupies positions 134-135 of the DHR record string.  This field is a new requirement of the CORE system.

Enter the appropriate code from the list.

Enter the bank routing number.

Enter the bank account number.