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 |  Found Entries |  All
Print Page as PDF
Global: ^ACRPAY

Package: Commitment Register

Global: ^ACRPAY


Information

FileMan FileNo FileMan Filename Package
9002194.2 FMS APPROVALS FOR PAYMENT Commitment Register

Description

Directly Accessed By Routines, Total: 1

Package Total Routines
Commitment Register 1 ACRFIV11    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Commitment Register 2 ACRFIV1    ACRFIV11    

Pointed To By FileMan Files, Total: 2

Package Total FileMan Files
Commitment Register 2 FMS PAYMENT DISCOUNT/PENALTIES(#9002194.3)[.03]    FMS APPROVALS FOR PAYMENT(#9002194.2)[36465]

Pointer To FileMan Files, Total: 8

Package Total FileMan Files
Utility Tables 5 COMMON ACCOUNTING NUMBER(#9999999.57)[13]    COST CENTER(#9999999.58)[38]    LOCATION CODE(#9999999.66)[45]    OBJECT/SUB-OBJECT(#9999999.59)[14]    VENDOR(#9999999.11)[16]    
Commitment Register 2 FMS DOCUMENT(#9002196)[.02.03]    FMS APPROVALS FOR PAYMENT(#9002194.2)[36465]
Kernel 1 NEW PERSON(#200)[.0522627]    

Fields, Total: 68

Field # Name Loc Type Details
.01 DATE OF PAYMENT 0;1 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 01, 1996
  • HELP-PROMPT:  Enter the date the payment will be made.
  • DESCRIPTION:  
    Answer must be 4 numeric characters in length.
  • TECHNICAL DESCR:  
    SEQUENCE NO. (4 DIGITS) WITHIN BATCH
  • CROSS-REFERENCE:  9002194.2^B
    1)= S ^ACRPAY("B",$E(X,1,30),DA)=""
    2)= K ^ACRPAY("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9002194.2^AC0
    1)= I $D(^ACRPAY(DA,0)) S ACR=^(0) I $P(ACR,U,2),$P(ACR,U,4) S ^ACRPAY("AC",$P(ACR,U,2),$P(ACR,U,4),+^ACRSS(+ACR,0),DA)=""
    2)= I $D(^ACRPAY(DA,0)) S ACR=^(0) I $P(ACR,U,2),$P(ACR,U,4) K ^ACRPAY("AC",$P(ACR,U,2),$P(ACR,U,4),+^ACRSS(+ACR,0),DA)
    3)= DO NOT DELETE
    Used for look-up/edit of receiving reports.
.02 PURCHASE ORDER 0;2 POINTER TO FMS DOCUMENT FILE (#9002196) FMS DOCUMENT(#9002196)

  • LAST EDITED:  FEB 14, 1997
  • HELP-PROMPT:  
  • CROSS-REFERENCE:  9002194.2^AC
    1)= I $D(^ACRPAY(DA,0)) S ACR=^(0) I $P(ACR,U,4) S ^ACRPAY("AC",$E(X,1,30),$P(ACR,U,4),+^ACRSS(+ACR,0),DA)=""
    2)= I $D(^ACRPAY(DA,0)) S ACR=^(0) I $P(ACR,U,4) K ^ACRPAY("AC",$E(X,1,30),$P(ACR,U,4),+^ACRSS(+ACR,0),DA)
    3)= DO NOT DELETE
    Used for look-up/edit of receiving reports.
  • CROSS-REFERENCE:  9002194.2^AD^MUMPS
    1)= I $D(^ACRPAY(DA,0)),$P(^(0),U,4) S ^ACRPAY("AD",X,$P(^(0),U,4),DA)=""
    2)= I $D(^ACRR(DA,0)),$P(^(0),U,4) K ^ACRPAY("AD",X,$P(^(0),U,4),DA)
    X-ref for the purchase order and receiving report number.
.03 REQUISITION 0;3 POINTER TO FMS DOCUMENT FILE (#9002196) FMS DOCUMENT(#9002196)

  • LAST EDITED:  APR 01, 1996
  • CROSS-REFERENCE:  9002194.2^C
    1)= S ^ACRPAY("C",$E(X,1,30),DA)=""
    2)= K ^ACRPAY("C",$E(X,1,30),DA)
    3)= DO NOT DELETE
    Used for look-up of all receiving reports for a purchase order.
