ICD187PT ; ALB/ADL - GROUPER DRIVER ; 04/11/03
Source file <ICD187PT.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
UPDATE | ; SET INACTIVE DRG LEVELS
|
|
CLEANUP | ;REMOVE 66 LEVELS TO REPROCESS
|
|
ADDDRGZ(FN,IEN,NODE,X,STA,MDCD,SURGD) | ||
MAINLOOP(ROOT,IEN) | ||
ALTERICD | ||
ALTERDRG | ||
ALTERCPT | ||
ADJDATA | ;data to add/update
|
|
EFF(FILE,CODE) | ||
ADDMULT(FN,IEN,NODE,X,STA,DRGZ) | ; add to multiple
|
|
SETINACT(IEN) | ||
EDIT0(DA,DIE,DR) |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD( | ADDMULT+2, ADDDRGZ+2 |
^DIC - [#1] | ICD187PT+12, EFF+2, UPDATE+7 |
^ICD - [#80.2] | CLEANUP+2!, SETINACT+3, SETINACT+5 |
^TMP("DIERR" | ADDMULT+4!, ADDMULT+9, ADDDRGZ+4!, ADDDRGZ+11 |
Name | Line Occurrences |
---|---|
$$EDIT0 | ALTERCPT+6 |
$$EFF | ALTERCPT+2 |
ADDDRGZ | ALTERDRG+7, ALTERDRG+11, ALTERDRG+12, SETINACT+6 |
ADDMULT | ALTERICD+8, ALTERICD+9, ALTERCPT+9, ALTERCPT+10 |
ALTERCPT | MAINLOOP+12 |
ALTERDRG | MAINLOOP+8 |
ALTERICD | MAINLOOP+11 |
CLEANUP | MAINLOOP+3 |
MAINLOOP | ICD187PT+12 |
SETINACT | UPDATE+14 |
Name | Field # of Occurrence |
---|---|
^( | ALTERDRG+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACTFLG | ALTERDRG+1~, ALTERDRG+3*, ALTERDRG+4, ALTERDRG+8*, ALTERDRG+10, ALTERDRG+11*, ALTERDRG+12* |
AD | ALTERICD+1~, ALTERICD+2*, ALTERICD+8, ALTERDRG+1~, ALTERCPT+1~, ALTERCPT+3*, ALTERCPT+9 |
ADATE | ICD187PT+6~, ICD187PT+11*, ALTERICD+2, ALTERICD+3, ALTERCPT+9, UPDATE+1~, UPDATE+6* |
ADT | MAINLOOP+1~, MAINLOOP+6*, UPDATE+9~, UPDATE+13* |
ANS | ALTERICD+1~, ALTERICD+5*, ALTERDRG+1~, ALTERCPT+1~, ALTERCPT+6*, ADDMULT+1~, ADDMULT+9*, ADDDRGZ+1~, ADDDRGZ+11* |
>> CD | CLEANUP+1*, CLEANUP+2* |
CODE | EFF~, EFF+2 |
CSAN | ICD187PT+6~, ICD187PT+10*, ALTERICD+2, ALTERICD+3, ALTERCPT+3, UPDATE+1~, UPDATE+5* |
CSAP | ICD187PT+6~, ICD187PT+11*, MAINLOOP+6, UPDATE+1~, UPDATE+6*, UPDATE+13 |
CSD | ICD187PT+6~, ICD187PT+8*, ICD187PT+9, ICD187PT+10, ICD187PT+11, UPDATE+1~, UPDATE+3*, UPDATE+4, UPDATE+5, UPDATE+6 |
CSIN | ICD187PT+6~, ICD187PT+10*, ALTERICD+3, ALTERCPT+4, UPDATE+1~, UPDATE+5* |
CSIP | ICD187PT+6~, ICD187PT+10*, MAINLOOP+6, UPDATE+1~, UPDATE+5*, UPDATE+13 |
DA | EDIT0~, EDIT0+1 |
>> DATE | SETINACT+4*, SETINACT+5, SETINACT+6 |
DIE | EDIT0~, EDIT0+2, EDIT0+4 |
DKZ | MAINLOOP+1~, MAINLOOP+5*, MAINLOOP+6, MAINLOOP+8, UPDATE+9~, UPDATE+12*, UPDATE+13, UPDATE+14 |
DR | ALTERICD+1~, ALTERICD+2*, ALTERICD+3*, ALTERDRG+1~, ALTERCPT+1~, ALTERCPT+3*, ALTERCPT+4*, ALTERCPT+5*, ALTERCPT+6, EDIT0~ |
>> DRGCNT | ADDMULT+7* |
DRGZ | MAINLOOP+1~, MAINLOOP+9*, MAINLOOP+10*, ALTERICD+8, ALTERICD+9, ADDMULT~, ADDMULT+7, UPDATE+9~ |
DT | EFF+3 |
EFF | ALTERCPT+1~, ALTERCPT+2*, ALTERCPT+3, EFF+1~, EFF+3*, EFF+4, EFF+8*, EFF+9, EFF+10* |
EFFBOOL | EFF+1~, EFF+7*, EFF+8, EFF+11* |
EFFDFLT | EFF+1~, EFF+2*, EFF+3, EFF+5, EFF+12 |
EFFDOS | EFF+1~, EFF+10*, EFF+11, EFF+12*, EFF+13, EFF+14 |
EFFDT | ALTERDRG+1~, ALTERDRG+5*, ALTERDRG+10, ALTERDRG+11, ALTERDRG+12, EFF+1~, EFF+7*, EFF+13, EFF+14 |
EFFDT2 | ALTERDRG+1~, ALTERDRG+7* |
EFFN | EFF+1~, EFF+4*, EFF+5, EFF+9*, EFF+10 |
EFFS | ALTERCPT+1~, ALTERCPT+3*, ALTERCPT+4, ALTERCPT+5, ALTERCPT+10 |
EFFST | EFF+1~, EFF+7*, EFF+11, EFF+12, EFF+13 |
EFILE | EFF+1~, EFF+2*, EFF+3, EFF+4, EFF+5, EFF+8, EFF+9, EFF+10 |
FDA | ADDMULT+1~, ADDDRGZ+1~ |
FDA( | ADDMULT+7*, ADDDRGZ+5*, ADDDRGZ+6*, ADDDRGZ+7*, ADDDRGZ+8* |
FDAIEN | ADDMULT+1~, ADDMULT+3*, ADDMULT+7, ADDDRGZ+1~, ADDDRGZ+3*, ADDDRGZ+5, ADDDRGZ+6, ADDDRGZ+7, ADDDRGZ+8 |
FILE | ICD187PT+6~, ICD187PT+9*, ICD187PT+12, MAINLOOP+2, MAINLOOP+3, MAINLOOP+7, MAINLOOP+8, MAINLOOP+9, MAINLOOP+10, ALTERICD+8 , ALTERICD+9, ALTERDRG+7, ALTERDRG+11, ALTERDRG+12, ALTERCPT+2, ALTERCPT+9, ALTERCPT+10, EFF~, EFF+2, SETINACT+6 , UPDATE+1~, UPDATE+4*, UPDATE+7, UPDATE+10 |
FIRSTSET | ALTERDRG+1~, ALTERDRG+3*, ALTERDRG+4, ALTERDRG+6, ALTERDRG+9* |
FLAG | ICD187PT+6~, ICD187PT+9*, MAINLOOP+5, UPDATE+1~, UPDATE+4*, UPDATE+12 |
FLGN | ICD187PT+6~, ICD187PT+9*, ALTERCPT+5, UPDATE+1~, UPDATE+4* |
FN | ADDMULT~, ADDMULT+2*, ADDMULT+7, ADDDRGZ~, ADDDRGZ+2*, ADDDRGZ+5, ADDDRGZ+6, ADDDRGZ+7, ADDDRGZ+8 |
FY | ALTERDRG+3*, ALTERDRG+4*, ALTERDRG+5, SETINACT+1~, SETINACT+2*, SETINACT+3*, SETINACT+4 |
>> FYINFO | ALTERDRG+4* |
I | ICD187PT+6~, ICD187PT+8*, UPDATE+1~ |
ID | ALTERICD+1~, ALTERICD+3*, ALTERICD+9, ALTERDRG+1~, ALTERCPT+1~, ALTERCPT+3*, ALTERCPT+4, ALTERCPT+10 |
IDATE | ICD187PT+6~, ICD187PT+11*, ALTERICD+3, ALTERCPT+10, UPDATE+1~, UPDATE+6* |
IDT | MAINLOOP+1~, MAINLOOP+6*, ALTERICD+2, ALTERICD+3, UPDATE+9~, UPDATE+13* |
IEN | MAINLOOP~, MAINLOOP+4*, MAINLOOP+5, MAINLOOP+9, MAINLOOP+10, ALTERICD+8, ALTERICD+9, ALTERDRG+4, ALTERDRG+7, ALTERDRG+11 , ALTERDRG+12, ALTERCPT+2, ALTERCPT+6, ALTERCPT+9, ALTERCPT+10, ADDMULT~, ADDMULT+3, ADDDRGZ~, ADDDRGZ+3, SETINACT~ , SETINACT+3, SETINACT+5, SETINACT+6, SETINACT+7, UPDATE+7*, UPDATE+11*, UPDATE+12, UPDATE+14 |
>> MDC | ICD187PT+11*, MAINLOOP+8, UPDATE+6*, UPDATE+14 |
MDCD | MAINLOOP+8*, ALTERDRG+7, ALTERDRG+11, ALTERDRG+12, ADDDRGZ~, ADDDRGZ+7, SETINACT+6, UPDATE+14* |
NODE | ICD187PT+6~, ICD187PT+9*, ALTERICD+8, ALTERICD+9, ALTERDRG+7, ALTERDRG+11, ALTERDRG+12, ALTERCPT+9, ALTERCPT+10, ADDMULT~ , ADDMULT+2, ADDDRGZ~, ADDDRGZ+2, SETINACT+6, UPDATE+1~, UPDATE+4* |
RC | MAINLOOP+1~, UPDATE+9~ |
REC | EDIT0+1~*, EDIT0+2, EDIT0+4 |
ROOT | MAINLOOP~, MAINLOOP+4, MAINLOOP+5, MAINLOOP+9, MAINLOOP+10, ALTERDRG+4, ALTERCPT+6, UPDATE+7*, UPDATE+11, UPDATE+12 |
S | MAINLOOP+1~*, ALTERICD+2, ALTERICD+3, ALTERCPT+3, ALTERCPT+4, ALTERCPT+5, UPDATE+9~* |
>> SS | MAINLOOP+10* |
STA | ADDMULT~, ADDDRGZ~, ADDDRGZ+6 |
STAT | MAINLOOP+1~, MAINLOOP+5*, ALTERICD+2, ALTERICD+8, ALTERICD+9, ALTERCPT+5, UPDATE+9~, UPDATE+12* |
STR | EFF+1~, EFF+5*, EFF+7, EFF+13*, EFF+14*, EFF+15 |
>> SURG | ICD187PT+11*, MAINLOOP+8, UPDATE+6*, UPDATE+14 |
SURGD | MAINLOOP+8*, ALTERDRG+7, ALTERDRG+11, ALTERDRG+12, ADDDRGZ~, ADDDRGZ+8, SETINACT+6, UPDATE+14* |
U | ICD187PT+7*, ICD187PT+9, ICD187PT+10, ICD187PT+11, MAINLOOP+5, MAINLOOP+6, MAINLOOP+8, ALTERDRG+4, ALTERCPT+3, EFF+7 , EFF+11, EFF+12, EFF+13, EFF+14, ADDMULT+2, ADDDRGZ+2, UPDATE+2*, UPDATE+4, UPDATE+5, UPDATE+6 , UPDATE+12, UPDATE+13, UPDATE+14 |
>> UPDT | ALTERDRG+4* |
>> WGHT | ALTERDRG+4*, ALTERDRG+6 |
X | ADDMULT~, ADDDRGZ~, ADDDRGZ+5 |
Name | Field # of Occurrence |
---|---|
$T(ADJDATA+4 | UPDATE+3 |
$T(ADJDATA+I | ICD187PT+8 |