Global: ^RC(342

FileMan FileNo	FileMan Filename	Package
342	AR SITE PARAMETER	Accounts Receivable

Package	Total	Routines
Accounts Receivable	61	1ST PARTY AUTO-DECREASE TYPES PATCH POST INIT HISTORY PRCA307P PRCA427P PRCA434P PRCABJ PRCABJ1 PRCAG PRCAGP PRCAGS PRCAGST1 PRCAGU PRCAI162 PRCAP382 PRCAP383 PRCAUDT PRCAUT3 PRCAUTL PRCAWREA RATE EFFECTIVE DATE RC45301P RC45P304 RCBECHGS RCCPC0 RCCPC1 RCCPCBAK RCCPCBJ RCCPCFN RCCPCML RCCPCPS RCCPCSTM RCDMC90 RCDPE FIRST PARTY RCDPEAD3 RCDPEAR RCDPESPC RCDPUDEP RCEXINAD RCFMOBR2 RCFN01 RCMS EDI LOCKBOX RCMSFN01 RCMSITE RCMSNUM RCMSPOST RCP345 RCRJR RCTCS1 RCTCSPD RCTCSPD0 RCTOP1 RCTOP2 RCTOP4 RCTOPD RCXVDEQ RCXVFTR RCXVTSK RCYPO236 TCSP REFERRAL STOP FLAG ^RC(342 RCYPO237
Integrated Billing	1	IBJVDEQ

Package	Total	Routines
Accounts Receivable	21	PRCA355P PRCABJ2 PRCAP298 RC45P304 RCCPCPS RCDPEAD3 RCDPEM RCDPEM7 RCDPESP1 RCDPESP5 RCDPESPC RCMSITE RCSTATU RCXVCHK RCXVDEQ RCXVFTP RCXVFTR RCXVPARM RCXVSRV RCXVTSK RCY173PO
Integrated Billing	1	IBJVDEQ

Package	Total	FileMan Files
Kernel	2	INSTITUTION(#4)[.01] NEW PERSON(#200)[3.04, #342.02(.03)]
Integrated Billing	1	IB ACTION TYPE(#350.1)[#342.014(.01)]
MailMan	1	MAIL GROUP(#3.8)[20.02]

Fields, Total: 53

Field #	Name	Loc	Type	Details
.01	SITE	0;1	POINTER TO INSTITUTION FILE (#4)	**********************REQUIRED FIELD********************** INSTITUTION(#4) INPUT TRANSFORM: `S @("DI"_"NUM")=1` LAST EDITED: `FEB 17, 1993` DESCRIPTION: `This is the site that the AR activity will be tracked for. A station can only have one site defined and multiple divisional sites are not currently supported.` `This identifies charges or events to a particular site in the event that information is shared or sent to a centralized system.` DELETE TEST: `1,0)= I DA=1 W *7,!,"Sorry, I need this entry to manage the AR system (try to edit)"` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `342^B` `1)= S ^RC(342,"B",$E(X,1,30),DA)=""` `2)= K ^RC(342,"B",$E(X,1,30),DA)` `3)= Needed to look-up the site by name` `This cross reference is to allow look-up on the site parameter file by the site name.`
.02	SUPPRESS RIGHTS & OBLIGATIONS	0;2	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `MAY 18, 1993` DESCRIPTION: `Suppression of Rights and Obligations for RX copayment and Means Test bills can be accomplished by setting this parameter to 'YES'. All patients should be given their notice of Rights and Obligations, but some sites may` `wish to have these notices pre-printed or duplicated, rather than having the AR software print them individually.`
.03	LAST BILL NUMBER	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<7) X` LAST EDITED: `MAY 06, 1994` HELP-PROMPT: `Answer must be 7 characters in length.` DESCRIPTION: `This field contains the last number used on bills and FMS transactions.`
.04	UB PRINTER	0;4	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `NEW %ZIS,IOP S %ZIS="NQ",IOP=X D ^%ZIS K:POP X S:'POP X=ION_";"_IOST_";"_IOM_";"_IOSL_";"_$G(IO("DOC")) D ^%ZISC K IO("Q")` LAST EDITED: `MAR 10, 1994` HELP-PROMPT: `Enter a device to queue UB forms to print` DESCRIPTION: `This parameter defines the device to which Universal Billing forms (UBs) for Reimbursable Health Insurance bills are to print. A 'nightly process' is run every night by the AR system and one of the tasks that this process` `runs is the printing of the UB forms. This parameter needs to be set to the device which contains the UB forms for printing.` EXECUTABLE HELP: `NEW D S X="?",DIC="^%ZIS(1,",DIC(0)="EMQ" D ^DIC S DIC=DIE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
.05	PHARMACY COPAY STATEMENT INFO	0;5	SET	'1' FOR BRIEF; '2' FOR EXPANDED; LAST EDITED: `FEB 14, 1993` DESCRIPTION: `This parameter defines the type of information to be displayed on the patient statement for RX copays. Some patients may want to have very detailed information about any RX copay charges on their statement, while others` `may require brief information. This parameter will be the default for ALL patients and will define the amount of information displayed on the patient statement.` `A second related parameter can be defined for each patient that will over-ride this site parameter. For example, if a site decides to have all their patients receive 'brief' information for RX copay charges, then this` `parameter should be set to 'BRIEF'. However, a particular patient may request more detailed information, in which case, this parameter should remain as BRIEF and the parameter for the patient should be set to DETAILED.`
.06	LAST EVENT NUMBER	0;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<7) X` LAST EDITED: `MAY 06, 1994` HELP-PROMPT: `Answer must be 7 characters in length.` DESCRIPTION: `Last number used by event number driver.`
.07	ALC (DEPOSITS)	0;7	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 code as assigned by Financial Management.`
.08	REPORT PRINTER	0;8	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `NEW %ZIS,IOP S %ZIS="NQ",IOP=X D ^%ZIS K:POP X S:'POP X=ION_";"_IOST_";"_IOM_";"_IOSL_";"_$G(IO("DOC")) D ^%ZISC K IO("Q")` LAST EDITED: `MAR 10, 1994` HELP-PROMPT: `Enter the Device to Print Patient Statements, Reports, and Follow-up Letters` DESCRIPTION: `This parameter defines the report printer for the AR system. A 'nightly process' is run every night by the AR system and one of the tasks that this process runs is the printing of the Patient Statements and Follow-up` `reports. This parameter needs to be set to the device that these reports should be printed.` EXECUTABLE HELP: `NEW D S X="?",DIC="^%ZIS(1,",DIC(0)="EMZ" D ^DIC S DIC=DIE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
.09	SUPPRESS ZERO BALANCE	0;9	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `MAY 14, 1993` DESCRIPTION: `This parameter allows the site to suppress printing patient statements that have a zero balance. A patient may have had activity during a particular month that has left the account balance at zero (ex., patient got a` `$2.00 charge and paid it immediately). The system will print this activity to inform the patient on a patient statement. This information, even though the account balance is zero, is printed to confirm the payment was` `applied correctly and also for reimbursement and 'proof' of payment to insurance companies.` `However, some sites may wish not to print these statements and provide the information on a 'as-needed' basis.`
.1	DATE/TIME SYSTEM LAST UPDATED	0;10	DATE	INPUT TRANSFORM: `S %DT="ESTX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `DEC 18, 1993` DESCRIPTION: `This field is set by the system and should not be directly edited. The AR nightly process is suppose to run every night to update interest and administrative charges, print patient statements, print UB bills, create` `refund bills, etc. This parameter is set when this process has completed every night. If the process does not complete, the AR clerk will be warned and IRM should take action to resolve the problem. If the process does` `not run to completion, certain events that must occur may have not be run to completion.`
.11	SITE STATEMENT DAY	0;11	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>28)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `MAR 22, 1996` HELP-PROMPT: `Type a Number between 1 and 28, 0 Decimal Digits` DESCRIPTION: `This is the day of the month that the site will send statements to CCPC.`
.12	LOCAL CCPC STATEMENTS	0;12	SET	'0' FOR NO STATEMENTS TO LOCAL MAIL GROUP; '1' FOR SEND STATEMENTS TO LOCAL MAIL GROUP; LAST EDITED: `MAY 24, 1996` DESCRIPTION: `This answer will determine whether the RCCPC STATEMENTS mail group receives the CCPC Patient Statement transmission messages that go to the CCPC.`
.13	CCPC START-UP DATE	0;13	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `DEC 12, 1996` DESCRIPTION: `This date will reflect the first statement date that the waiver rights statements are printed.`
.14	AUTO-DECREASE FIRST PARTY	0;14	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `JAN 24, 2019` HELP-PROMPT: `Select Yes to enable auto-decreasing of 1st party COPAY claims or No to disable.` DESCRIPTION: `When set to YES, this field will turn on the automatic decrease adjustment of first party co-pays, when payment is received for a related third party claim.`
.15	AUTO-DECREASE FIRST PARTY DAYS	0;15	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>14)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `FEB 06, 2019` HELP-PROMPT: `Enter the number of days to wait before 1st party auto-decrease (0-14)` DESCRIPTION: `This parameter determines the number of days to wait, after auto-posting of a 3rd party ERA, before applying the auto-decrease to an eligible, related 1st party copay.`
.16	METRICS RETENTION DAYS	0;16	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>180)!(X<0)!(X?.E1"."1.N) X` LAST EDITED: `FEB 04, 2022` HELP-PROMPT: `Type a number between 0 and 180, 0 decimal digits.` DESCRIPTION: `This field contains the number of days VistA will retain on-site usage metrics gathered within the AR software package. The maximum number of days to be retained on site will be 365 days. The default # days will be 180.`
2.01	STATEMENT COMMENT 1	2;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>78!($L(X)<1) X` LAST EDITED: `AUG 19, 2002` HELP-PROMPT: `Answer must be 1-78 characters in length` DESCRIPTION: `When printing Patient Statements, the site can have pre-defined text print on the first page of every statement. This parameter defines the first line of free-text comment to be displayed on every patient statement.`
2.02	STATEMENT COMMENT 2	2;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>78!($L(X)<1) X` LAST EDITED: `AUG 19, 2002` HELP-PROMPT: `Answer must be 1-78 characters in length` DESCRIPTION: `When printing Patient Statements, the site can have pre-defined text print on the first page of every statement. This parameter defines the second line of free-text comment to be displayed on every patient statement.` TECHNICAL DESCR: `THIS FIELD IS CURRENTLY DISABLED TO ALLOW PRINTING OF THE "GMT RELATED" MESSAGE.`
3.01	DATE OF MASTER IRS OFFSET	3;1	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="" D ^%DT S X=Y K:Y<1 X K:'$E(Y,4,5)!'$E(Y,6,7) X D:$D(X) IRSM^RCMSDD1` OUTPUT TRANSFORM: `X ^DD("DD") S Y=$P(Y,",")` LAST EDITED: `SEP 30, 1993` DESCRIPTION: `The date entered into this parameter will be the date the system automatically attempts to create IRS MASTER code sheets to be sent to IRS. IRS Master code sheets can only be run certain times of the year. If a site does` `not wish to have these code sheets automatically generated, this field should remain empty and the option should be used to create the IRS master code sheets.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
3.02	DATE OF IRS OFFSET LETTER	3;2	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="" D ^%DT S X=Y K:Y<1 X K:'$E(Y,4,5)!'$E(Y,6,7) X D:$D(X) IRSL^RCMSDD1` OUTPUT TRANSFORM: `X ^DD("DD") S Y=$P(Y,",")` LAST EDITED: `SEP 30, 1993` DESCRIPTION: `The date entered into this parameter will be the date the system automatically attempts to print IRS OFFSET letters to be sent to patients. IRS offset letters can only be printed certain times of the year. If a site does` `not wish to have these letters print automatically, this field should remain empty and the option should be used to print the IRS offset letters.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
3.03	IRS OFFSET AMOUNT	3;3	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>25)!(X<0) X` LAST EDITED: `FEB 26, 1993` HELP-PROMPT: `Type a Dollar Amount between 0 and 25, 2 Decimal Digits` DESCRIPTION: `The IRS charges the VA a fee for each account sent to IRS for offset against IRS refunds. The fee is set each year by IRS and should be entered into this field. The amount entered into this field will be added to the` `total amount forwarded to IRS for each account.` `This fee is only charges to VA if the IRS collects money. The fee is also not added to the AR system since the patient does not owe this money unless the IRS actually offsets a refund.`
3.04	RESPONSIBLE FOR IRS CODESHEETS	3;4	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `OCT 14, 1993` DESCRIPTION: `If a site wishes to have the Master Code sheets or update code sheets generated, a person with a valid electronic signature MUST be entered into this field. If IFCAP package requires that a person be identified as the` `'responsible official' for code sheets. The person entered into this field will be entered as the responsible official with each IRS OFFSET code sheet only.`
3.05	TOP STATION CODE	3;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>2!($L(X)<2) X` LAST EDITED: `AUG 26, 1999` HELP-PROMPT: `Answer must be 2 characters in length.` DESCRIPTION: `This code is a two character alpha-numeric code that is tr ansmitted to Treasury on Treasury Offset documents. It is used to identify the site to Treasury. Without this code, sites will not be able to access their data.`
4	RATE EFFECTIVE DATE	4;0	DATE Multiple #342.04	342.04 DESCRIPTION: `This multiple stores information relating to the interest rate, penalty rate, and administration charges to apply to accounts and bills that are past due. Each year these rates can change and the rate at the time a bill` `is created remains in effect for that bill until it is closed.`
5	BURSTER MACHINE CODE	5;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `OCT 14, 1993` HELP-PROMPT: `This is Standard MUMPS code.` DESCRIPTION: `This is the MUMPS code that will be executed to WRITE out a burster machine mark. The burster machine mark indicates the beginning of a new letter so the machine will 'stuff' the envelope. The write command could be, for` `example, a solid black line so that when the printed document is inserted into the burster machine it recognizes the beginning of a new letter.` `Different burster machines work differently so the manual must be referred to for instructions.` `The mark will appear in the middle of the top-header of patient statements and also at the top of follow-up letters.` `WRITE AUTHORITY: @`
6	INTEGRATED SITE	6;1	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `APR 29, 1996` DESCRIPTION: `This field will used to determine if the sat station prompt should be asked during the creation of a receivable.`
7.02	NUMBER OF DAYS EFT UNMATCHED	7;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `JAN 17, 2002` HELP-PROMPT: `Type a Number between 0 and 99, 0 Decimal Digits` DESCRIPTION: `This field allows the user to select how many days an EFT (electronic funds transfer) shall age before it is reported as unmatched.`
7.03	NUMBER OF DAYS ERA UNMATCHED	7;3	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `DEC 06, 2002` HELP-PROMPT: `Type a Number between 0 and 99, 0 Decimal Digits` DESCRIPTION: `This field allows the user to select how many days an ERA (electronic remittance advice) shall age before it is reported as unmatched.`
7.04	#DAYS ENTRY CAN REMAIN IN SUSP	7;4	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>120)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `AUG 28, 2015` HELP-PROMPT: `Type a number between 1 and 120, 0 decimal digits.` DESCRIPTION: `The number of days a payment can remain in suspense once it has been placed there by the AR staff.` TECHNICAL DESCR: `The number of days a payment can remain in suspense once it has been placed there by the AR staff. The default is 45 days.`
7.05	AUTO-AUDIT MEDICAL PAPER BILLS	7;5	SET	'0' FOR No; '1' FOR Yes; LAST EDITED: `NOV 04, 2015` HELP-PROMPT: `Enter 1 to allow Auto-auditing of Medical Paper bills, 0 to disallow.` DESCRIPTION: `A Yes/No prompt to allow a site to audit their Medical Paper Bills during the AR Nightly Process.` TECHNICAL DESCR: `A Yes/No prompt to see if the site wishes to audit their Medical Paper bills during the AR Nightly Process [PRCA NIGHTLY PROCESS].`
7.06	AUTO-AUDIT RX PAPER BILLS	7;6	SET	'0' FOR No; '1' FOR Yes; LAST EDITED: `NOV 04, 2015` HELP-PROMPT: `Enter 1 to allow Auto-auditing of Pharmacy Paper bills, 0 to disallow` DESCRIPTION: `A Yes/No prompt to see if the site wishes to audit their Pharmacy Paper Bills during the AR Nightly Process.` TECHNICAL DESCR: `A Yes/No prompt to see if the site wishes to audit their Pharmacy Paper bills during the AR Nightly Process [PRCA NIGHTLY PROCESS].`
7.07	AUTO-AUDIT MEDICAL EDI BILLS	7;7	SET	'0' FOR No; '1' FOR Yes; LAST EDITED: `OCT 11, 2017` HELP-PROMPT: `Enter 1 to allow Auto-auditing of Medical EDI bills, 0 to disallow.` DESCRIPTION: `A Yes/No prompt to allow a site to audit their Medical EDI Bills during the AR Nightly Process.` TECHNICAL DESCR: `A Yes/No prompt to allow a site to audit their Medical EDI Bills during the AR Nightly Process [PRCA NIGHTLY PROCESS].`
7.08	AUTO-AUDIT RX EDI BILLS	7;8	SET	'0' FOR No; '1' FOR Yes; LAST EDITED: `OCT 11, 2017` HELP-PROMPT: `Enter 1 to allow Auto-auditing of Pharmacy EDI bills, 0 to disallow.` DESCRIPTION: `A Yes/No prompt to see if the site wishes to audit their Pharmacy EDI Bills during the AR Nightly Process.` TECHNICAL DESCR: `A Yes/No prompt to see if the site wishes to audit their Pharmacy EDI bills during the AR Nightly Process [PRCA NIGHTLY PROCESS].`
7.09	AUTO-AUDIT TRICARE BILLS	7;9	SET	'0' FOR No; '1' FOR Yes; LAST EDITED: `NOV 20, 2018` HELP-PROMPT: `Enter 1 to allow auto-auditing of Tricare Bills, 0 to disallow.` DESCRIPTION: `A Yes/No prompt to allow a site to audit their Tricare Bills during the AR Nightly Process.` TECHNICAL DESCR: `A Yes/No prompt to indicate if the site wishes to audit their Tricare bills during the AR Nightly Process [PRCA NIGHTLY PROCESS].`
8.01	# OF DAYS FOR RD ELIG CHG RPT	8;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>365)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `SEP 19, 2007` HELP-PROMPT: `Type a Number between 1 and 365, 0 Decimal Digits` DESCRIPTION: `This field allows the user to select how many days in the past Rated Disability Changes will be checked for the Rated Disability Eligibility Change Report which is scheduled by IRM to be run on a recurring basis. If no` `value is added in this field the report will default to 31 days.`
8.02	NUMBER OF DAYS FOR DMC REPORTS	8;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>3650)!(X<365)!(X?.E1"."1N.N) X` LAST EDITED: `MAY 19, 2008` HELP-PROMPT: `Type a Number between 365 and 3650, 0 Decimal Digits` DESCRIPTION: `This field allows the user to select how many days in the past bills for episodes of care will be included for the following reports when scheduled by IRM to be run on a recurring basis:` `DMC Debt Validity Report` `DMC Debt Validity Management Report` `Rated Disability Eligibility Change Report` `The minimum value for this field is 365 days (1 year) and the maximum value is 3650 days (10 years). If no value is added in this field the report will default to 365 days.`
9.4	PATCH POST INIT HISTORY	9.4;0	Multiple #342.01	342.01 DESCRIPTION: `This field is used internally by AR to track when post inits are run at sites.`
14	1ST PARTY AUTO-DECREASE TYPES	14;0	POINTER Multiple #342.014	342.014 DESCRIPTION: `This multiple will be used to determine which IB ACTION TYPE(s) are eligible for 1st party auto-decrease when an ERA containing a related third party bill is auto-posted.` INDEXED BY: `ENABLED & CHARGE TYPE (ACE)`
20.01	VITRIA STANDARD DIRECTORY	20;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>25!($L(X)<2) X` LAST EDITED: `NOV 19, 2003` HELP-PROMPT: `Answer must be 2-25 characters in length.` DESCRIPTION: `This field will contain the name of the specific directory into the nightly task will place the data files. This will be the standard directory which Vitria will scan for files to retrieve.`
20.02	MAIL GROUP	20;2	POINTER TO MAIL GROUP FILE (#3.8)	**********************REQUIRED FIELD********************** MAIL GROUP(#3.8) LAST EDITED: `JUL 22, 2003` DESCRIPTION: `This field will point to the mail group that will receive any specific error messages to be received at the user level.`
20.03	DATE OF LAST TRANSMISSION	20;3	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `OCT 17, 2003` DESCRIPTION: `This field will contain the last date that the transmission of a batch occurred. The field will be used to check the validity of a date field in the event someone re-indexes one of the main files used in the CBO AR Data` `Extract.`
20.04	CBO STATUS	20;4	SET	'1' FOR ON; '0' FOR OFF; LAST EDITED: `NOV 19, 2003` DESCRIPTION: `This field will be set to '1' if this system is 'ON' or '0' if this system is 'OFF'. Only test systems will be allowed to 'turn off' the CBO AR Data Extract.`
20.05	MAXIMUM NUMBER RECORDS	20;5	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>5000)!(X<100)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 22, 2003` HELP-PROMPT: `Type a Number between 100 and 5000, 0 Decimal Digits` DESCRIPTION: `This field will be used to split up large data extracts into multiple batches.`
20.06	SYSTEM TYPE	20;6	SET	'T' FOR TEST; 'P' FOR PRODUCTION; LAST EDITED: `NOV 11, 2003` DESCRIPTION: `Designates whether the system is a Test or Production system.`
20.07	LEGACY SITE?	20;7	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `JAN 29, 2004` DESCRIPTION: `This field should be answered 'Yes' if the install site is a legacy site. This field should be answered 'No' if the install site is NOT a legacy site.`
20.08	PRIMARY DOMAIN	20;8	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<5) X` LAST EDITED: `JAN 29, 2004` HELP-PROMPT: `Answer must be 5-30 characters in length inNAME.DOMAIN.EXT format.` DESCRIPTION: `This field should be the domain name of the primary VA site for the legacy site. It is important to have this value in order for acknowledgement messages to be forwarded to the legacy site.`
20.09	EXTRACT RUNNING?	20;9	DATE	INPUT TRANSFORM: `S %DT="EST" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `APR 02, 2004` DESCRIPTION: `This field will be set when the running of CBO AR Data Extract starts. This is to prevent multiple jobs from running at the same time and impacting normal system function.`
30	EMERGENCY RESPONSE BEGIN DATE	30;1	DATE	INPUT TRANSFORM: `S %DT="EST" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `SEP 15, 2005` HELP-PROMPT: `Respond with a date/time of your emergency` DESCRIPTION: `This field stores the date/time the emergency began. When this field is populated, an emergency situation is in effect, which will cause the suspension of TOP and DMC referrals, CCPC statements and interest and admin` `charges from being calculated. If the date falls within this beginning date and the Emergency Response End date, the suspension will take place.` TECHNICAL DESCR: NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `^^TRIGGER^342^31` `1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RC(342,D0,30)):^(30),1:"") S X=$P(Y(1),U,2),X=X S DIU=X K Y S X="" S DIH=$G(^RC(342,DIV(0),30)),DIV=X S $P(^(30),U,2)=DIV,DIH=342,DIG=31 D ^DICR` `2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RC(342,D0,30)):^(30),1:"") S X=$P(Y(1),U,2),X=X S DIU=X K Y S X="" S DIH=$G(^RC(342,DIV(0),30)),DIV=X S $P(^(30),U,2)=DIV,DIH=342,DIG=31 D ^DICR` `CREATE VALUE)= @` `DELETE VALUE)= @` `FIELD)= EMERGENCY RESPONSE END DATE`
31	EMERGENCY RESPONSE END DATE	30;2	DATE	INPUT TRANSFORM: `S %DT="EST" D ^%DT S X=Y K:Y<1 X K:'$G(^RC(342,D0,30)) X K:Y<+$G(^RC(342,D0,30)) X` LAST EDITED: `SEP 27, 2005` HELP-PROMPT: `Please make sure that the Emergency Response Begin Date is populated. The Emergency Response End Date must be after the Emergency Response Begin Date.` DESCRIPTION: `This field stores the date/time the emergency ends. When this field is populated, an emergency situation is in effect, which will cause the suspension of TOP and DMC referrals, CCPC statements and interest and admin` `charges from being calculated. If the date falls within this end date and the Emergency Response Begin date, the suspension will take place.` TECHNICAL DESCR: NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` `TRIGGERED by the EMERGENCY RESPONSE BEGIN DATE field of the AR SITE PARAMETER File`
40	TCSP REFERRAL STOP FLAG	40;0	SET Multiple #342.02	342.02 LAST EDITED: `MAR 21, 2019` DESCRIPTION: `Stop flag to stop or reactivate TCSP referrals for site`
100	CROSS-SERVICING START DATE	CS;1	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAR 14, 2015` HELP-PROMPT: `Enter the date that the Cross-Servicing Process begins.` DESCRIPTION: `The date that the Cross-Servicing Process begins. The Due Process Notification for debts originally less than $25.00 will stop after one year from this date.`
101	STATEMENT SIZE	CCPC;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `FEB 07, 2022` HELP-PROMPT: `Type a number between 1 and 999, 0 decimal digits.` DESCRIPTION: `This field controls the maximum number of lines that appear on a statement.` AUDIT: `YES, ALWAYS` `UNEDITABLE`
102	LOCAL STATEMENT PRINTER	CCPC;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `NEW %ZIS,IOP S %ZIS="NQ",IOP=X D ^%ZIS K:POP X S:'POP X=ION_";"_IOST_";"_IOM_";"_IOSL_";"_$G(IO("DOC")) D ^%ZISC K IO("Q")` `MAXIMUM LENGTH: 30` LAST EDITED: `MAY 12, 2022` HELP-PROMPT: `Enter a device to queue over size statements.` DESCRIPTION: `This parameter defines the local device to which over size` `statements will print.` EXECUTABLE HELP: `NEW D S X="?",DIC="^%ZIS(1,",DIC(0)="EMQ" D ^DIC S DIC=DIE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	3.01OT+1, 3.02OT+1
^RC(342 - [#342]	.01(XREF 1S), .01(XREF 1K), 30(XREF 1S), 30(XREF 1K), 31+1

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	.1+1, .13+1, 3.01+1, 3.02+1, 20.03+1, 20.09+1, 30+1, 31+1, 100+1*
%ZIS	.04+1~, .08+1~, 102+1~*
D	.04(HELP ), .08(HELP ), 102(HELP )
>> D0	30(XREF 1S), 30(XREF 1K), 31+1
>> DA	.01DEL1+1, .01(XREF 1S), .01(XREF 1K), 30(XREF 1S), 30(XREF 1K)
>> DIC	.04(HELP ), .08(HELP ), 102(HELP )
>> DIC(0	.04(HELP ), .08(HELP ), 102(HELP )
>> DIE	.04(HELP ), .08(HELP ), 102(HELP )
>> DIG	30(XREF 1S), 30(XREF 1K)
>> DIH	30(XREF 1S), 30(XREF 1K)
>> DIU	30(XREF 1S), 30(XREF 1K)
DIV	30(XREF 1S), 30(XREF 1K)
DIV(0	30(XREF 1S), 30(XREF 1K)
IO("DOC"	.04+1, .08+1, 102+1
IO("Q"	.04+1!, .08+1!, 102+1!
IOM	.04+1, .08+1, 102+1
ION	.04+1, .08+1, 102+1
IOP	.04+1~, .08+1~, 102+1~*
IOSL	.04+1, .08+1, 102+1
IOST	.04+1, .08+1, 102+1
>> POP	.04+1, .08+1, 102+1
U	30(XREF 1S), 30(XREF 1K)
X	.01(XREF 1S), .01(XREF 1K), .03+1!, .04+1!, .04(HELP ), .06+1!, .07+1!, .08+1!, .08(HELP ), .1+1! , .11+1!, .13+1!, .15+1!, .16+1!, 2.01+1!, 2.02+1!, 3.01+1!, 3.02+1!, 3.03+1!, 3.05+1! , 5+1!, 7.02+1!, 7.03+1!, 7.04+1!, 8.01+1!, 8.02+1!, 20.01+1!, 20.03+1!, 20.05+1!, 20.08+1! , 20.09+1!, 30+1!, 30(XREF 1S), 30(XREF 1K), 31+1!, 100+1!, 101+1!, 102+1!*, 102(HELP )
Y	.1+1, .13+1, 3.01+1, 3.01OT+1, 3.02+1, 3.02OT+1, 20.03+1, 20.09+1, 30+1, 30(XREF 1S) , 30(XREF 1K), 31+1, 100+1
Y(0	3.01OT+1, 3.02OT+1
Y(1	30(XREF 1S), 30(XREF 1K)

Customize PDF page

Package: Accounts Receivable

Global: ^RC(342

Information

Description

Directly Accessed By Routines, Total: 62

Accessed By FileMan Db Calls, Total: 22

Pointer To FileMan Files, Total: 4

Fields, Total: 53

Found Entries, Total: 1

External References

Global Variables Directly Accessed

Naked Globals

Local Variables

Legend:

Name	Field # of Occurrence
^%DT	.1+1, .13+1, 3.01+1, 3.02+1, 20.03+1, 20.09+1, 30+1, 31+1, 100+1
^%ZIS	.04+1, .08+1, 102+1
^%ZISC	.04+1, .08+1, 102+1
^DIC	.04(HELP ), .08(HELP ), 102(HELP )
^DICR	30(XREF 1S), 30(XREF 1K)
^DIM	5+1
IRSL^RCMSDD1	3.02+1
IRSM^RCMSDD1	3.01+1