RMPREOU ;HINES/HNC -Suspense Processing Utility ;2-2-2000
Source file <RMPREOU.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ITEM(DA,RL) | ;psas hcpcs space item name
|
|
| PWRKDAY(DA) | ||
| TYPE(DA,RL) | ;type of consult, suspense
|
|
| PDAY(DA) | ;days between create and init action
|
|
| DES(DA,RL) | ;description for manual
|
|
| STATUS(DA,RL) | ;status of suspense, open, pending, closed
|
|
| WHO(DA,RL,RMPRA) | ;requestor or provider
|
|
| NUM | ;pick number from list
|
|
| NUM2 | ;pick a single number from a list
|
|
| WRKDAY(DA) | ||
| CWRKDAY(DA) | ;working days based on today for open records.
|
|
| CANWKDY(DA) | ;*135 working days between create and cancel date for cancel w/o initial action records.
|
|
| WDAY | ; RB - begining date
; RE - ending date |
|
| 1 | ||
| END | ;
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^RMPR(668 - [#668] | PWRKDAY+5, PDAY+4, PDAY+6, DES+4, WHO+6, WRKDAY+5, WRKDAY+7, CWRKDAY+4, CANWKDY+4, CANWKDY+6 |
| Name | Line Occurrences |
|---|---|
| WDAY | PWRKDAY+9, WRKDAY+9, CWRKDAY+7, CANWKDY+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | ITEM~, ITEM+5, PWRKDAY~, PWRKDAY+5, TYPE~, TYPE+5, PDAY~, PDAY+4, PDAY+6, DES~ , DES+4, STATUS~, STATUS+3, WHO~, WHO+6, WHO+10, WRKDAY~, WRKDAY+5, WRKDAY+7, CWRKDAY~ , CWRKDAY+4, CANWKDY~, CANWKDY+4, CANWKDY+6 |
| DES | DES+3~, DES+4*, DES+5, DES+6*, DES+7 |
| DIC | ITEM+3~, ITEM+4*, TYPE+3~, TYPE+4*, STATUS+1~, STATUS+2*, WHO+4~, WHO+9* |
| DIQ | ITEM+3~, ITEM+4*, TYPE+3~, TYPE+4*, STATUS+1~, STATUS+2*, WHO+4~, WHO+9* |
| DIQ(0 | ITEM+4*, TYPE+4*, STATUS+2*, WHO+9* |
| DIR | NUM+1!, NUM2+1! |
| DIR(0 | NUM+1*, NUM2+1* |
| DR | ITEM+3~, ITEM+4*, TYPE+3~, TYPE+4*, STATUS+1~, STATUS+2*, WHO+4~, WHO+9* |
| DT | PWRKDAY+7, CWRKDAY+6 |
| ITEM | ITEM+3~, ITEM+5*, ITEM+6*, ITEM+7 |
| PDAY | PDAY+2~, PDAY+3*, PDAY+5 |
| RB | PWRKDAY+4~, PWRKDAY+5*, PWRKDAY+6, WRKDAY+4~, WRKDAY+5*, WRKDAY+6, CWRKDAY+3~, CWRKDAY+4*, CWRKDAY+5, CANWKDY+3~ , CANWKDY+4*, CANWKDY+5, WDAY+7, 1, 1+2, 1+4 |
| RBCA | WDAY+13~, 1+11*, 1+12 |
| RDEDAY | WDAY+13~, 1+14*, 1+16, 1+17 |
| RDSDAY | WDAY+13~, 1+6*, 1+7, 1+11 |
| RE | ITEM+7!, PWRKDAY+4~, PWRKDAY+7*, PWRKDAY+8, TYPE+7!, STATUS+6!, WHO+12!, WRKDAY+4~, WRKDAY+7*, WRKDAY+8 , CWRKDAY+3~, CWRKDAY+6*, CANWKDY+3~, CANWKDY+6*, CANWKDY+7, WDAY+7, 1, 1+3, 1+4 |
| RE(200 | WHO+10 |
| RE(660 | ITEM+5 |
| RE(668 | TYPE+5, STATUS+3 |
| RECA | WDAY+13~, 1+1*, 1+16*, 1+20 |
| RL | ITEM~, ITEM+6, TYPE~, TYPE+6, DES~, DES+6, STATUS~, STATUS+5, WHO~, WHO+7 , WHO+11 |
| RMB | WDAY+13~, 1+2*, 1+6 |
| RME | WDAY+13~, 1+3*, 1+14 |
| RMNOD | WDAY+13~, 1*, 1+4, 1+8, 1+9, 1+10, 1+12*, 1+15, 1+17*, 1+21 , 1+22, 1+23, 1+26 |
| RMPRA | WHO~, WHO+6 |
| >> RMPRCD | PDAY+7 |
| RMTO | PWRKDAY+4~, PWRKDAY+10, WRKDAY+4~, WRKDAY+10, CWRKDAY+3~, CWRKDAY+8, CANWKDY+3~, CANWKDY+9, WDAY+7*, 1+1* , 1+27* |
| RMTOT | WDAY+13~, 1+1*, 1+20*, 1+21*, 1+22*, 1+23*, 1+26*, 1+27 |
| RNO | WDAY+13~ |
| RNOB | WDAY+13~, 1+7*, 1+8*, 1+9*, 1+10*, 1+20 |
| STATUS | STATUS+1~, STATUS+3*, STATUS+4*, STATUS+5*, STATUS+6 |
| TYPE | TYPE+3~, TYPE+5*, TYPE+6*, TYPE+7 |
| U | PWRKDAY+5, PDAY+4, PDAY+6, WHO+6, WRKDAY+5, WRKDAY+7, CWRKDAY+4, CANWKDY+4, CANWKDY+6 |
| >> VALMBG | NUM+1, NUM2+1 |
| >> VALMLST | NUM+1, NUM2+1 |
| WHO | WHO+4~, WHO+5*, WHO+6*, WHO+7*, WHO+8, WHO+10*, WHO+11*, WHO+12 |
| X | PDAY+10, WDAY+13~, 1, 1+2*, 1+3* |
| X1 | PDAY+2~, PDAY+6*, PDAY+7*, 1* |
| X2 | PDAY+2~, PDAY+4*, PDAY+5, 1* |
| Y | WDAY+13~ |