.04 RECEIVING REPORT NUMBER 0;4 NUMBER

  • INPUT TRANSFORM:  S X=+X K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 01, 1996
  • HELP-PROMPT:  Type a Number between 1 and 99, 0 Decimal Digits
  • DESCRIPTION:  
    This is the receiving report number for which this payment is being made.  The Receiving Report Number is entered automatically by the system.
  • CROSS-REFERENCE:  9002194.2^AC2
    1)= S ACR=^ACRPAY(DA,0) I +ACR,$P(ACR,U,2) S ^ACRPAY("AC",$P(ACR,U,2),$E(X,1,30),+^ACRSS(+ACR,0),DA)=""
    2)= S ACR=^ACRPAY(DA,0) I +ACR,$P(ACR,U,2) K ^ACRPAY("AC",$P(ACR,U,2),$E(X,1,30),+^ACRSS(+ACR,0),DA)
    3)= DO NOT DELETE
    Used for look-up/edit of receiving reports.
  • CROSS-REFERENCE:  9002194.2^AD2^MUMPS
    1)= I $D(^ACRPAY(DA,0)),$P(^(0),U,2) S ^ACRPAY("AD",$P(^(0),U,2),X,DA)=""
    2)= I $D(^ACRPAY(DA,0)),$P(^(0),U,2) K ^ACRPAY("AD",$P(^(0),U,2),X,DA)
    X-ref for the purchase order and receiving report number.
.05 INDIVIDUAL WHO SET PAY DATE 0;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • OUTPUT TRANSFORM:  S Y=$$NAME2^ACRFUTL1(Y)
  • LAST EDITED:  SEP 30, 2005
  • HELP-PROMPT:  
  • DESCRIPTION:  
    This is a pointer to the User file.  It is set internally by the system and indicates the individual who set the payment date.
  • TECHNICAL DESCR:  In an effort to standardize the name format in the New Person (200) file, there have been some significant changes made to the way the name is entered and displayed. Last names may no longer contain spaces or apostrophes. 
    While this was primarily done to help clarify patient data, it does have a great impact on ARMS for traveler payments and for the display/print of all documents.
    For this reason, effective ARMS V2.1 Patch 19, an output transform has been added to this field allowing the Name to display with punctuation.
.06 DATE PAYMENT DUE DATE SET 0;6 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  This is the date and time that the payment due date was entered.
  • DESCRIPTION:  
    This date is set internally by the system and indicates the date on which the payment due date was entered.
.07 DATE EXPORTED 0;7 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  This is the date the payment data was exported.
  • DESCRIPTION:  
    This date is set internally by the system and indicates the date on which the payment information was exported to the 1166 payment module.
.08 PAYMENT STATUS 0;8 SET
  • '1' FOR FINAL;
  • '2' FOR PARTIAL;

  • LAST EDITED:  APR 01, 1996
  • HELP-PROMPT:  Enter the appropriate code from the list.
  • DESCRIPTION:  
    Enter '1' if this is a FINAL payment, '2' if this is a PARTIAL payment.
1 SEQ FY OF FUNDS DT;2 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>1!($L(X)<1)!'(X?1N!(X?1"X")!(X?1"M")) X
  • LAST EDITED:  FEB 05, 1993
  • HELP-PROMPT:  Answer must be 1 character in length.
  • DESCRIPTION:  
    Answer must be 1 character in length.
  • TECHNICAL DESCR:  
    FISCAL YEAR OF FUNDS TO USE FOR PAYMENT
2 DATA ENTRY USER ID DT;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • OUTPUT TRANSFORM:  S Y=$$NAME2^ACRFUTL1(Y)
  • LAST EDITED:  SEP 30, 2005
  • HELP-PROMPT:  Type a Number between 0 and 99999999.99, 2 Decimal Digits
  • DESCRIPTION:  
    Enter to TOTAL AMOUNT OF PAYMENT authorized for this vendor under this document.
  • TECHNICAL DESCR:  In an effort to standardize the name format in the New Person (200) file, there have been some significant changes made to the way the name is entered and displayed. Last names may no longer contain spaces or apostrophes. 
    While this was primarily done to help clarify patient data, it does have a great impact on ARMS for traveler payments and for the display/print of all documents.
    For this reason, effective ARMS V2.1 Patch 19, an output transform has been added to this field allowing the Name to display with punctuation.
