Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR  | All
Print Page as PDF
Global: ^RCD(340

Package: Accounts Receivable

Global: ^RCD(340


Information

FileMan FileNo FileMan Filename Package
340 AR DEBTOR Accounts Receivable

Description

Accessed By FileMan Db Calls, Total: 37

Package Total Routines
Accounts Receivable 34 PRCA355P    PRCAAPR    PRCABIL    PRCABJ1    PRCAG    PRCAMARK    PRCAREPT    PRCARPU
PRCASVC    PRCATE1    PRCATR3    RCAM    RCAMINS    RCBDPSLM    RCBEUDEB    RCCPCPS
RCDPAPLM    RCDPCSA    RCDPEAD3    RCDPEFA1    RCDPEFA3    RCDPURET    RCEVGEN    RCEVUTL
RCKATP    RCRCALB    RCRCVLB    RCRPNP    RCRPU    RCTCS1    RCTCSJS    RCTCSP4
RCTCSP4E    RCXFMSUV    
Integrated Billing 3 IBJDF51    IBJDF61    IBOHLS2    

Pointed To By FileMan Files, Total: 4

Package Total FileMan Files
Accounts Receivable 4 ACCOUNTS RECEIVABLE(#430)[9]    AR EVENT(#341)[.05]    AR CCPC STATEMENTS(#349.2)[.01]    AR REPAYMENT PLAN(#340.5)[.02]    

Pointer To FileMan Files, Total: 7

Package Total FileMan Files
Kernel 3 INSTITUTION(#4)[.01]    STATE(#5)[1.05]    NEW PERSON(#200)[.01, 1.1, #340.08(.03)]
Accounts Receivable 1 AR REPAYMENT PLAN(#340.5)[#340.09(.01)]    
IFCAP 1 VENDOR(#440)[.01, .06]    
Integrated Billing 1 INSURANCE COMPANY(#36)[.01]    
Registration 1 PATIENT(#2)[.01]    

Fields, Total: 57

Field # Name Loc Type Details
.01 DEBTOR 0;1 VARIABLE POINTER
************************REQUIRED FIELD************************
PATIENT(#2)  NEW PERSON(#200)  INSURANCE COMPANY(#36)  INSTITUTION(#4)  VENDOR(#440)  

  • LAST EDITED:  OCT 10, 1996
  • DESCRIPTION:  This field contains the debtor to which this account belongs to. An account can belong to an insurance company, vendor, institution, person, or patient. Accounts can be set up for Medical Care Cost Recovery charges and
    also for non-benefit debts, such as: Employee bills, Ex-employee bills, and Vendor bills.
  • PRE-LOOKUP:  S:$D(PRCABT) DIC("V")="I +Y(0)="_$P("440!(+Y(0)=4)^440!(+Y(0)=4)^440!(+Y(0)=200)",U,PRCABT) S:$D(PRCAT) DIC("V")="I +Y(0)="_$S("CP"[PRCAT:2,"FV"[PRCAT:440,"T"[PRCAT:36,"N"[PRCAT:4,"O"[PRCAT:200,1:"200!(+Y(0)=440)")
  • CROSS-REFERENCE:  340^B
    1)= S ^RCD(340,"B",$E(X,1,30),DA)=""
    2)= K ^RCD(340,"B",$E(X,1,30),DA)
    3)= Needed for look-up of information by Debtor
    This is the regular FileMan 'B' cross-reference and is used throughout the AR package for users to look up information by debtor.
  • CROSS-REFERENCE:  ^^TRIGGER^340^.03
    1)= X ^DD(340,.01,1,2,1.3) I X S X=DIV S Y(1)=$S($D(^RCD(340,D0,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y X ^DD(340,.01,1,2,1.1) X ^DD(340,.01,1,2,1.4)
    1.1)= S X=DIV S X=$P($G(^RC(342,1,0)),"^",11) S:X X=+X
    1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$S($D(^RCD(340,D0,0)):^(0),1:"") S X=$P(Y(1),U,3)="",Y(2)=X,Y(3)=X S X=Y(0),X=X S X=X[";DPT(",Y=X,X=Y(2),X=X&Y
    1.4)= S DIH=$S($D(^RCD(340,DIV(0),0)):^(0),1:""),DIV=X S $P(^(0),U,3)=DIV,DIH=340,DIG=.03 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    3)= Needed for assigning statement days for patients
    CREATE CONDITION)= STATEMENT DAY=""&(INTERNAL(DEBTOR)[";DPT(")
    CREATE VALUE)= S X=$P($G(^RC(342,1,0)),"^",11) S:X X=+X
    DELETE VALUE)= NO EFFECT
    FIELD)= STATEMENT DAY
    This cross-reference sets the statement day for new patients to the site's statement day.
  • CROSS-REFERENCE:  340^AB^MUMPS
    1)= S ^RCD(340,"AB",$P(X,";",2),DA)=""
    2)= K ^RCD(340,"AB",$P(X,";",2),DA)
    3)= Needed to cross-reference debtor file by 'type' of debtor
    This cross-reference allows rapid look-up of debtors in the debtor file by the 'type' of debtor. There are five types of debtors (Patient, Insurance Company, Institution, Vendor, and Person). This allows the AR software
    to scan the file for only a specific type of debtor rather than having to look at each entry.
.02 PATIENT STATEMENT DETAIL 0;2 SET
  • '0' FOR USE SITE DEFAULT;
  • '1' FOR BRIEF;
  • '2' FOR EXPANDED;

  • LAST EDITED:  FEB 15, 1993
  • DESCRIPTION:  This field is used to determine the amount of detail to be displayed on the patient statement for RX Copay charges. A site can define brief or detailed information for each patient to be displayed on the statement. Brief
    information consists only of the RX # and Fill date, while the expanded information consists of much more (Physician, drug name, etc.).
.03 STATEMENT DAY 0;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>28)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 09, 1993
  • HELP-PROMPT:  Type a Number between 1 and 28, 0 Decimal Digits
  • DESCRIPTION:  A statement day is assigned to all types of debtors, except insurance companies. A statement day is the day that a patient statement is generated or a follow-up letter is generated for non-benefit debts. The AR package
    will hold 'notifications' from being sent until the debtors 'statement day' arrives. This allows all activity since the previous statement to print and update the debtor on the account activity.
    Patient statement days never change, but Institution, Person, and Vendor statement days are changed by the AR software. When these type debtors have a new active bill, the date the new active bill is created becomes their
    'statement day'. This statement day remains in effect until no active bills exist for the debtor, at which time the statement day is 'deleted'.
    Insurance companies are notified based on a bill-specific date. Since insurance companies have much more activity, they are notified on a constant basis depending on each individual bill 'due-date'.
  • NOTES:  TRIGGERED by the DEBTOR field of the AR DEBTOR File
  • CROSS-REFERENCE:  340^AC
    1)= S ^RCD(340,"AC",$E(X,1,30),DA)=""
    2)= K ^RCD(340,"AC",$E(X,1,30),DA)
    3)= Needed for printing of patient statements and follow-up letters
    This cross-reference is used to print patient statements and Vendor, Person, and Institution follow-up letters. Since these type of debtors get notified based on their statement day, this cross-reference allows rapid
    look-up of which debtor is due a notification on a particular day.
.05 RECEIVABLE CODE 0;5 SET
  • '0' FOR DEFAULT;
  • '1' FOR FEDERAL;
  • '2' FOR NON-FEDERAL;
  • '3' FOR OWCP;

  • LAST EDITED:  AUG 13, 1997
  • DESCRIPTION:  
    This field identifies the type of of debtor
.06 VENDOR LINK 0;6 POINTER TO VENDOR FILE (#440) VENDOR(#440)

  • LAST EDITED:  SEP 01, 1998
  • HELP-PROMPT:  Enter the vendor from file 440 (IFCAP Vendor File).
  • DESCRIPTION:  
    This field is used to link a vendor from file 440 to a debtor that is not a vendor debtor. It is used to get the vendor ID to send to FMS on Billing Documents (BDs).
.08 ACCT. PROCESSED (KATRINA) 0;8 SET
  • '1' FOR YES;

  • LAST EDITED:  DEC 13, 2005
  • DESCRIPTION:  This field will be set by the software whenever a debtor is processed for a possible refund of payments made to interest and/or administrative charges that were charged inappropriately during the Hurricane Katrina
    emergency period. A '1' in this field indicates that the account was already processed and should not be processed again.
  • TECHNICAL DESCR:  
    The software automatically sets this field to 1 whenever a veteran's account is processed by the AR hurricane Katrina software. It prevents this account from being processed again.
.09 COPAY CHARGES CANCELLED? 0;9 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  MAR 07, 2006
  • DESCRIPTION:  
    This field is used to flag debtors, who were affected by Hurricane Katrina, who had copay charges from 8/29/05 through 2/28/06 cancelled by patch PRCA*4.5*241.
  • TECHNICAL DESCR:  
    This field will be automatically set by routine RCKATP during the patch PRCA*4.5*241 post initialization, when copay charges for veterans affected by Hurricane Katrina are being cancelled.
.12 LAST DATE ACCT CHARGED ADMIN .1;2 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 19, 2000
  • HELP-PROMPT:  This field is internally populated by AR. This field contains the date the account was last charged an administrative fee.
  • DESCRIPTION:  
    This field is used to track the last date the account was charged an administrative charge.
1.01 STREET ADDRESS #1 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  APR 26, 2024
  • HELP-PROMPT:  Answer must be 1-40 characters in length.
  • DESCRIPTION:  For patients, the MCCR/Fiscal staff can enter a 'billing address' that will over-ride the address fields in the patient file. This is necessary for patients that may be incompetent and may need to have a separate billing
    address from their home address. Once the MAS package supports 'billing addresses', then the AR software will incorporate this functionality from the MAS package.
    This field will be displayed as the first address field on patient statements and profiles.
  • CROSS-REFERENCE:  ^^TRIGGER^340^1.1
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    CREATE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    DELETE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    FIELD)= DEBTOR ADDR UPDATED BY
    This trigger updates the DEBTOR ADDR UPDATED BY field (#1.1).
1.02 STREET ADDRESS #2 1;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  APR 26, 2024
  • HELP-PROMPT:  Answer must be 1-40 characters in length.
  • DESCRIPTION:  For patients, the MCCR/Fiscal staff can enter a 'billing address' that will over-ride the address fields in the patient file. This is necessary for patients that may be incompetent and may need to have a separate billing
    address from their home address. Once the MAS package supports 'billing addresses', then the AR software will incorporate this functionality from the MAS package.
    This field will be displayed as the second address field on patient statements and profiles.
  • CROSS-REFERENCE:  ^^TRIGGER^340^1.1
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    CREATE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    DELETE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    FIELD)= DEBTOR ADDR UPDATED BY
    This trigger updates the DEBTOR ADDR UPDATED BY field (#1.1).
1.03 STREET ADDRESS #3 1;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  APR 26, 2024
  • HELP-PROMPT:  Answer must be 1-40 characters in length.
  • DESCRIPTION:  For patients, the MCCR/Fiscal staff can enter a 'billing address' that will over-ride the address fields in the patient file. This is necessary for patients that may be incompetent and may need to have a separate billing
    address from their home address. Once the MAS package supports 'billing addresses', then the AR software will incorporate this functionality from the MAS package.
    This field will be displayed as the third address field on patient statements and profiles.
  • CROSS-REFERENCE:  ^^TRIGGER^340^1.1
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    CREATE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    DELETE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    FIELD)= DEBTOR ADDR UPDATED BY
    This trigger updates the DEBTOR ADDR UPDATED BY field (#1.1).
1.04 CITY 1;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
  • LAST EDITED:  APR 26, 2024
  • HELP-PROMPT:  Answer must be 1-40 characters in length.
  • DESCRIPTION:  For patients, the MCCR/Fiscal staff can enter a 'billing address' that will over-ride the address fields in the patient file. This is necessary for patients that may be incompetent and may need to have a separate billing
    address from their home address. Once the MAS package supports 'billing addresses', then the AR software will incorporate this functionality from the MAS package.
    This field will be displayed as the city field on patient statements and profiles.
  • CROSS-REFERENCE:  ^^TRIGGER^340^1.1
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    CREATE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    DELETE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    FIELD)= DEBTOR ADDR UPDATED BY
    This trigger updates the DEBTOR ADDR UPDATED BY field (#1.1).
1.05 STATE 1;5 POINTER TO STATE FILE (#5) STATE(#5)

  • LAST EDITED:  APR 26, 2024
  • DESCRIPTION:  For patients, the MCCR/Fiscal staff can enter a 'billing address' that will over-ride the address fields in the patient file. This is necessary for patients that may be incompetent and may need to have a separate billing
    address from their home address. Once the MAS package supports 'billing addresses', then the AR software will incorporate this functionality from the MAS package.
    This field will be displayed as the state address field on patient statements and profiles.
  • CROSS-REFERENCE:  ^^TRIGGER^340^1.1
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    CREATE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    DELETE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    FIELD)= DEBTOR ADDR UPDATED BY
    This trigger updates the DEBTOR ADDR UPDATED BY field (#1.1).
1.06 ZIP CODE 1;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<5)!'(X?5N!(X?5N1"-"4N)!(X?9N)) X S:$D(X) X=$S(X?5N1"-"4N:$P(X,"-")_$P(X,"-",2),1:X)
  • OUTPUT TRANSFORM:  S:Y?9N Y=$E(Y,1,5)_"-"_$E(Y,6,9)
  • LAST EDITED:  APR 26, 2024
  • HELP-PROMPT:  Answer must be 5-9 characters in length.
  • DESCRIPTION:  For patients, the MCCR/Fiscal staff can enter a 'billing address' that will over-ride the address fields in the patient file. This is necessary for patients that may be incompetent and may need to have a separate billing
    address from their home address. Once the MAS package supports 'billing addresses', then the AR software will incorporate this functionality from the MAS package.
    This field will be displayed as the Zip Code address field on patient statements and profiles.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  ^^TRIGGER^340^1.1
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    CREATE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    DELETE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    FIELD)= DEBTOR ADDR UPDATED BY
    This trigger updates the DEBTOR ADDR UPDATED BY field (#1.1).
1.07 PHONE NUMBER 1;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<4) X
  • LAST EDITED:  APR 26, 2024
  • HELP-PROMPT:  Answer must be 4-20 characters in length.
  • DESCRIPTION:  For patients, the MCCR/Fiscal staff can enter a "billing phone number" that will over-ride the address fields in the Patient file. This is necessary for patients that may be incompetent and may need to have a separate
    phone number from their home phone number. Once the MAS package supports "billing phone numbers", then the AR software will incorporate this functionality from the MAS package.
    This field will be displayed as the phone number on the patient account profiles and bill profiles.
  • CROSS-REFERENCE:  ^^TRIGGER^340^1.1
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    CREATE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    DELETE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    FIELD)= DEBTOR ADDR UPDATED BY
    This trigger updates the DEBTOR ADDR UPDATED BY field (#1.1).
1.08 FOREIGN COUNTRY CODE 1;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  APR 26, 2024
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
  • DESCRIPTION:  
    This field will be used for foreign addresses where the state is a foreign country.
  • CROSS-REFERENCE:  ^^TRIGGER^340^1.1
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    CREATE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    DELETE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    FIELD)= DEBTOR ADDR UPDATED BY
    This trigger updates the DEBTOR ADDR UPDATED BY field (#1.1).
1.09 ADDRESS UNKNOWN 1;9 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  APR 26, 2024
  • DESCRIPTION:  
    This field will indicate whether the address is unknown or not.
  • CROSS-REFERENCE:  ^^TRIGGER^340^1.1
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$S($G(DUZ)>0:DUZ,1:.5) S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,10)=DIV,DIH=340,DIG=1.1 D ^DICR
    CREATE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    DELETE VALUE)= S X=$S($G(DUZ)>0:DUZ,1:.5)
    FIELD)= DEBTOR ADDR UPDATED BY
    This trigger updates the DEBTOR ADDR UPDATED BY field (#1.1).
1.1 DEBTOR ADDR UPDATED BY 1;10 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  APR 26, 2024
  • HELP-PROMPT:  This field is updated by Address Display/Edit and should not be updated manually.
  • DESCRIPTION:  
    This field stores who updated the Debtor Address fields in the AR DEBTOR file.
  • NOTES:  TRIGGERED by the STREET ADDRESS #1 field of the AR DEBTOR File
    TRIGGERED by the STREET ADDRESS #2 field of the AR DEBTOR File
    TRIGGERED by the STREET ADDRESS #3 field of the AR DEBTOR File
    TRIGGERED by the CITY field of the AR DEBTOR File
    TRIGGERED by the STATE field of the AR DEBTOR File
    TRIGGERED by the ZIP CODE field of the AR DEBTOR File
    TRIGGERED by the PHONE NUMBER field of the AR DEBTOR File
    TRIGGERED by the FOREIGN COUNTRY CODE field of the AR DEBTOR File
    TRIGGERED by the ADDRESS UNKNOWN field of the AR DEBTOR File
  • CROSS-REFERENCE:  ^^TRIGGER^340^1.11
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,11),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,11)=DIV,DIH=340,DIG=1.11 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^RCD(340,D0,1)):^(1),1:"") S X=$P(Y(1),U,11),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% S DIH=$G(^RCD(340,DIV(0),1)),DIV=X S $P(^(1),U,11)=DIV,DIH=340,DIG=1.11 D ^DICR
    CREATE VALUE)= NOW
    DELETE VALUE)= NOW
    FIELD)= DEBTOR ADDR LAST UPDATED
    This trigger updates the DEBTOR ADDR LAST UPDATED field (#1.11).
1.11 DEBTOR ADDR LAST UPDATED 1;11 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 26, 2024
  • HELP-PROMPT:  This field is updated by Address Display/Edit and should not be updated manually.
  • DESCRIPTION:  
    This field stores the date and time when the Debtor Address fields in the AR DEBTOR file were updated.
  • NOTES:  TRIGGERED by the DEBTOR ADDR UPDATED BY field of the AR DEBTOR File
2 COMMENT 2;0 WORD-PROCESSING #340.02

  • DESCRIPTION:  
    This field should contain any necessary "general" comments about the debtor. This information will be displayed at the top of the Account Profile.
  • LAST EDITED:  FEB 11, 1993
  • DESCRIPTION:  This field should contain any necessary "general" comments about the debtor. This information will be displayed at the top of the Account Profile. This field could, for example, contain a message to remind the agent
    cashier to remind the patient of an important message.
3.01 ACCOUNT AT DMC? 3;1 SET
  • '1' FOR ACCOUNT FORWARDED TO DMC;

  • LAST EDITED:  AUG 29, 1997
  • DESCRIPTION:  
    This field will contain a '1' if this account has been referred to the Debt Management Center (DMC). It will be automatically set by the AR software upon creation of the DMC Master Record.
  • CROSS-REFERENCE:  340^DMC
    1)= S ^RCD(340,"DMC",$E(X,1,30),DA)=""
    2)= K ^RCD(340,"DMC",$E(X,1,30),DA)
    This cross-reference will be sent if follow-up on an account is being done by the Debt Management Center (DMC).
3.02 DATE SENT TO DMC 3;2 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 31, 1996
  • DESCRIPTION:  
    This is the date the DMC Master Record was created and transmitted.
3.03 DMC DISCOVERY DATE 3;3 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 31, 1996
  • DESCRIPTION:  
    This is the date bill established of the oldest bill referred to DMC.
3.05 CURRENT TOTAL AT DMC 3;5 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999.99)!(X<0) X
  • LAST EDITED:  AUG 29, 1996
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999999.99, 2 Decimal Digits
  • DESCRIPTION:  
    This is the current amount of the debt that has been referred to DMC. This field will be updated by the DMC weekly transmission.
3.06 CURRENT PRINCIPAL AT DMC 3;6 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999.99)!(X<0) X
  • LAST EDITED:  AUG 29, 1996
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999999.99, 2 Decimal Digits
  • DESCRIPTION:  
    This is the current principal amount of the debt that has been referred to DMC. This field will be updated by the DMC weekly transmission.
3.07 CURRENT INTEREST AT DMC 3;7 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999.99)!(X<0) X
  • LAST EDITED:  AUG 29, 1996
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999999.99, 2 Decimal Digits
  • DESCRIPTION:  
    This is the current interest amount of the debt that has been referred to DMC. This field will be updated by the DMC weekly transmission.
3.08 CURRENT ADMIN AT DMC 3;8 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999.99)!(X<0) X
  • LAST EDITED:  AUG 29, 1996
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999999.99, 2 Decimal Digits
  • DESCRIPTION:  
    This is the current admin amount of the debt that has been referred to DMC. This field will be updated by the DMC weekly transmission.
3.09 LESSER WITHHOLDING AMOUNT 3;9 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
  • LAST EDITED:  AUG 07, 1997
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits
  • DESCRIPTION:  This field is used to enter a lesser withholding amount for DMC (Debt Management Center). Currently, when a debtor is identified for withholding by DMC, the full amount that the debtor holds is withheld. An amount in
    this field will allow the DMC to take a lesser amount monthly until the full debt is paid.
3.1 SITE DELETION FLAG 3;10 SET
  • '1' FOR DELETED BY SITE;

  • LAST EDITED:  AUG 12, 1997
  • DESCRIPTION:  This field will be sent whenever a site deletes a debtor from DMC. When the weekly updates encounters this flag, a '0' balance code sheet will be sent to DMC to delete the debtor from their files. However, the debtor
    could be resent with the next master record run.
4.01 ORIGINAL TOP TIN 4;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<9) X
  • LAST EDITED:  JUN 09, 1999
  • HELP-PROMPT:  Answer must be 9 characters in length.
  • DESCRIPTION:  
    This is the SSN or Tax ID number sent to TOP on the original referral document.
  • TECHNICAL DESCR:  
    This field stores the debtor's original SSN or TID sent to TOP. It is necessary because a change in the TIN will cause a type 4 document (Alias name, Alias TIN) to be sent to TOP.
4.02 ORIGINAL TOP DEBTOR NAME 4;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>71!($L(X)<71) X
  • LAST EDITED:  JUN 09, 1999
  • HELP-PROMPT:  Answer must be 71 characters in length.
  • DESCRIPTION:  
    This is the name as sent on the original TOP referral document.
  • TECHNICAL DESCR:  
    This field stores the debtor's original name sent to TOP. It is necessary because a change in the name will cause a type 4 document (Alias name, Alias TIN) to be sent to TOP.
4.03 CURRENT TOP DEBT AMOUNT 4;3 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999999.99)!(X<0) X
  • LAST EDITED:  JUN 09, 1999
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999999999.99, 2 Decimal Digits
  • TECHNICAL DESCR:  This field stores the debt amount currently referred to TOP. This field is used to compare the current amount at TOP with the amount currently eligible for referral. It then sends increases or decreases to TOP. This
    field also appears on the TOP report.
4.04 ALIAS TOP TIN 4;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<9) X
  • LAST EDITED:  JUN 09, 1999
  • HELP-PROMPT:  Answer must be 9 characters in length.
  • DESCRIPTION:  
    This field contains the most current "Alias" TIN sent to TOP.
  • TECHNICAL DESCR:  
    This field contains the current 'Alias' TIN at TOP. This field is set/modified whenever there is a change to the debtor's TIN. A new/modified entry in this field causes a type 4 document to be sent to TOP.
