ICDEX ;SLC/KER - ICD Extractor - Main Entry Points ;12/19/2014
Source file <ICDEX.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Main Entry Point
|
|
HELP | ; Developer Help for an API
|
|
ICDDX(CODE,CDT,SYS,FMT,LOC) | ; Dx Code Info
|
|
ICDOP(CODE,CDT,SYS,FMT,LOC) | ; Procedure Code Info
|
|
ICDD(CODE,ARY,CDT,SYS,LEN) | ; Description in Array
|
|
CODEN(CODE,FILE) | ; IEN of code
|
|
CODEC(FILE,IEN) | ; Code from an IEN
|
|
CODEBA(CODE,ROOT) | ; IEN from Code/Root
|
|
CODEABA(CODE,ROOT,SYS) | ; IEN from Code/Root/Coding System
|
|
RDX(CODE,CDT) | ; Resolve Diagnosis Code Fragment
|
|
CODEFI(CODE) | ; File for code
|
|
CODECS(CODE,FILE,CDT) | ; Coding system for code/file
|
|
CSI(FILE,IEN) | ; Coding system for IEN
|
|
VMDC(IEN,CDT,FMT) | ; Major Diagnostic Category
|
|
VAGEL(IEN,CDT,FMT) | ; Age Low
|
|
VAGEH(IEN,CDT,FMT) | ; Age High
|
|
VCC(IEN,CDT,FMT) | ; Complication/Comorbidity
|
|
VCCP(IEN,CDT,FMT) | ; CC Primary Flag
|
|
VSEX(FILE,IEN,CDT,FMT) | ; Sex for file
|
|
SAI(FILE,IEN,CDT) | ; Status/Active/Inactive Dates
|
|
VST(FILE,IEN,CDT) |
|
|
VLT(FILE,IEN,CDT) | ; Long Text
|
|
VSTD(IEN,CDT) |
|
|
VSTP(IEN,CDT) | ; Short Text - Procedures
|
|
VLTD(IEN,CDT) | ; Description - Diagnosis
|
|
VLTP(IEN,CDT) | ; Description - Procedures
|
|
SD(FILE,IEN,CDT,ARY,LEN) | ; Short Description (formatted)
|
|
LD(FILE,IEN,CDT,ARY,LEN) | ; Long Description (formatted)
|
|
SDH(FILE,IEN,ARY) | ; Short Description History
|
|
LDH(FILE,IEN,ARY) | ; Long Description History
|
|
PAR(ARY,LEN) | ; Parse Array
|
|
IEN(CODE,ROOT,SYS) | ; IEN from Code/Root/Coding System
|
|
STATCHK(CODE,CDT,SYS) | ; Status of ICD Code
|
|
DTBR(CDT,STD,SYS) | ; Date Business Rules
|
|
IMP(SYS,CDT) | ; Implementation Date
|
|
MSG(CDT,STD,SYS) | ; Warning Message
|
|
SEL(FILE,IEN) | ; Entry is Selectable
|
|
NEXT(CODE,SYS,CDT) | ; Next Code
|
|
PREV(CODE,SYS,CDT) | ; Previous Code
|
|
HIST(CODE,ARY,SYS) | ; Activation History
|
|
PERIOD(CODE,ARY,SYS) | ; Activation Periods
|
|
OBA(FILE,CODE,SYS,REV) | ; $Order BA/ABA
|
|
OD(FILE,WORD,SYS,REV) | ; $Order D/AD
|
|
DLM(FILE,IEN,FIELD,CDT) | ; Date Last Modified
|
|
CS(FILE,FMT,CDT) | ; Select Coding System (lookup)
|
|
EFF(FILE,IEN,CDT) | ; Effective date and status
|
|
IA(FILE,IEN) | ; Initial Activation Date
|
|
LA(FILE,IEN,CDT) | ; Last Activation Date
|
|
LI(FILE,IEN,CDT) | ; Last Inactivation Date
|
|
LS(FILE,IEN,CDT,FMT) | ; Last Status
|
|
NUM(CODE) | ; Convert Code to a Numeric
|
|
COD(NUM) | ; Convert Numeric to a Code
|
|
IE(CODE) | ; Internal or External Format
|
|
FILE(SYS) | ; File Number from System
|
|
ROOT(SYS) | ; Global Root
|
|
SYS(SYS,CDT,FMT) | ; Resolve System (uses file 80.4)
|
|
SINFO(SYS,CDT) | ; System Info (uses file 80.4)
|
|
SNAM(SYS) | ; System Name from Coding System
|
|
SAB(SYS,CDT) | ; Source Abbreviation
|
|
EXC(FILE,IEN) | ; Exclude From lookup
|
|
VER(SYS,REL) | ; Coding System Version
|
|
HDR(FILE) | ; File Header Node
|
|
ISA(IEN1,IEN2,FIELD) | ; Is Code 1 a condition of Code 2 (ICDDRG)
|
|
ISVALID(FILE,IEN,CDT) | ; Is an ICD code Valid
|
|
EXIST(IEN,FIELD) | ; Does a condition Exist (ICDDRGX)
|
|
GETDRG(FILE,IEN,CDT,MDC) | ; DRGs for an Fiscal Year (ICDGTDRG)
|
|
MD(FILE,IEN,CDT,ARY,FLAG) | ; MDC DRGs
|
|
EFM(EDT) | ; Convert External Date to FM (ICDGTDRG)
|
|
FY(CDT) | ; FY 4 digit year (ICDGTDRG)
|
|
VMDCDX(IEN,CDT) | ; Versioned MDC for DX (ICDREF)
|
|
VMDCOP(IEN,MDC,CDT) | ; Versioned MDC for Op/Pro (ICDREF)
|
|
REF(IEN,CDT) | ; Return Reference Table (ICDREF)
|
|
MDCG(IEN,CDT,ARY) | ; Set up array of MDCs (ICDDRG)
|
|
MDCT(IEN,CDT,ARY,FMT) | ; For Multiple MDC DX Codes (ICDDRG)
|
|
MDCD(IEN,MDC,CDT) | ; Check for default MDC (ICDDRG)
|
|
MDCN(IEN) | ; Major Diagnostic Category Name
|
|
MOR(IEN) | ; Major O.R. Procedure (ICDDRG)
|
|
UPDX(IEN) | ; Unacceptable as Principle DX
|
|
POAE(IEN) | ; Present on Admission Exempt
|
|
HAC(IEN) | ; Hospital Acquired Conditions
|
|
NOT(IEN,SUB,FMT) | ; Codes not Used With
|
|
REQ(IEN,SUB,FMT) | ; Codes Required With
|
|
NCC(IEN,SUB,FMT) | ; Codes not Considered CC With
|
|
ICDID(FILE,ID,CODE) | ; Check if ICD identifier exist
|
|
IDSTR(FILE,IEN) | ; ICD identifier string (legacy)
|
|
ICDIDS(FILE,IEN,ARY) | ; Returns array of ICD identifiers
|
|
ISOWNCC(IEN,CDT,FMT) | ; Return CC if DX is Own CC
|
|
ICDRGCC(DRG,CDT) | ; Get CC/MCC flag from DRG
|
|
INQ | ; Inquire to the ICD Files
|
|
EFD(X) | ; Get Effective date in range (interactive)
|
|
PDXE(IEN) | ; Primary DX Exclusion Code
|
|
DRG(CODE,CDT) | ; Returns information about a DRG
|
|
DRGW(IEN) | ; DRG Weighted Work Unit (WWU)
|
|
DRGDES(IEN,CDT,ARY,LEN) | ; Formatted DRG Description
|
|
DRGD(CODE,OUTARR,CDT) | ; Unformatted DRG Description
|
|
DRGN(CODE) | ; Return the IEN of DRG
|
|
DRGC(IEN) | ; DRG Code
|
|
GETDATE(IEN) | ; Calculate Effective Date
|
|
LK | ; Special Lookup (called by DIC)
|
|
LKTX(X,ROOT,CDT,SYS,VER,OUT) | ; Lookup Text in ROOT (silent)
|
|
Y(ROOT,IEN,CDT,FMT) | ; Output Variable Y from Lookup
|
|
TOKEN(X,ROOT,SYS,ARY) | ; Parse Text into Words
|
|
WORD(X,ROOT,SYS) | ; Word is Found
|
|