IBEFUNC2 ;ALB/ARH - CPT BILLING EXTRINSIC FUNCTIONS II ;11/27/91
Source file <IBEFUNC2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
MODLST(MODS,DESC,IBMOD,IBDATE) | ; Function returns string of actual modifiers translated
; from the comma delimited string of modifier iens in MODS ; DESC = 1 if description of modifier should be returned in IBMOD(1) ; Must pass IBMOD by reference for this to work ; IBMOD = the ',' delimited list of modifiers, ; IBMOD(1) = the ',' delimited modifier descriptions, if ; DESC = 1 and IBMOD is passed by reference ; IBDATE = Date of Service (opt) for the versioned text description ; |
|
CPTSTAT(CPT,DATE) | ;determine the overall status for a CPT for given date, assumes today if no date given
|
|
CEND | ||
TDG(SSN) | ;reformat SSN into terminal digit order
; returns either 0 or ssn in terminal digit order |
|
ENDP | ||
FFMT | ;
|
|
FORMAT(GRP,CP) | ;calculate spacing format for clinic CPT list
|
|
ENDFMT | ||
FPO | ;
|
|
PO(DA,X) | ;check that the print order entered has not already been used for the group/sub-header
|
|
ENDPO |