Global: ^RCY(344.1

FileMan FileNo	FileMan Filename	Package
344.1	AR DEPOSIT	Accounts Receivable

Package	Total	Routines
Accounts Receivable	28	PRCAI164 RC45P306 RCBEPAY RCBEPAY2 RCDPDPL1 RCDPDPLM RCDPDPLU RCDPE215 RCDPEAP RCDPEM RCDPEM0 RCDPEM1 RCDPEWLA RCDPLPS1 RCDPR215 RCDPRPL3 RCDPTAR RCDPTAR2 RCDPUDEP RCDPUREC RCDPUT RCDPXFIX RCDPXPAP RCRJRCO2 RCRJRDEP RCXFMSCR ^RCY(344.1 RCXVDC8

Package	Total	Routines
Accounts Receivable	7	RCDPDPLM RCDPE215 RCDPEM0 RCDPEWL4 RCDPTAR RCDPUDEP RCDPUT

Package	Total	FileMan Files
Accounts Receivable	2	AR BATCH PAYMENT(#344)[.06] EDI LOCKBOX DEPOSIT(#344.3)[.03]

Package	Total	FileMan Files
Accounts Receivable	1	AR GROUP(#342.1)[.13, .17]
Kernel	1	NEW PERSON(#200)[.06, .08, .1]

Fields, Total: 21

Field #	Name	Loc	Type	Details
.01	TICKET #	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>9!($L(X)<6) X D CHK^RCDPUDEP` LAST EDITED: `MAY 10, 2013` HELP-PROMPT: `Answer must be 7 characters in length. 9 digits can only be entered by automated payments.` DESCRIPTION: `Deposit Ticket Number as assigned by Dept. of Treasury.` `The Pre-Lookup (D LOOKUP^RCDPUDEP) places the following limits on entering Deposit Ticket Number data when entered via the appropriate user option:` `Limited to 7 characters in the format of one alpha character` `followed by six digits.` `Ticket Deposit Numbers of 9 digits is limited to Lockbox Automated Deposit Process.` TECHNICAL DESCR: `Patch PRCA4.5257 updates the Data Definition to conform to the fact that Consolidated Copayment Processing Center will start transmitting Deposit Ticket Numbers of 9 digits for credit card payment received from a new` `Lockbox Bank.` `Patch PRCA4.5297 updates site entered Deposit Ticket Number be limited to a 7-character that is in the format of one alpha character followed by 6 digits.` PRE-LOOKUP: `D LOOKUP^RCDPUDEP` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `344.1^B` `1)= S ^RCY(344.1,"B",$E(X,1,30),DA)=""` `2)= K ^RCY(344.1,"B",$E(X,1,30),DA)`
.02	*DATE PRESENTED TO BANK	0;2	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y,X1=DT,X2=-60 D C^%DTC S SX=X,X=Y K:Y<1!(YDT) X` LAST EDITED: `AUG 05, 1998` HELP-PROMPT: DESCRIPTION: `*** This field is no longer used. ***` EXECUTABLE HELP: `W !,"Deposit CAN NOT be more than 60 days old or a Future date. Please contact the Austin Finance Center if that is the actual date of the Deposit."` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
.03	BANK DEPOSIT DATE	0;3	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y,X1=DT,X2=-60 D C^%DTC S SX=X,X=Y K:Y<1!(YDT) X` LAST EDITED: `AUG 05, 1998` HELP-PROMPT: DESCRIPTION: `Date deposit was actually recorded by bank or financial institution.` EXECUTABLE HELP: `W !,"Deposit CAN NOT be more than 60 days old or a Future Date. Please contact the Austin Finance Center if that is the actual date of the Deposit."` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
.04	AMOUNT OF DEPOSIT	0;4	NUMBER	INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999999.99)!(X<0) X` OUTPUT TRANSFORM: `S Y="$"_$J(Y,1,2)` LAST EDITED: `AUG 31, 2000` HELP-PROMPT: `Type a Dollar Amount between 0 and 99999999.99, 2 Decimal Digits` DESCRIPTION: `This field is used for display purposes only. It is the total dollars for all receipts under the deposit. The field is populated when the deposit is confirmed.`
.05	BANK TRACE NUMBER	0;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>9!($L(X)<3) X` LAST EDITED: `MAY 16, 1994` HELP-PROMPT: `Answer must be 3-9 characters in length.` DESCRIPTION: `Number assigned by financial institution to track the deposit.`
.06	OPENED BY	0;6	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `AUG 05, 1998` DESCRIPTION: `User that opened/created deposit ticket.`
.07	DATE/TIME OPENED	0;7	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1!(Y>(DT+1)) X` LAST EDITED: `AUG 05, 1998` DESCRIPTION: `This is the date the AR DEPOSIT ticket was created and made available for Receipts to be associated to this deposit ticket.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
.08	*DEPOSITED BY	0;8	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `AUG 05, 1998` DESCRIPTION: `*** This field is no longer used. ***`
.09	*DATE/TIME DEPOSITED	0;9	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1!(Y>(DT+1)) X` LAST EDITED: `AUG 05, 1998` DESCRIPTION: `*** This field is no longer used. ***` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
.1	CONFIRMED BY	0;10	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `AUG 05, 1998` DESCRIPTION: `User which confirmed deposit was made by bank and transmits FMS document.`
.11	DATE/TIME CONFIRMED	0;11	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1!(Y>(DT+1)) X` LAST EDITED: `AUG 05, 1998` DESCRIPTION: `System date/time deposit was confirmed.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
.12	STATUS	0;12	SET	'1' FOR OPEN; '2' FOR DEPOSITED(not used); '3' FOR CONFIRMED; '4' FOR PROCESSED(not used); '5' FOR VOID(not used); LAST EDITED: `AUG 05, 1998` DESCRIPTION: `This field stores the status of the deposit. A deposit which is opened can have new receipts added to it. A confirmed deposit cannot be changed.` CROSS-REFERENCE: `344.1^AC` `1)= S ^RCY(344.1,"AC",$E(X,1,30),DA)=""` `2)= K ^RCY(344.1,"AC",$E(X,1,30),DA)`
.13	BANK	0;13	POINTER TO AR GROUP FILE (#342.1)	AR GROUP(#342.1) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),""^"",2)=9" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `MAY 17, 1994` DESCRIPTION: `Name of bank/financial institution that deposit was made to.` SCREEN: `S DIC("S")="I $P(^(0),""^"",2)=9"` EXPLANATION: `Select only Bank type Groups`
.14	AGENCY LOCATION CODE	0;14	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<3) X` LAST EDITED: `MAY 17, 1994` HELP-PROMPT: `Answer must be 3-10 characters in length.` DESCRIPTION: `ALC assigned by Financial Management.`
.15	*START DATE/TIME	0;15	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUL 28, 1998` DESCRIPTION: `*** This field is no longer used. ***`
.16	*END DATE/TIME	0;16	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUL 28, 1998` HELP-PROMPT: DESCRIPTION: `*** This field is no longer used. ***`
.17	AGENCY TITLE	0;17	POINTER TO AR GROUP FILE (#342.1)	AR GROUP(#342.1) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),""^"",2)=10" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `JUL 22, 1994` DESCRIPTION: `Pointer name of the AR group established for deposits.` SCREEN: `S DIC("S")="I $P(^(0),""^"",2)=10"` EXPLANATION: `Select only Agency Deposit Titles`
.18	TOTAL AMOUNT OF RECEIPTS		COMPUTED	MUMPS CODE: `S X=$$RECTOTAL^RCDPURED(D0)` ALGORITHM: `S X=$$RECTOTAL^RCDPURED(D0)` LAST EDITED: `MAY 10, 1999` DESCRIPTION: `Total amount of all receipts associated with a deposit.`
1	COMMENTS	1;0	WORD-PROCESSING #344.11	LAST EDITED: `OCT 29, 1993` HELP-PROMPT: `Answer must be 3-60 characters in length.` DESCRIPTION: `This field stores comments by the user that better described the deposit ticket. For example, the appropriation and dollar amount deposited to each appropriation could be documented within this word-processing field.` LAST EDITED: `MAY 16, 1994` DESCRIPTION: `This field stores comments by the user that better described the deposit ticket. For example, the appropriation and dollar amount deposited to each appropriation could be documented within this word-processing field.`
100	TOTAL RECEIPTS		COMPUTED	MUMPS CODE: `S X=$$RECCOUNT^RCDPURED(D0)` ALGORITHM: `S X=$$RECCOUNT^RCDPURED(D0)` LAST EDITED: `MAY 10, 1999` DESCRIPTION: `Total number of receipts associated with a deposit.`
200	*FMS DOCUMENT NUMBER	2;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>20!($L(X)<1) X` LAST EDITED: `JUL 28, 1998` HELP-PROMPT: `Answer must be 1-20 characters in length.` DESCRIPTION: `*** This field is no longer used. ***` CROSS-REFERENCE: `344.1^ADOC` `1)= S ^RCY(344.1,"ADOC",$E(X,1,30),DA)=""` `2)= K ^RCY(344.1,"ADOC",$E(X,1,30),DA)` `This cross reference is used for the Deposit Reconciliation Report.`

Name	Field # of Occurrence
^%DT	.02+1, .03+1, .07+1, .09+1, .11+1, .15+1, .16+1
C^%DTC	.02+1, .03+1
^DIC	.13+1, .17+1
Y^DIQ	IDWR2+1
CHK^RCDPUDEP	.01+1
LOOKUP^RCDPUDEP	.01TPL+1
$$RECCOUNT^RCDPURED	100+1
$$RECTOTAL^RCDPURED	.18+1

Name	Line Occurrences (* Changed, ! Killed)
^DD(200	IDWR2+1
^DD(344.1	IDWR4+1
^RCY(344.1 - [#344.1]	IDWR4+1, .01(XREF 1S), .01(XREF 1K), .12(XREF 1S), .12(XREF 1K), 200(XREF 1S), 200(XREF 1K)
^VA(200 - [#200]	IDWR2+1

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	.02+1, .03+1, .07+1, .09+1, .11+1, .15+1, .16+1*
%I	IDWR2+1*!
>> C	IDWR2+1*
>> D0	.18+1, 100+1
>> DA	.01(XREF 1S), .01(XREF 1K), .12(XREF 1S), .12(XREF 1K), 200(XREF 1S), 200(XREF 1K)
DIC	IDWR2+1, .13+1!, .17+1!
DIC("S"	.13+1, .13SCR+1, .17+1, .17SCR+1
>> DIE	.13+1, .17+1
DT	.02+1, .03+1, .07+1, .09+1, .11+1
>> SX	.02+1, .03+1
U	ID1+1, IDWR1+1, IDWR2+1, IDWR3+1, IDWR4+1
X	.01+1!, .01(XREF 1S), .01(XREF 1K), .02+1!, .03+1!, .04+1!, .05+1!, .07+1!, .09+1!, .11+1! , .12(XREF 1S), .12(XREF 1K), .13+1!, .14+1!, .15+1!, .16+1!, .17+1!, .18+1, 100+1, 200+1! , 200(XREF 1S), 200(XREF 1K)
>> X1	.02+1, .03+1
>> X2	.02+1, .03+1
>> Y	IDWR2+1, IDWR4+1, .02+1, .03+1, .04OT+1, .07+1, .09+1, .11+1, .13+1, .15+1 , .16+1, .17+1
>> Y(0	.04OT+1*

Customize PDF page

Package: Accounts Receivable

Global: ^RCY(344.1

Information

Description

Directly Accessed By Routines, Total: 28

Accessed By FileMan Db Calls, Total: 7

Pointed To By FileMan Files, Total: 2

Pointer To FileMan Files, Total: 2

Fields, Total: 21

External References

Global Variables Directly Accessed

Naked Globals

Local Variables

Legend: