STANDARD DATA DICTIONARY #344.73 -- RCDPE COMMENT HISTORY FILE 9/29/25 PAGE 1
STORED IN ^RCY(344.73, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 4.5)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file holds the history of receipt line comments.
DD ACCESS: @
RD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
PRIMARY KEY: A (#46)
Uniqueness Index: C (#1522)
File, Field: 1) RECEIPT # (344.73,.01) 2) LINE NUMBER (344.73,1) 3) USER (344.73,2) 4) DATE/TIME ENTERED (344.73,3)
CROSS
REFERENCED BY: RECEIPT #(B)
INDEXED BY: RECEIPT # & LINE NUMBER & DATE/TIME ENTERED (AC), RECEIPT # & LINE NUMBER & USER & DATE/TIME ENTERED (C)
LAST MODIFIED: JUL 6,2018@15:19:01
344.73,.01 RECEIPT # 0;1 POINTER TO AR BATCH PAYMENT FILE (#344) (Required) (Key field)
LAST EDITED: MAY 26, 2017
HELP-PROMPT: Enter the receipt number.
DESCRIPTION:
This is the receipt number for the comment.
TECHNICAL DESCR:
This field is a pointer to the AR BATCH PAYMENT file #344.
CROSS-REFERENCE: 344.73^B
1)= S ^RCY(344.73,"B",$E(X,1,30),DA)=""
2)= K ^RCY(344.73,"B",$E(X,1,30),DA)
RECORD INDEXES: AC (#1521), C (#1522)
344.73,1 LINE NUMBER 0;2 NUMBER (Required) (Key field)
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1.N) X
LAST EDITED: MAY 26, 2017
HELP-PROMPT: Type a number between 1 and 9999, 0 decimal digits.
DESCRIPTION:
This field is the number of the receipt line that the comment was entered for.
TECHNICAL DESCR:
This is the IEN of the AR BATCH PAYMENT #344.01 TRANSACTION sub-file.
RECORD INDEXES: AC (#1521), C (#1522)
344.73,2 USER 0;3 POINTER TO NEW PERSON FILE (#200) (Required) (Key field)
LAST EDITED: MAY 26, 2017
HELP-PROMPT: Enter the user who entered the receipt line comment.
DESCRIPTION:
This is the user who entered the comment against the receipt line.
TECHNICAL DESCR:
This field is a pointer to the NEW PERSON file #200.
RECORD INDEXES: C (#1522)
344.73,3 DATE/TIME ENTERED 0;4 DATE (Required) (Key field)
INPUT TRANSFORM: S %DT="ESTR" D ^%DT S X=Y K:X<1 X
LAST EDITED: MAY 26, 2017
HELP-PROMPT: Enter the date and time the comment was entered.
DESCRIPTION:
This is the date/time the receipt line comment was entered.
RECORD INDEXES: AC (#1521), C (#1522)
344.73,4 RECEIPT COMMENT 0;5 FREE TEXT (Required)
INPUT TRANSFORM: S X=$$TRIM^XLFSTR(X) K:$L(X)>60!($L(X)<1) X
MAXIMUM LENGTH: 60
LAST EDITED: MAY 16, 2017
HELP-PROMPT: Answer must be 1-60 characters in length.
DESCRIPTION:
This field is the comment entered against the receipt line.
TECHNICAL DESCR:
This field stores a history of comments entered into the receipt file #344.41 field #1.02.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
FILES POINTED TO FIELDS
AR BATCH PAYMENT (#344) RECEIPT # (#.01)
NEW PERSON (#200) USER (#2)
File #344.73
Record Indexes:
AC (#1521) RECORD MUMPS IR SORTING ONLY
Short Descr: Lookup index
Description: This index allows lookup of comment history by receipt, receipt line number and date/time entered.
Set Logic: S ^RCY(344.73,"AC",X(1),X(2),X(3))=DA
Kill Logic: K ^RCY(344.73,"AC",X(1),X(2),X(3))
Whole Kill: K ^RCY(344.73,"AC")
X(1): RECEIPT # (344.73,.01) (Subscr 1) (forwards)
X(2): LINE NUMBER (344.73,1) (Subscr 2) (forwards)
X(3): DATE/TIME ENTERED (344.73,3) (Subscr 3) (forwards)
C (#1522) RECORD REGULAR IR LOOKUP & SORTING
Unique for: Key A (#46), File #344.73
Short Descr: Uniqueness Index for Key 'A' of File #344.73
Description: This is an index by receipt, receipt line number, user and date/time entered used to track changes comment
history.
Set Logic: S ^RCY(344.73,"C",X(1),X(2),X(3),X(4),DA)=""
Kill Logic: K ^RCY(344.73,"C",X(1),X(2),X(3),X(4),DA)
Whole Kill: K ^RCY(344.73,"C")
X(1): RECEIPT # (344.73,.01) (Subscr 1)
X(2): LINE NUMBER (344.73,1) (Subscr 2)
X(3): USER (344.73,2) (Subscr 3)
X(4): DATE/TIME ENTERED (344.73,3) (Subscr 4)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):