| PDF |
Date converter (FM to external)
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
Y |
Both |
FM date passed in, external date returned
|
|
SITEP |
SET FBSITE(0),FBSITE(1) VARIABLE TO FEE SITE
PARAMETERS (File 161.4)
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
FBSITE(0) |
Output |
FBSITE(0)=$G(^FBAA(161.4,1,0))
|
FBSITE(1) |
Output |
FBSITE(1)=$G(^FBAA(161.4,1,1))
|
FBPOP |
Output |
ERROR flag = "Fee Basis Site Parameters must be
entered to proceed"
|
|
$$SSN(DFN) |
;PID = DFN of Patient. If this is all that is past,
;full Pt.ID (000-00-0000) will be returned.
;If BID = 1 the call will return last 4 of Pt.ID only.
;If DOD is defined to internal entry # of eligibility the appropriate
;Pt.ID will be returned
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
PID |
Input |
Pt IEN
|
BID |
Input |
If BID = 1 the call will return last 4 of Pt.ID only
|
DOD |
Input |
If DOD is defined to internal entry # of eligibility
the appropriate Pt.ID will be returned
|
FBSSN |
Output |
SSN, terminal digits, or error message
|
|
$$DATX(FBVCHDT) |
external output function for date format
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
FBVCHDT |
Both |
INPUT = FM internal date format (time optional)
OUTPUT = date/time with slashes
|
|
$$GETNXI |
GET NEXT AVAILABLE INVOICE NUMBER
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
FBAAIN |
Output |
Invoice number File 161.4, field #11
|
|
GETNXB |
GET NEXT AVAILABLE BATCH NUMBER
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
FBBN |
Output |
Batch IEN
|
|
STATION |
Get Station Number from INSTITUTION (#4) file
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
FBSN |
Output |
Station Number
|
FBAASN |
Output |
Station Number
|
|