N-CMS-1500 PURCH SVC TOTAL (20)    IB DATA ELEMENT DEFINITION (364.5)

Name Value
NAME N-CMS-1500 PURCH SVC TOTAL
SECURITY LEVEL NATIONAL,NO EDIT
TYPE OF ELEMENT EXTRACTED VIA CODE
ELEMENT CATEGORY INDIVIDUAL ELEMENT
BASE FILE BILL/CLAIMS
EXTRACT CODE N IBSUB,IBXSAVE,Z S IBSUB=$S('$G(^TMP("IBTX",$J,IBIFN)):"BOX24",1:"OUTPT") D B24^IBCEF3(.IBXSAVE,IBXIEN) K IBXDATA S (IBXDATA,Z)=0 F S Z=$O(IBXSAVE(IBSUB,Z)) Q:'Z S IBXDATA=IBXDATA+$P(IBXSAVE(IBSUB,Z),U,11)
DESCRIPTION
Data element created for IB patch 371.  This data element will work for
 
The returned value is not formatted in any way.  It is just a number with
or without a decimal point.  For example, 86.33, 17, 176.69, 4, etc.
either the printed 1500 form or the EDI extract.
 
  EDI usage:  SUB-7
print usage:  CMS-1500, box 20
 
It calculates the total purchased service charge amount by totalling up 
all purchased service charges from all line items on the claim. No checks
are made for outside facility or lab or non-lab or anything else.