STANDARD DATA DICTIONARY #347 -- AR FMS DOCUMENT FILE 6/27/25 PAGE 1
STORED IN ^RC(347, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 4.5)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
Information transmitted from the DHCP Accounts Receivable system to the FMS system are sent via records called 'documents'. Once
these documents are transmitted, pertinent information is stored in this field, such as: Status of the document, Bill Number, Fund,
etc. It is necessary to store this information in the event a document needs to be recreated or traced in the event of a system
problem.
Per VHA Directive 10-93-142, this file definition should not be modified.
IDENTIFIED BY:
"WR1": S %I=Y,Y=$S('$D(^(0)):"",$D(^RC(347.1,+$P(^(0),U,2),0))#2:$P(^(0),U,1),1:""),C=$P(^DD(347.1,.01,0),U,2) D Y^DIQ:Y]""
W " ",Y,@("$E("_DIC_"%I,0),0)") S Y=%I K %I
"WR2": W " ",$E($P(^(0),U,5),4,5)_"-"_$E($P(^(0),U,5),6,7)_"-"_$E($P(^(0),U,5),2,3)
"WR3": W " ",@("$P($P($C(59)_$S($D(^DD(347,.03,0)):$P(^(0),U,3),1:0)_$E("_DIC_"Y,0),0),$C(59)_$P(^(0),U,3)_"":"",2),$C(59
),1)")
"WR4": W " ",$P(^(0),U,6)
CROSS
REFERENCED BY: DATE LAST UPDATED(AD), NUMBER(B), FMS DOCUMENT NUMBER(C), IDENTIFIER(D), FMS TRANSMISSION DATE(FMS)
INDEXED BY: DATE LAST UPDATED (AMCCF)
LAST MODIFIED: FEB 14,2023@17:41:43
347,.01 NUMBER 0;1 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: JUN 16, 1994
HELP-PROMPT: Type a Number between 1 and 999999999, 0 Decimal Digits
DESCRIPTION:
Incremental number to record FMS documents in file.
CROSS-REFERENCE: 347^B
1)= S ^RC(347,"B",$E(X,1,30),DA)=""
2)= K ^RC(347,"B",$E(X,1,30),DA)
347,.02 TYPE 0;2 POINTER TO AR FMS DOCUMENT TYPE FILE (#347.1) (Required)
LAST EDITED: MAY 04, 1994
DESCRIPTION:
Type of FMS document being recorded.
347,.03 STATUS 0;3 SET (Required)
'0' FOR NOT-SENT;
'1' FOR SENT;
'2' FOR ACCEPTED;
'3' FOR REJECTED;
LAST EDITED: MAY 04, 1994
DESCRIPTION:
Status to prevent/allow transmission of FMS documents.
347,.05 DATE LAST UPDATED 0;5 DATE (Required)
INPUT TRANSFORM: S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: APR 27, 2020
DESCRIPTION:
System date/time of last activity of entry.
CROSS-REFERENCE: 347^AD
1)= S ^RC(347,"AD",$E(X,1,30),DA)=""
2)= K ^RC(347,"AD",$E(X,1,30),DA)
FIELD INDEX: AMCCF (#848) MUMPS IR ACTION
Short Descr: Updates MCCF indexes for FMS status changes
Description: When any of the defined fields are updated, look up the associated receipt in the AR BATCH PAYMENT
(#344) file by FMS DOCUMENT NUMBER (#200) field in that file. If the AR BATCH PAYMENT (#344)
document is a cash receipt document for an EFT, update the MCCF DATE/TIME (#9) field for the
relevant record in the EDI THIRD PARTY EFT DETAIL (#344.31) file. Otherwise, if this is either an
EDI Lockbox cash receipt document for an ERA or an EDI Lockbox transfer receipt document for an
EFT, update the MCCF DATE/TIME (#9) field in the relevant record in the ELECTRONIC REMITTANCE
ADVICE (#344.4) file.
Set Logic: D FMSSTAT^RCTAS10I(DA) Q
Kill Logic: Q
X(1): DATE LAST UPDATED (347,.05) (forwards)
NO RE-INDEXING ALLOWED!
347,.06 IDENTIFIER 0;6 FREE TEXT (Required)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>20!($L(X)<3) X
LAST EDITED: JUN 16, 1994
HELP-PROMPT: Answer must be 3-20 characters in length.
DESCRIPTION: Identifies what type of entry and internal number that caused an AR FMS document entry.
i.e. T1 = AR transaction (file 433), transaction number 1.
CROSS-REFERENCE: 347^D
1)= S ^RC(347,"D",$E(X,1,30),DA)=""
2)= K ^RC(347,"D",$E(X,1,30),DA)
347,.07 AR BILL NUMBER 0;7 POINTER TO ACCOUNTS RECEIVABLE FILE (#430)
LAST EDITED: JUN 16, 1994
DESCRIPTION:
AR bill number from file 430.
347,.08 AR TRANSACTION 0;8 POINTER TO AR TRANSACTION FILE (#433)
LAST EDITED: JUN 16, 1994
DESCRIPTION:
AR transaction number from file 433.
347,.09 FMS DOCUMENT NUMBER 0;9 FREE TEXT (Required)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>22!($L(X)<10) X
LAST EDITED: AUG 17, 1994
HELP-PROMPT: Answer must be 10-22 characters in length.
DESCRIPTION:
FMS document number sent to FMS.
CROSS-REFERENCE: 347^C
1)= S ^RC(347,"C",$E(X,1,30),DA)=""
2)= K ^RC(347,"C",$E(X,1,30),DA)
347,.1 FMS BATCH NUMBER 0;10 FREE TEXT
INPUT TRANSFORM: K:$L(X)>6!($L(X)<6)!'(X?6N) X
LAST EDITED: JUN 16, 1994
HELP-PROMPT: Answer must be 6 characters in length.
DESCRIPTION:
FMS batch number on a modified document.
347,1.01 FUND 1;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>4!($L(X)<4) X
LAST EDITED: MAY 04, 1994
HELP-PROMPT: Answer must be 4 characters in length.
DESCRIPTION:
FMS accounting FUND. Used for summary documents.
347,1.02 AMOUNT 1;2 NUMBER
INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>999999.99)!(X<-999999.99) X
LAST EDITED: JUL 06, 1994
HELP-PROMPT: Type a Dollar Amount between -999999.99 and 999999.99, 2 Decimal Digits
DESCRIPTION:
Amount of FMS document. Used on Summary documents.
347,1.03 RECEIPT # 1;3 POINTER TO AR BATCH PAYMENT FILE (#344)
LAST EDITED: NOV 10, 1994
DESCRIPTION:
This is the receipt number that was used to create FMS documents.
347,2 FMS TRANSMISSION DATE 2;1 DATE
INPUT TRANSFORM: S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: AUG 19, 2003
DESCRIPTION:
This field contains the date this document was transmitted to FMS.
TECHNICAL DESCR:
UNEDITABLE
CROSS-REFERENCE: 347^FMS
1)= S ^RC(347,"FMS",$E(X,1,30),DA)=""
2)= K ^RC(347,"FMS",$E(X,1,30),DA)
This is a cross-reference on the FMS TRANSMISSION DATE field. That field stores the date that the
document was transmitted to FMS.
FILES POINTED TO FIELDS
ACCOUNTS RECEIVABLE (#430) AR BILL NUMBER (#.07)
AR BATCH PAYMENT (#344) RECEIPT # (#1.03)
AR FMS DOCUMENT TYPE (#347.1) TYPE (#.02)
AR TRANSACTION (#433) AR TRANSACTION (#.08)
INPUT TEMPLATE(S):
RCFM OPEN DOCUMENT JUN 16, 1994@09:54 USER #0
PRINT TEMPLATE(S):
PRCA FMS STATUS JUN 29, 1994@12:28 USER #0 ^PRCATF1 AR FMS DOCUMENT LIST
PRCA FMS TRANS STAT JUN 29, 1994@12:42 USER #0 ^PRCATF2 AR FMS DOCUMENT LIST
PRCA FMS UNPROCESSED LIST AUG 26, 1994@15:12 USER #0 @
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):