| Name | Value |
|---|---|
| NAME | N-UB-04 PROCEDURES |
| SECURITY LEVEL | NATIONAL,NO EDIT |
| TYPE OF ELEMENT | EXTRACTED VIA CODE |
| ELEMENT CATEGORY | GROUP ELEMENT |
| BASE FILE | BILL/CLAIMS |
| EXTRACT CODE | N IB,IBPROC,Z D PROCX^IBCVA1 S (IB,Z)=0 F S IB=$O(IBPROC(IB)) Q:'IB S Z=Z+1,IBXDATA(Z)=IBPROC(IB) D SETMODS^IBCVA1($P(IBPROC(IB),U,15),Z,.IBXSAVE) |
| DESCRIPTION | The procedures associated with bill IBXIEN. Format is:
procedure code;ICPT( or ICD0(^procedure date in fileman format.
Data is returned in an array IBXDATA(1-n) and modifiers on the procedures
are returned in IBXSAVE("PROCMODS",1-n)=modifiers separated by comma.
|