ICPTSUPT ;SLC/KER - CPT SUPPORT FOR APIS ; 04/18/2004
Source file <ICPTSUPT.m>
Package | Total | Caller Graph |
---|---|---|
DRG Grouper | 5 | ICPTAPIU ICPTCOD ICPTID ICPTMOD ICPTMOD2 |
GUI Objects | 1 | BGOVCPT2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
MSG(CDT,CS) | ||
GBL(CODE) | ; return Global Node of Code
|
|
EFF(FILE,CODE,EDT) | ; Returns Effective Date and Status for Code/Modifier
; Input: ; FILE = file number REQUIRED ; 81 for CPT file ; 81.3 for CPT MODIFIER file ; CODE = CPT CODE ien or CPT MODIFIER ien REQUIRED ; EDT = date to check for (FileMan format) (default = today) |
|
DTBR(CDT) | ; Date Business Rules
; Input: ; CDT - Code Date to check (FileMan format, default=Today) |
Name | Field # of Occurrence |
---|---|
$$DT^XLFDT | EFF+25, DTBR+9, DTBR+10, MSG+10 |
Name | Line Occurrences |
---|---|
$$DTBR | EFF+25, MSG+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CDT | DTBR~, DTBR+9, DTBR+10, DTBR+11*, DTBR+12*, DTBR+13, MSG~, MSG+10*, MSG+12, MSG+13 |
CODE | EFF~, EFF+22, EFF+24, GBL~, GBL+1, GBL+2 |
CS | MSG~, MSG+9*, MSG+12, MSG+13 |
EDT | EFF~, EFF+25*, EFF+26 |
EFF | EFF+23~, EFF+26*, EFF+27, EFF+28, EFF+32*, EFF+33*, EFF+34 |
EFFB | EFF+23~, EFF+32*, EFF+33, EFF+34*, EFF+35*, EFF+36* |
EFFDOS | EFF+23~, EFF+35*, EFF+36, EFF+37*, EFF+38, EFF+39 |
EFFDT | EFF+23~, EFF+32*, EFF+38, EFF+39 |
EFFN | EFF+23~, EFF+28*, EFF+29, EFF+34*, EFF+35 |
EFFST | EFF+23~, EFF+32*, EFF+36, EFF+38 |
EFILE | EFF+23~, EFF+24*, EFF+26, EFF+28, EFF+29, EFF+33, EFF+34, EFF+35 |
FILE | EFF~, EFF+20, EFF+21, EFF+22, EFF+24 |
MSGDAT | MSG+11~*, MSG+12 |
MSGTXT | MSG+11~*, MSG+12, MSG+14 |
STR | EFF+23~, EFF+29*, EFF+30, EFF+32, EFF+38*, EFF+39*, EFF+40 |