4.05 ALIAS TOP NAME 4;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>71!($L(X)<71) X
  • LAST EDITED:  JUN 09, 1999
  • HELP-PROMPT:  Answer must be 71 characters in length.
  • DESCRIPTION:  
    This field contains the most current "Alias" name sent to TOP
  • TECHNICAL DESCR:  
    This field contains the current 'Alias' name at TOP. This field is set/modified whenever there is a change to the debtor's name. A new/modified entry in this field causes a type 4 document to be sent to TOP.
4.06 TOP DELINQUENCY DATE 4;6 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 22, 1999
  • DESCRIPTION:  This is the date of the oldest active bill currently sent to TOP. This is initially entered upon creation of the master documents and may be changed during the creation of the update documents.The date in this field is
    placed on Recertification and Refund/ Refund Reversal documents.
  • TECHNICAL DESCR:  This date is initially stored with the master documents and is the date account activated of the earliest bill submitted to TOP. This field may be updated during the compilation of update documents. It will be also
    placed on the recertification, refund, and refund reversal documents.
5.01 TOP DEBTOR ADDRESS, LINE 1 5;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  JUN 09, 1999
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This contains the 1st line of the current debtor address transmitted to TOP.
  • TECHNICAL DESCR:  This field (along with the other TOP address fields) is stored when the initial TOP type 2 (address) document is sent to TOP. This (and the other address fields) are checked whenever the TOP udpates are sent. If there is
    a change in address, an updated type 2 document is sent to TOP and the new address is stored in these fields.