3 PAYMENT TYPE DT;22 POINTER ** TO AN UNDEFINED FILE **

  • LAST EDITED:  JAN 16, 1992
  • HELP-PROMPT:  ENTER A VALID PAYMENT TYPE
  • DESCRIPTION:  
    TYPE OF PAYMENT CODE.  DERIVED FROM MENU SELECTION.
  • TECHNICAL DESCR:  
    DERIVED FROM MENU SELECTION.  TYPE OF PMT CODE.
10 RECORD TYPE DT;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1) X
  • LAST EDITED:  JAN 08, 1992
  • HELP-PROMPT:  Answer must be 1 character in length.
  • DESCRIPTION:  
    TYPE OF RECORD.  USUALLY TYPE 2
  • TECHNICAL DESCR:  
    TYPE OF RECORD.
11 DOCUMENT REF CODE DT;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
  • LAST EDITED:  JAN 09, 1992
  • HELP-PROMPT:  Answer must be 3 characters in length.
  • DESCRIPTION:  
    Enter a 3 character Document Reference code.
  • TECHNICAL DESCR:  
    3 CHARS-VALID DOC. REF CODE
11.5 DOCUMENT NO. DT;20 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>10!($L(X)<10) X
  • LAST EDITED:  AUG 05, 1992
  • HELP-PROMPT:  Answer must be 10 characters in length.
  • DESCRIPTION:  
    Enter the specific obligation number on the purchase order,travel order, contract etc. It must be 10 characters in length.
  • TECHNICAL DESCR:  
    10 char. obligation no.
12 OTHER DOCUMENT REF DT;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
  • LAST EDITED:  JAN 09, 1992
  • HELP-PROMPT:  Answer must be 3 characters in length.
  • DESCRIPTION:  
    Enter a 2nd Document Reference code if one exists. It must be 3 characters in length.
  • TECHNICAL DESCR:  
    Optional depending on payment type.
12.5 OTHER DOCUMENT NO. DT;21 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<10) X
  • LAST EDITED:  JAN 09, 1992
  • HELP-PROMPT:  Answer must be 10 characters in length.
  • DESCRIPTION:  
    Enter a 2nd Document number if one exists. It must be 10 characters in length.
  • TECHNICAL DESCR:  
    Optional depending on payment type.
13 C.A.N. DT;7 POINTER TO COMMON ACCOUNTING NUMBER FILE (#9999999.57) COMMON ACCOUNTING NUMBER(#9999999.57)

  • LAST EDITED:  JAN 08, 1992
  • HELP-PROMPT:  Enter a valid CAN number.
  • DESCRIPTION:  
    7 chars...J:Agency (IHS)+2 Digit A/P+4 Alpha-Numeric.
  • TECHNICAL DESCR:  
    7 Chars...J:Agency(IHS) + 2-digit A/P + 4 Alpha-Numeric chars.
14 SUB-OBJECT CLASS DT;8 POINTER TO OBJECT/SUB-OBJECT FILE (#9999999.59) OBJECT/SUB-OBJECT(#9999999.59)

  • LAST EDITED:  JAN 08, 1992
  • HELP-PROMPT:  Enter a valid Object Class from OBJECT/SUB-OBJECT CLASS file
  • DESCRIPTION:  
    4 characters...must be a valid Object Class
  • TECHNICAL DESCR:  
    4 characters... must be a valid existing Object Class
15 DOC-TYP DT;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2) X
  • LAST EDITED:  JAN 08, 1992
  • HELP-PROMPT:  Answer must be 2 characters in length.
  • DESCRIPTION:  
    2 character DOC-TYPE code referring to source document.
  • TECHNICAL DESCR:  
    2 character Document Type code referring to the source document used.
16 VENDOR-EIN DT;10 POINTER TO VENDOR FILE (#9999999.11) VENDOR(#9999999.11)

  • LAST EDITED:  JAN 17, 1992
  • HELP-PROMPT:  9-12 CHARACTER VENDOR EIN# (NOT INCLUDE SUFFIX)
  • DESCRIPTION:  
    9-12 CHARACTERS (SHOULD NOT INCLUDE SUFFIX)...POINTS TO VENDOR FILE
  • TECHNICAL DESCR:  
    9-12 CHARACTERS (SHOULD NOT INCLUDE SUFFIX)...POINTS TO VENDOR FILE
17 DOL-AMT DT;11 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<9)!'(X?6N1"."2N) X
  • LAST EDITED:  FEB 13, 1992
  • HELP-PROMPT:  Answer must be 9 numeric characters in length. (999999.99)
  • DESCRIPTION:  
    Enter the dollar amount of this payment. The answer must be 6 numerals followed by a decimal point, followed by two digits after the decimal point.
  • TECHNICAL DESCR:  
    9 DIGITS INCLUDING 2 DECIMALS (I.E., 999999.99)
18 DIS-AMT (NO TREAS) DT;12 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<9)!'(X?6N1"."2N) X
  • LAST EDITED:  OCT 23, 1992
  • HELP-PROMPT:  Enter 9 characters (999999.99)
  • DESCRIPTION:  
    Enter the amount of the disbursement. It must be 6 numerals, followed by a decimal point,followed by 2 numerals after the decimal point.
  • TECHNICAL DESCR:  
    i.e., 999999.99
