Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 351.613

Package: Integrated Billing

TRANSFER PRICING TRANSACTIONS(#351.61)-->351.613

Sub-Field: 351.613


Information

Parent File Name Number Package
TRANSFER PRICING TRANSACTIONS(#351.61) PROCEDURES 351.613 Integrated Billing

Details

Field # Name Loc Type Details
.01 PROCEDURES 0;1 POINTER TO CPT FILE (#81) CPT(#81)

  • INPUT TRANSFORM:  S DIC("S")="I $$CPTACT^IBACSV(+Y,$P($G(^IBAT(351.61,+$G(DA(1)),0)),U,4))" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
  • LAST EDITED:  APR 21, 2003
  • HELP-PROMPT:  Select a procedure to determine the price of this transaction.
  • DESCRIPTION:  
    This is the multiple where the procedures performed either inpatient or outpatient are stored. The procedures are used to calculate the transaction price.
  • SCREEN:  S DIC("S")="I $$CPTACT^IBACSV(+Y,$P($G(^IBAT(351.61,+$G(DA(1)),0)),U,4))"
  • EXPLANATION:  Only codes active on the Event Date may be selected.
  • CROSS-REFERENCE:  351.613^B
    1)= S ^IBAT(351.61,DA(1),3,"B",$E(X,1,30),DA)=""
    2)= K ^IBAT(351.61,DA(1),3,"B",$E(X,1,30),DA)
    3)= Required Index for Variable Pointer
.02 QUANTITY 0;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 01, 1999
  • HELP-PROMPT:  Type a Number between 1 and 9999, 0 Decimal Digits
  • DESCRIPTION:  
    This is the number of times this procedure was performed.
.03 PROCEDURE COST 0;3 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999.99)!(X<0) X
  • LAST EDITED:  MAY 26, 2000
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999.99, 2 Decimal Digits
  • DESCRIPTION:  
    This is the unit cost per procedure.
Info |  Details