5.02 TOP DEBTOR ADDRESS, LINE 2 5;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  JUN 09, 1999
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This contains the 2nd line of the current debtor address transmitted to TOP.
  • TECHNICAL DESCR:  This field (along with the other TOP address fields) is stored when the initial TOP type 2 (address) document is sent to TOP. This (and the other address fields) are checked whenever the TOP udpates are sent. If there is
    a change in address, an updated type 2 document is sent to TOP and the new address is stored in these fields.
5.03 TOP DEBTOR ADDRESS, CITY 5;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<1) X
  • LAST EDITED:  JUN 09, 1999
  • HELP-PROMPT:  Answer must be 1-25 characters in length.
  • DESCRIPTION:  
    This contains the city included in the current debtor address transmitted to TOP.
  • TECHNICAL DESCR:  This field (along with the other TOP address fields) is stored when the initial TOP type 2 (address) document is sent to TOP. This (and the other address fields) are checked whenever the TOP udpates are sent. If there is
    a change in address, an updated type 2 document is sent to TOP and the new address is stored in these fields.
5.04 TOP DEBTOR ADDRESS, STATE 5;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>2!($L(X)<2) X
  • LAST EDITED:  FEB 08, 2000
  • HELP-PROMPT:  Answer must be 2 characters in length.
  • DESCRIPTION:  
    This field is a pointer to the State file. It includes the state from the current address sent to TOP.
  • TECHNICAL DESCR:  This field (along with the other TOP address fields) is stored when the initial TOP type 2 (address) document is sent to TOP. This (and the other address fields) are checked whenever the TOP udpates are sent. If there is
    a change in address, an updated type 2 document is sent to TOP and the new address is stored in these fields.
5.05 TOP DEBTOR ADDRESS, ZIP CODE 5;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>9!($L(X)<5) X
  • LAST EDITED:  JUN 09, 1999
  • HELP-PROMPT:  Answer must be 5-9 characters in length.
  • DESCRIPTION:  
    This contains the Zip Code included in the current debtor address transmitted to TOP.
  • TECHNICAL DESCR:  This field (along with the other TOP address fields) is stored when the initial TOP type 2 (address) document is sent to TOP. This (and the other address fields) are checked whenever the TOP udpates are sent. If there is
    a change in address, an updated type 2 document is sent to TOP and the new address is stored in these fields.