19 AFP-PAY-DATE DT;13 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 24, 1992
  • HELP-PROMPT:  Enter a date in format: mmddyy, mm/dd/yy, mm-dd-yy, etc. Assumes current year.
  • DESCRIPTION:  
    DATE PAYMENT IS MADE (ENTERED)
  • TECHNICAL DESCR:  
    A DATE/TIME FIELD...NO TIME ENTRY ALLOWED
20 PAID-FOR DT;14 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  JUN 11, 1992
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This is a free-text field to describe what service is being paid.  Answer must be 1-30 characters in length.
  • TECHNICAL DESCR:  
    FREE-TEXT, 1-30 CHARS DESCRIBING SERVICE/ITEM
21 FED-CD DT;15 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1)!'(X?1"1"!(X?1"2")) X
  • LAST EDITED:  JAN 09, 1992
  • HELP-PROMPT:  Answer must be 1 character in length.
  • DESCRIPTION:  
    Enter "1" for non-federal sources and "2" for federal sources.
  • TECHNICAL DESCR:  
    1:NON-FED 2:AT LEAST 1 INVOLVED IS FEDERAL
22 PAY-CD DT;16 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1)!'(X?1N) X
  • LAST EDITED:  JAN 08, 1992
  • HELP-PROMPT:  Answer must be 1 character in length.
  • DESCRIPTION:  
    Enter 1 numeric character.
  • TECHNICAL DESCR:  
    1:FINAL/FULL PMT 2:PARTIAL/SOME PAID BY 3RD PARTY
23 PIG-WK DT;17 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>4!($L(X)<4)!'(X?4N) X
  • LAST EDITED:  JAN 08, 1992
  • HELP-PROMPT:  Answer must be 4 characters in length.
  • DESCRIPTION:  
    Enter the piggy-back workload. It must be 4 numeric characters in length.
  • TECHNICAL DESCR:  
    4-DIGIT WORKLOAD
24 TRN-CD DT;18 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>5!($L(X)<5)!'(X?5N) X
  • LAST EDITED:  JAN 08, 1992
  • HELP-PROMPT:  Answer must be 5 characters in length.
  • DESCRIPTION:  
    Answer must be 5 numeric characters in length.
  • TECHNICAL DESCR:  
    5 CHAR TRANSACTION CODE.
25 OTH-TRN-CD DT;19 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>5!($L(X)<5)!'(X?5N) X
  • LAST EDITED:  JAN 08, 1992
  • HELP-PROMPT:  Answer must be 5 characters in length.
  • DESCRIPTION:  
    Answer must be 5 numeric characters in length.
  • TECHNICAL DESCR:  
    OTHER TRANSACTION CODE...5 DIGITS
26 PROVIDER-EIN/SSN DT;23 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • OUTPUT TRANSFORM:  S Y=$$NAME2^ACRFUTL1(Y)
  • LAST EDITED:  SEP 30, 2005
  • HELP-PROMPT:  PROVIDER SSN (NON-EMPLOYING)
  • DESCRIPTION:  
    9-DIGIT SSN OF PROVIDER
  • TECHNICAL DESCR:  9-DIGIT SSN OF PROVIDER
    In an effort to standardize the name format in the New Person (200) file, there have been some significant changes made to the way the name is entered and displayed. Last names may no longer contain spaces or apostrophes. 
    While this was primarily done to help clarify patient data, it does have a great impact on ARMS for traveler payments and for the display/print of all documents.
    For this reason, effective ARMS V2.1 Patch 19, an output transform has been added to this field allowing the Name to display with punctuation.
