RMPRPS34 ;HISC/RVD/HNC -Check 661.1 and Save Inventory flag ;9/2/04 12:13
Source file <RMPRPS34.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;entry point
|
|
SAVE | ||
RESET | ||
UPCPT | ;update Inactive CPT code starting 4/1/02
|
|
DUP | ;repoint duplicate HCPCS (660, 664, 664.1, 665, 661.2, 661.3
|
|
KILLB | ;kill & set 'B' cross reference in 661.1.
|
|
KILLC | ;kill & set 'C' cross reference in 661.1.
|
|
KILLE | ;kill & set 'E' cross reference in 661.1.
|
|
EXIT | ;EXIT
|
|
PAT64 | ||
PAT64X | ||
WHUP | ;Wheelchair Update Record with new Grouper Number
|
|
KILLNDS | ;
|
|
P91 | ;Patch 91
|
|
HLST | ;Wheelchair IEN to update to R10 A
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^RMPR(661.1 - [#661.1] | Classic Fileman Calls |