6.01 DATE DEBTOR REFERRED TO TOP 6;1 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUN 30, 1999
  • DESCRIPTION:  
    This contains the date the account was 1st referred to TOP.
  • TECHNICAL DESCR:  
    This is the date that the original Type 1 (Debtor Name, Debtor TIN, Debt number) document was sent to TOP. It is entered automatically by the system when the initial document is generated.
  • CROSS-REFERENCE:  340^TOP^MUMPS
    1)= S ^RCD(340,"TOP",DA,$E(X,1,30))=""
    2)= K ^RCD(340,"TOP",DA)
    This Cross-Reference indicates whether a debtor has been sent to TOP and the date of the reference.
6.02 STOP TOP REFERRAL FLAG 6;2 SET
  • '1' FOR STOP TOP REFERRAL FLAG SET;

  • LAST EDITED:  JUN 09, 1999
  • DESCRIPTION:  
    This flag is set whenver a 'Stop TOP Referral' is entered by the user through the menu option RCTOP STOP REFERRAL.
  • TECHNICAL DESCR:  This field is set whenever a Stop Referral is entered through the user option. This flag is also deleted by the user option. If the debtor has already been referred to TOP, entry of this field will 'zero out' the account
    at TOP with the next update.
6.03 STOP TOP REFERRAL EFF. DATE 6;3 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUN 09, 1999
  • DESCRIPTION:  
    This field contains a date, for which bills generated after, are eligible for TOP referral.
  • TECHNICAL DESCR:  This field is optionally set whenever a Stop Referral is entered through the user option. It allows for the referral to TOP of future bills. Bills generated after this effective date will be eligible for referral to TOP.
    To 'Stop TOP Referral' indefinitely, no entry should be made in this field.
6.04 STOP TOP REFERRAL REASON 6;4 SET
  • 'W' FOR WAIVER;
  • 'B' FOR BANKRUPTCY;
  • 'N' FOR NOT FORWARDED BY AAC;
  • 'O' FOR OTHER;
  • 'R' FOR REJECTED BY TOP;

  • LAST EDITED:  FEB 08, 2000
  • DESCRIPTION:  
    This field contains a code ,detailing the reason TOP referral was stopped.
  • TECHNICAL DESCR:  This field is set whenever a Stop Referral is entered through the user option. The user must enter one of the codes.
    It contains one of 4 codes: Waiver ("W"), Bankruptcy ("B"), Not Forwarded by AAC ("N") or Other("O").
6.05 STOP TOP REFERRAL COMMENT 6;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  JUN 09, 1999
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
  • DESCRIPTION:  
    This field must be answered whenever a reason of 'Other' is entered for stopping TOP referral.
  • TECHNICAL DESCR:  
    This field is set whenever a Stop Referral is entered through the user option with a referral reason of Other. It contains a free text comment, detailing the reason for Stopping Referral.
6.06 TOP REFERRAL HOLD DATE 6;6 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUN 09, 1999
  • DESCRIPTION:  
    This field contains the date the Vendor or Ex-Employee referral will be forwarded to TOP by the AAC.
  • TECHNICAL DESCR:  
    This field is set for a vendor or ex-employee referral, since the AAC will hold the referral for 60 days before referring the debt to TOP.
6.07 CURRENT TOP TRACE NUMBER 6;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<10) X
  • LAST EDITED:  JUN 09, 1999
  • HELP-PROMPT:  Answer must be 10 characters in length.
  • DESCRIPTION:  
    This is the number assigned by TOP to the last payment from the debtor.
  • TECHNICAL DESCR:  This field is set/modified whenever a TOP payment is entered. It contains the number assigned by TOP to the payment. This field will be used if it is necessary to send a refund document to TOP. It will store the last
    trace number provided by TOP..
7.02 TCSP RECALL FLAG 7;2 SET
  • '1' FOR TCSP RECALL FLAG SET;

  • LAST EDITED:  APR 06, 2014
  • HELP-PROMPT:  Type a '1' to set the Cross-Servicing recall flag.
  • DESCRIPTION:  
    The flag that marks this debtor for recall from Cross-Servicing together with all of the debts at Cross-Servicing.
7.03 TCSP RECALL DATE 7;3 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 06, 2014
  • HELP-PROMPT:  Type the date that the recall was sent to Cross-Servicing.
  • DESCRIPTION:  
    The date that the Cross-Servicing recall record was sent to Cross-Servicing.