27 EMPLOYEE-SSN DT;24 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • OUTPUT TRANSFORM:  S Y=$$NAME2^ACRFUTL1(Y)
  • LAST EDITED:  SEP 30, 2005
  • HELP-PROMPT:  9-DIGIT SSN OF EMPLOYEE BEING PAID
  • DESCRIPTION:  
    9-DIGIT SSN OF EMPLOYEE BEING PAID
  • TECHNICAL DESCR:  9-DIGIT SSN
    In an effort to standardize the name format in the New Person (200) file, there have been some significant changes made to the way the name is entered and displayed. Last names may no longer contain spaces or apostrophes. 
    While this was primarily done to help clarify patient data, it does have a great impact on ARMS for traveler payments and for the display/print of all documents.
    For this reason, effective ARMS V2.1 Patch 19, an output transform has been added to this field allowing the Name to display with punctuation.
28 PAY ATTENTION DT;25 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  FEB 18, 1992
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
  • DESCRIPTION:  
    Enter the Person to direct payment to. Answer must be 1-20 characters in length.
  • TECHNICAL DESCR:  
    THE ATTENTION FIELD FOR AN ADDRESS
29 PAY ADDRESS DT;28 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  JAN 29, 1992
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    Enter the Payee's street address. Answer must 1-30 characters in length.
  • TECHNICAL DESCR:  
    1-30 CHAR PAYEE ADDRESS (STREET)
30 PAY CITY 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  JAN 29, 1992
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
  • DESCRIPTION:  
    The city in which the Payee is located. Answer must be 1-20 characters in length.
  • TECHNICAL DESCR:  
    1-20 CHAR CITY OF PAYEE'S ADDRESS
31 PAY STATE 1;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2) X
  • LAST EDITED:  JAN 29, 1992
  • HELP-PROMPT:  Answer must be 2 characters in length.
  • DESCRIPTION:  
    The state in which the Payee is located. Answer must be 2 characters in length.
  • TECHNICAL DESCR:  
    2 CHAR STATE CODE OF PAYEE ADDRESS
32 PAY ZIP 1;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<5) X
  • LAST EDITED:  AUG 10, 1995
  • HELP-PROMPT:  Answer must be 5-10 characters in length.
  • DESCRIPTION:  
    Enter the Payee's 5 digit Zip Code-Extension.
  • TECHNICAL DESCR:  
    ZIP CODE OF PAYEE ADDRESS
33 PAY NAME 1;4 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  JUN 30, 1995
  • HELP-PROMPT:  Answer must be 1-40 characters in length.
  • DESCRIPTION:  
    Enter the Payee's name. Answer must be 1-40 characters in length.
  • TECHNICAL DESCR:  
    1-40 CHAR PAYEE NAME
34 INT-SQ 1;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>11!($L(X)<11)!'(X?6N1"-"4N) X
  • LAST EDITED:  MAR 03, 1992
  • HELP-PROMPT:  6 Digit Schedule#-4 digit sequence# (i.e., 123456-0002)
  • DESCRIPTION:  
    Enter the 6 digit Schedule number,followed by a dash, followed by a 4 digit sequence number.
  • TECHNICAL DESCR:  
    6-DIGIT, HYPHEN, 4 DIGIT SEQUENCE# UNDER WHICH A RELATED INTEREST PAYMENT IS FILED.
35 INT-AMT 1;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<9)!'(X?6N1"."2N) X
  • LAST EDITED:  MAR 03, 1992
  • HELP-PROMPT:  (999999.99)
  • DESCRIPTION:  
    Enter 6 numerals, followed by a decimal point, followed by 2 numerics after the decimal point.
  • TECHNICAL DESCR:  
    I.E., 999999.99 - AMOUNT OF A RELATED INTEREST PAYMENT
