IBTRV ;ALB/AAS - CLAIMS TRACKING REVIEWS (UR) ; 27-JUN-1993
Source file <IBTRV.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; -- main entry point for IBT REVIEW EDITOR from menu's
|
|
| ENQ | ||
| HDR | ; -- header code
|
|
| INIT | ; -- init variables and list array
|
|
| BLD | ; -- Build list of Reviews
|
|
| SET(X) | ; -- set arrays
|
|
| HELP | ; -- help code
|
|
| EXIT | ; -- exit code
|
|
| TRAC | ; -- Select tracking entry
|
|
| TRACQ | ||
| DEFV(DFN) | ; -- compute default visit for patient
|
|
| DEFVQ | ||
| VNDT(X) | ; -- compute vaindt for call to inp^vadtp
; -- Input x = internal entry of review |
|
| TRTP(X) | ; -- Compute Review type code
; Input x = internal entry of review ; output = code for review from 356.11 |
|
| IBUR(IBTRN) | ; -- reason for review
|
|
| LIST(DFN,DFLT) | ; list 1 screen of most recent CT entries
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^IBT(356 - [#356] | Classic Fileman Calls |