| $$CHKICD0(FBIEN,FBDATE) |
to use in prompts (and input templates)of file #162.5
to screen out inactive/invalid codes
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
FBIEN |
Input |
ICD IEN
|
FBDATE |
Input |
(optional) date of service
|
FBICD0 |
Input |
ien of #80.1
|
FBINV |
Input |
ien of the current #162.5 record
|
FBRET |
Output |
0 if code is active, otherwise - nonzero value
|
|
$$CHKICD9(FBIEN,FBDATE) |
checks if code is inactive on the date of service and
if active returns CODE NUMBER
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
FBIEN |
Input |
IEN of ICD Dx
|
FBDATE |
Input |
|
|
$$ICD(FBIEN,FBDATE) |
wrapper for DRG^ICDGTDRG to use instead of direct
read of ^ICD(
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
FBIEN |
Input |
FBIEN - ien of #80.1
|
FBDATE |
Input |
FBDATE - date of service (optional)
|
|
$$ICD0(FBIEN,FBDATE) |
wrapper for ICDOP^ICDCODE to use instead of direct
read of ^ICD0(
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
FBIEN |
Input |
FBIEN - ien of #80
|
FBDATE |
Input |
FBDATE (optional) - date of service
|
|
$$ICD9(FBIEN,FBDATE) |
wrapper for ICDDX^ICDCODE to use instead of direct
read of ^ICD9(
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
FBIEN |
Input |
FBIEN - ien of #80
|
FBDATE |
Input |
FBDATE (optional) - date of service
|
|
$$ICD9EX(FBIEN,FBPC,FBEXTR,FBDATE) |
extended wrapper for ICDDX^ICDCODE to use instead of
direct read of ^ICD9(
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
FBIEN |
Input |
FBIEN - ien of #80
|
FBPC |
Input |
FBPC - piece #
|
FBEXTR |
Input |
$E Parameter
|
FBDATE |
Input |
Date of service (optional)
|
|
$$STR2FBDT(FBDTSTR) |
convert date as a string like "MMDDYYYY" into FM date
like "YYYMMDD"
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
FBDTSTR |
Both |
convert date as a string like "MMDDYYYY" into FM date
like "YYYMMDD"
|
Y |
Output |
fm date format
|
|
$$FRDTINV(FBDA) |
Returns first date found in the following order:
Discharge date, (from 162.3 after lookup)
Treatment To date, (from 162.5)
Treatment From date (from 162.5)
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
FBDA |
Input |
IEN to 162.5, used to find date
|
|