36 DOC-PMT NODE 1;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUN 10, 1992
  • HELP-PROMPT:  Type a Number between 1 and 99, 0 Decimal Digits
  • DESCRIPTION:  
    DIGITS 1-99 INDICATING NODE IN OBLIG.DOCUMENT FILE WHERE PAYMENT IS FILED
  • TECHNICAL DESCR:  
    THE DIGITS 1-99 INDICATE NODE IN OBLIG.DOCUMENT FILE (^AFSLODOC( ) WHERE PAYMENT IS FILED.
37 INT-DOC 1;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  MAR 28, 1996
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • DESCRIPTION:  
    Enter the Interest Document number. Answer must be 1-10 characters in length.
  • TECHNICAL DESCR:  
    GENERATED DOCUMENT# OF RELATED INTEREST PAYMENT.
38 COST CTR 1;9 POINTER TO COST CENTER FILE (#9999999.58) COST CENTER(#9999999.58)

  • LAST EDITED:  MAR 23, 1992
  • HELP-PROMPT:  Enter a valid Cost Center found in Cost Center file
  • DESCRIPTION:  
    VALID COST CENTER FOUND IN COST CENTER FILE
  • TECHNICAL DESCR:  
    VALID COST CENTER FOUND IN COST CENTER FILE
39 SECONDARY RECIPIENT 1;10 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  MAR 30, 1992
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
  • DESCRIPTION:  
    I.D. OF A SECONDARY RECIPIENT
  • TECHNICAL DESCR:  
    1-15 CHAR I.D. OF SECONDARY RECIPIENT
40 PMT/COLL DOCUMENT 1;11 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>6!($L(X)<1) X
  • LAST EDITED:  MAR 30, 1992
  • HELP-PROMPT:  Answer must be 1-6 characters in length.
  • DESCRIPTION:  
    Answer must be 1-6 characters in length.
  • TECHNICAL DESCR:  
    1-6 CHAR PAYMENT/COLLECTION DOCUMENT NUMBER
41 V-ADR CHNGE 1;12 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1)!'(X?1"*") X
  • LAST EDITED:  APR 22, 1992
  • HELP-PROMPT:  Answer must be 1 character in length.
  • DESCRIPTION:  
    Enter 1 "*" if the Vendor's address has been changed. Leave blank otherwise.
  • TECHNICAL DESCR:  
    "*" INDICATES VENDOR ADDRESS IS DIFFERENT FROM THAT RECEIVED FROM FIELD.
42 E-ADR CHNGE 1;13 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1)!'(X?1"*") X
  • LAST EDITED:  APR 22, 1992
  • HELP-PROMPT:  Answer must be 1 character in length.
  • DESCRIPTION:  
    Enter 1 "*" if the employee's address has been changed. Leave blank otherwise.
  • TECHNICAL DESCR:  
    "*" INDICATES EMPLOYEE ADDRESS DIFFERENT FROM THAT RECEIVED FROM FIELD.
43 DOC-YR NODE 1;15 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 22, 1992
  • HELP-PROMPT:  Type a Number between 1 and 99, 0 Decimal Digits
  • DESCRIPTION:  
    Enter a number between 1 and 99, 0 decimal digits.
  • TECHNICAL DESCR:  
    DIGITS 1-99 INDICATING YEAR NODE (INTERNAL ENTRY) IN FILE ^AFSLODOC( WHERE THE DOCUMENT AND PAYMENT ARE FILED.
44 DOC-NODE 1;16 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUN 10, 1992
  • HELP-PROMPT:  Type a Number between 1 and 9999999, 0 Decimal Digits
  • DESCRIPTION:  
    Enter a number between 1 and 9999999, 0 decimal digits.
45 LOC CODE 1;18 POINTER TO LOCATION CODE FILE (#9999999.66) LOCATION CODE(#9999999.66)

  • LAST EDITED:  SEP 04, 1992
  • HELP-PROMPT:  Enter a valid code from the LOCATION CODE file.
  • DESCRIPTION:  
    3-DIGIT (LEADING ZEROS) CODE OF LOCATION FROM LOCATION CODE FILE
  • TECHNICAL DESCR:  
    3-DIGITS (LEADING ZEROS) OF VALID CODE FROM LOCATION CODE FILE
46 PIG-P/F 1;19 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1)!'(X?1"1"!(X?1"2")) X
  • LAST EDITED:  JAN 26, 1993
  • HELP-PROMPT:  Answer must be 1 character in length.
50 EXPORTED Y/N 0;26 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>1!($L(X)<1)!'(X?1"Y"!(X?1"N")) X
  • LAST EDITED:  MAR 12, 1992
  • HELP-PROMPT:  Answer must be 1 character (Y or N) in length.
  • DESCRIPTION:  
    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".
  • TECHNICAL DESCR:  
    Y:HAS BEEN EXPORTED N/BLANK:HAS NOT BEEN EXPORTED
51 DELETE FLAG 0;27 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1)!'(X?1"D") X
  • LAST EDITED:  JAN 21, 1992
  • HELP-PROMPT:  Answer must be a "D"...indicating WITHHOLD from SCHEDULE.
  • DESCRIPTION:  
    Enter a "D" to cause this payment to be withheld from next export.
  • TECHNICAL DESCR:  
    D:WITHHOLD THIS PAYMENT FROM EXPORTING WITH THIS BATCH
