FBPAID3A ;DSS/SCR - Utilities to support FEE BASIS PAID TO IB Process ;3/28/1012
Source file <FBPAID3A.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRCFBREC(FBIEN,FBRECARY,FBARRY,FBCHECK) | ;Processes one Fee Basis record
; ; INPUT : FBIEN - the IEN of the FEE BASIS TO IB file line being processed ; FBRECARY - AN array populated with information about the FEE BASIS INVOICE ; FBARRY - An array used to update the FEE BASIS PAID TO IB file ; FBCHECK - An array passed by reference which holds processed NPIs ; ; OUTPUT: FBARRY populated with line item provider information ; FBCHECK populated with information about each NPI which has been processed ; 'FBQUIT - 1 if no problems stopped processing, 0 if they did |
|
| UPDTONE(FBIEN,FBTYP,FBIBICN,FBNPIFLG,FBTXYFLG,FBARRY) | ||
| FBTOIB(FBVDRIEN,FBPRVNAM,FBPRVTYP,FBPRVNPI,FBPRVTXY,FBDUZ,FBCHECK,FBSRVINF) | ||
| ADD5010(FBPROG,FBICN,FBPAT,FBDATE,FBLINUM) | ;EP FROM FBPAID AND FBPAID3A
; INPUT : ; FBPROG : "3" FOR OUTPATIENT, "9" FOR INPATIENT ; FBICN : A FOUR PIECE ';' DELIMITED STRING ; FBPAT : POINTER TO THE PATIENT FILE ; FBDATE : DATE OF MM MESSAGE FROM CENTRAL FEE PROCESSING |
|
| TYPETWO(FB5010TYP,FBPRVNAM,FBPRVNPI,FBPRVTXY,FBDUZ,FBARRAY,FBCHECK) | ||
| GETFBDUZ(FBBTCH) | ;returns an IEN from NEW PERSON file
|
| FileNo | Call Tags |
|---|---|
| ^FBAAV - [#161.2] | GETS^DIQ |
| ^FBAA(161.7 - [#161.7] | GET1^DIQ |
