IBTRED1 ;ALB/AAS - CLAIMS TRACKING EDIT ; 06-JUL-93
Source file <IBTRED1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NX(IBTMPNM) | ; -- edit next template
|
|
| EDIT(IBTEMP,BLD) | ; -- edit entry point for claims tracking
; -- Input IBTEMP = template name or dr string ; BLD = any non-zero value if calling routine is doing own ; rebuild |
|
| EDITQ | ||
| SAVE | ; -- Save the global before editing
|
|
| COMP | ; -- Compare before editing with globals
|
|
| UPDATE | ; -- enter date and user if editing has taken place
; entry locked by edit, locks not needed here |
|
| DICS(Y) | ; -- called by input transform and screen logic for type of diagnois
|
|
| DICSQ | ||
| BILLD(IBTRN) | ; -- compute total amount billed and received for this visit
; -- output total amount billed (minus offset) ^ total amount recieved |
|
| BILLDQ | ||
| COMPUT | ; -- add up the numbers
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^IBT(356 - [#356] | Classic Fileman Calls |