52 DATE OF SERVICE 1;14 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 20, 1992
  • HELP-PROMPT:  Enter a date in format: mm-dd-yy, mmddyy, mm/dd/yy, etc.
  • DESCRIPTION:  
    THE DATE OF SERVICES
  • TECHNICAL DESCR:  
    DATE FIELD, NO TIME MAY BE ENTERED.
55 CERTIFIED FLAG 1;17 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>1!($L(X)<1)!'(X?1"+") X
  • LAST EDITED:  AUG 17, 1992
  • HELP-PROMPT:  Answer must be 1 "+" character. INDICATES BATCH IS CERTIFIED.
  • DESCRIPTION:  
    Enter "+" to indicate that the schedule this record is on has been certified.
  • TECHNICAL DESCR:  
    "+" INDICATES THE SCHEDULE CONTAINING THIS PAYMENT RECORD HAS BEEN CERTIFIED
56 VENDOR-EIN-SFX 1;20 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2) X
  • LAST EDITED:  MAR 31, 1993
  • HELP-PROMPT:  Answer must be 2 characters in length.
57 APPROPRIATION 1;21 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>18!($L(X)<1) X
  • LAST EDITED:  AUG 18, 1994
  • HELP-PROMPT:  Answer must be 1-18 characters in length.
58 PAY-ID 1;22 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>12!($L(X)<1) X
  • LAST EDITED:  JUN 30, 1995
  • HELP-PROMPT:  Answer must be 1-12 characters in length.
59 ORIGINAL OBLIG.AMT 1;23 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999.99)!(X<0)!(X?.E1"."3N.N) X
  • LAST EDITED:  DEC 02, 1994
  • HELP-PROMPT:  Type a Number between 0 and 99999999.99, 2 Decimal Digits
60 OBLIG.-DATE OF 1;24 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 02, 1994
  • HELP-PROMPT:  Enter appropriate date.
61 DOC-YEAR 1;25 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 22, 1994
  • HELP-PROMPT:  Type a Number between 0 and 9, 0 Decimal Digits
62 PMT DUE-DATE 2;1 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 14, 1995
  • HELP-PROMPT:  Enter appropriate date.
63 ACH ADDENDUM 2;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  JUL 02, 1996
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
64 ACHT-POINTER 2;3 POINTER ** TO AN UNDEFINED FILE **

  • LAST EDITED:  AUG 05, 1996
  • HELP-PROMPT:  Enter a valid entry from ACH-TRAVELERS file
65 ACHV-POINTER 2;4 POINTER ** TO AN UNDEFINED FILE **

  • LAST EDITED:  AUG 05, 1996
  • HELP-PROMPT:  Enter a valid entry from the FMS AFP ACH-VENDORS file.
91 BEGIN DATE 3;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>6!($L(X)<4) X
  • LAST EDITED:  APR 02, 1999
  • HELP-PROMPT:  Answer must be 4-6 characters in length.
  • DESCRIPTION:  
    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.
92 END DATE 3;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>6!($L(X)<4) X
  • LAST EDITED:  APR 02, 1999
  • HELP-PROMPT:  Answer must be 4-6 characters in length.
  • DESCRIPTION:  
    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.
93 2FY 3;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2) X
  • LAST EDITED:  SEP 19, 1998
  • HELP-PROMPT:  Answer must be 2 characters in length. It is the two digit fiscal year (YY) of the document.
  • DESCRIPTION:  
    This is the 2 digit fiscal year (YY) 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.
94 INVOICE NUMBER 3;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  APR 02, 1999
  • HELP-PROMPT:  Vendor payment invoice number. Answer must be 1-20 characters in length.
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  All