Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Pointer To FileMan Files |  Fields |  Found Entries |  All
Print Page as PDF
Global: ^BARFRP(2906

Package: IHS Accounts Receivable

Global: ^BARFRP(2906


Information

FileMan FileNo FileMan Filename Package
90054.01 A/R FLAT RATE POSTING IHS Accounts Receivable

Description

Pointer To FileMan Files, Total: 6

Package Total FileMan Files
IHS Accounts Receivable 5 A/R TABLE TYPE/IHS(#90052.01)[#90054.0101(.01)]    A/R PARENT/SATELLITE/IHS(#90052.05)[.08, #90054.0102(.01)]    A/R BILL/IHS(#90050.01)[#90054.0103(.01)]    A/R COLLECTION BATCH/IHS(#90051.01)[.04]    A/R TABLE ENTRY/IHS(#90052.02)[#90054.0101(.02)]    
Kernel 1 NEW PERSON(#200)[.06, .07]    

Fields, Total: 15

Field # Name Loc Type Details
.01 POSTING NAME 0;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  JAN 10, 2000
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    This field identifies name of the flat rate posting batch.  It is composed of the entry clerk's initials, today's date, and sequence number.
  • CROSS-REFERENCE:  90054.01^B
    1)= S ^BARFRP(DUZ(2),"B",$E(X,1,30),DA)=""
    2)= K ^BARFRP(DUZ(2),"B",$E(X,1,30),DA)
.02 DATE ENTERED 0;2 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 14, 1999
  • DESCRIPTION:  
    This field represents the date the entry clerk made entries to this file.
.03 DATE POSTED 0;3 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 14, 1999
  • DESCRIPTION:  
    This field represents the date and time the user selected to POST this batch, item.
.04 BATCH NAME 0;4 POINTER TO A/R COLLECTION BATCH/IHS FILE (#90051.01) A/R COLLECTION BATCH/IHS(#90051.01)

  • LAST EDITED:  DEC 15, 1999
  • DESCRIPTION:  
    Pointer to A/R COLLECTION BATCH/IHS file.
.05 BATCH ITEM NUMBER 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 29, 1999
  • HELP-PROMPT:  Type a Number between 1 and 9999999999, 0 Decimal Digits
  • DESCRIPTION:  
    This field represents the IEN to the ITEM multiple in the A/R COLLECTIONS File.
.06 FRP ENTRY CLERK 0;6 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  DEC 15, 1999
.07 FRP POSTING CLERK 0;7 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  DEC 15, 1999
.08 PARENT FACILITY 0;8 POINTER ** TO AN UNDEFINED FILE **

  • LAST EDITED:  DEC 15, 1999
.09 PAYMENT AMOUNT 0;9 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999999)!(X<0) X
  • LAST EDITED:  DEC 16, 1999
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 999999999, 2 Decimal Digits
.1 ITEM POSTABLE AMOUNT 0;10 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999999)!(X<0) X
  • LAST EDITED:  DEC 29, 1999
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 999999999, 2 Decimal Digits
  • DESCRIPTION:  
    Remaining dollar amount on check received from payor.  This matches the ITEM POSTING AMOUNT field in the ITEM multiple in the A/R COLLECTION BATCH file.
.11 FRP TOTAL COMPUTED

  • MUMPS CODE:  S X=$$TOT^BARFPST2(D0) S X=$J(X,0,2)
  • ALGORITHM:  S X=$$TOT^BARFPST2(D0) (ALWAYS 2 DECIMAL DIGITS)
.12 ITEM BALANCE COMPUTED

  • MUMPS CODE:  X $P(^DD(90054.01,.11,0),U,5,99) S Y(90054.01,.12,2)=X S Y(90054.01,.12,1)=$S($D(^BARFRP(DUZ(2),D0,0)):^(0),1:"") S X=$P(Y(90054.01,.12,1),U,10)-Y(90054.01,.12,2) S X=$J(X,0,2)
  • ALGORITHM:  #.1-#.11 (ALWAYS 2 DECIMAL DIGITS)
.13 STATUS 0;13 SET
  • 'P' FOR POSTED;

  • LAST EDITED:  FEB 18, 2000
10 ADJUSTMENT(S) 1;0 POINTER Multiple #90054.0101 90054.0101
20 VISIT LOCATION 2;0 POINTER Multiple #90054.0102 90054.0102
Info |  Desc |  Pointer To FileMan Files |  Fields |  Found Entries |  All