PXRMCSU ;SLC/JVS - Code Set Version-dialog file-Utilities ;4/10/03 12:02
Source file <PXRMCSU.m>
Package | Total | Call Graph |
---|---|---|
DRG Grouper | 2 | ($$ICDDX,$$ICDOP)^ICDCODE $$CPT^ICPTCOD |
Kernel | 1 | ($$FMADD,$$FMTE)^XLFDT |
Name | Comments | DBIA/ICR reference |
---|---|---|
SUB | ;==============Sub Routines=============================
|
|
CPT(VARIEN) | ; Return code from IEN
|
|
CONV(DATE) | ;Date time conversion
|
|
ICD9D(VARIEN) | ; Return ICD9 (Diagnosis) Description from IEN
|
|
ICD9A(VARIEN) | ; Return all data for cpt code
; INACDATE=Inactive date ; FPP =FUTURE PRESENT PAST ; RETURNS CPTDATA = Whole string of information ; FPPREF = Time Reference (Null if no data) |
|
CPTA(VARIEN) | ; Return all data for cpt code
; INACDATE=Inactive date ; FPP =FUTURE PRESENT PAST ; RETURNS CPTDATA = Whole string of information ; FPPREF = Time Reference (Null if no data) |
|
CPTD(VARIEN) | ;Return CPT code Description from IEN
|
|
DT6M(DT) | ;Add 180 days to DT
|
|
ICD9(VARIEN) | ; Return ICD9 (Diagnosis) Code from IEN
|
|
STATUS(VRSTATUS) | ;RETURN STATUS FOR BOTH CPT AND ICD CODES
|
|
ICD0(VARIEN) | ; Return ICD0 (Operation) Code from an IEN
|
|
ICD0D(VARIEN) | ; Return ICD0 (Operation) Description from IEN
|
Name | Line Occurrences |
---|---|
$$DT6M | CPTA+6, ICD9A+6, CPT+2, CPTD+2, ICD9+2, ICD9D+2, ICD0+2, ICD0D+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CPTDATA | CPTA+5~, CPTA+6*, CPTA+7, CPTA+10 |
DATE | CONV~, CONV+2 |
DATECV | CONV+1~, CONV+2*, CONV+3 |
DT | DT6M~, DT6M+2, CPTA+6, CPTA+8, ICD9A+6, ICD9A+8, CPT+2, CPTD+2, ICD9+2, ICD9D+2 , ICD0+2, ICD0D+2 |
DT6M | DT6M+1~, DT6M+2*, DT6M+3 |
FPP | CPTA+5~, CPTA+8*, CPTA+9, ICD9A+5~, ICD9A+8*, ICD9A+9 |
FPPREF | CPTA+5~, CPTA+7*, CPTA+9*, CPTA+10, ICD9A+5~, ICD9A+7*, ICD9A+9*, ICD9A+10 |
ICD9DATA | ICD9A+5~, ICD9A+6*, ICD9A+7, ICD9A+10 |
INACDATE | CPTA+5~, CPTA+7*, CPTA+8, ICD9A+5~, ICD9A+7*, ICD9A+8 |
STATUS | STATUS+1~, STATUS+4*, STATUS+5 |
VARCODE | CPT+1~, CPT+2*, CPT+3*, CPT+4, ICD9+1~, ICD9+2*, ICD9+3*, ICD9+4, ICD0+1~, ICD0+2* , ICD0+3*, ICD0+4, ICD0D+1~ |
VARDESC | CPTD+1~, CPTD+2*, CPTD+3*, CPTD+4, ICD9D+1~, ICD9D+2*, ICD9D+3*, ICD9D+4, ICD0D+2*, ICD0D+3* , ICD0D+4 |
VARIEN | CPTA~, CPTA+6, ICD9A~, ICD9A+6, CPT~, CPT+2, CPTD~, CPTD+2, ICD9~, ICD9+2 , ICD9D~, ICD9D+2, ICD0~, ICD0+2, ICD0D~, ICD0D+2 |
VRSTATUS | STATUS~, STATUS+4 |