7.04 TCSP RECALL REASON 7;4 SET
  • '03' FOR BANKRUPTCY WITH AUTOMATIC STAY;
  • '05' FOR DEBTOR IS DISABLED WITH INABILITY TO PAY;
  • '06' FOR DEBTOR IS DECEASED;

  • LAST EDITED:  MAY 08, 2014
  • HELP-PROMPT:  Type a reason code for the recall from Cross-Servicing.
  • DESCRIPTION:  
    The reason that the debtor is being recalled from Cross-Servicing. Select from: '03' for bankruptcy, '05' for debtor is disabled with inability to pay, '06' for debtor is deceased.
7.05 DATE DEBTOR REFERRED TO TCSP 7;5 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 04, 2014
  • HELP-PROMPT:  Type the date that the debt was referred to Cross-Servicing.
  • DESCRIPTION:  
    The date that the debtor was first referred to Cross-Servicing.
  • CROSS-REFERENCE:  340^TCSP^MUMPS
    1)= S ^RCD(340,"TCSP",DA)=""
    2)= K ^RCD(340,"TCSP",DA)
    This Cross-Reference indicates whether a debtor has been sent to Cross-Servicing.
8 TCSP REFERRAL STOP FLAG 8;0 SET Multiple #340.08 340.08

  • LAST EDITED:  MAR 21, 2019
  • DESCRIPTION:  
    This multiple is for stoping and reactivating TCSP referrals for debtor
9 AR REPAYMENT PLANS 9;0 POINTER Multiple #340.09 340.09

  • DESCRIPTION:  
    This field contains links to AR REPAYMENT PLAN file (#340.5) for each plan the Debtor is associated with.
110 SSN COMPUTED

  • MUMPS CODE:  S X=$$SSN^RCFN01($P(^RCD(340,D0,0),"^"))
  • ALGORITHM:  S X=$$SSN^RCFN01($P(^RCD(340,D0,0),"^"))
  • LAST EDITED:  FEB 12, 1993
  • DESCRIPTION:  
    This field is used to display the SSN of patient and persons on AR reports or local reports.
111 LARGE PRINT NEEDED ON STMT 0;7 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  NOV 15, 2004
  • DESCRIPTION:  
    This field will identify 1st party debtors requiring statements with large print.
112 LOCAL PRINT 10;1 SET (BOOLEAN Data Type)
  • statements to print.

  • LAST EDITED:  MAY 19, 2022
  • HELP-PROMPT:  This field will be set to 1 if there is an over size statement that must be printed locally.
  • DESCRIPTION:  This field is used as a flag to indicate if the debtor has oversized statements to be manually printed on a local printer. It will set to 0 or null if there are no oversized statements to be printed or 1 if there are
    statements to print.
  • CROSS-REFERENCE:  340^ALOCAL
    1)= S ^RCD(340,"ALOCAL",$E(X,1,30),DA)=""
    2)= K ^RCD(340,"ALOCAL",$E(X,1,30),DA)
    Cross reference for statements queued to print locally.
113 LOCAL PRT DATA 10;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
    MAXIMUM LENGTH: 80
  • LAST EDITED:  OCT 28, 2022
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
  • DESCRIPTION:  
    This field is used to capture a copy of the internal BBAL variable for a statement flagged as oversize for later manual printing to a local printer. The field is cleared when the local print field flag is cleared.

ICR, Total: 3

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #284
  • IFCAP
    		•
    ICR #3347
  • Integrated Billing
  • Registration
    		•  DEBTOR (.01).
    Access: Direct Global Read & w/Fileman

    SSN (110).
    Access: Read w/Fileman

    X-REF ("B").
    Access: Direct Global R/W & w/Fileman

    STREED ADDRESS #1 (1.01).
    Access: Direct Global R/W & w/Fileman

    STREET ADDRESS #2 (1.02).
    Access: Direct Global R/W & w/Fileman

    STREET ADDRESS #3 (1.03).
    Access: Direct Global R/W & w/Fileman

    CITY (1.04).
    Access: Direct Global R/W & w/Fileman

    STATE (1.05).
    Access: Direct Global R/W & w/Fileman

    ZIP CODE (1.06).
    Access: Direct Global R/W & w/Fileman

    PHONE NUMBER (1.07).
    Access: Direct Global R/W & w/Fileman

    FOREIGN COUNTRY CODE (1.08).
    Access: Direct Global R/W & w/Fileman

    ADDRESS UNKNOWN (1.09).
    Access: Direct Global R/W & w/Fileman

    		 The fields DEBTOR and SSN are being used by thefollowing Diagnostic Measures reports: First Party Follow-up Report,CHAMPVA/CHAMPUS (Tricare) Follow-up Report, Repayment Plan Follow-up Reportand the AR Productivity Report.The "B Cross-Reference and the address fields on the 1node are used to build HL7 messages for the PFSS project.
    ICR #3633
  • M DATA EXTRACTOR
    		•
    Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR  | All