IBFBWL4 ;ALB/PAW-IB BILLING Worklist History ;30-SEP-2015
Source file <IBFBWL4.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; -- main entry point for IB BILLING WORKLIST HISTORY
|
|
| HDR | ; -- header code
|
|
| INIT | ; -- init variables and list array
; input - ^TMP("IBFBWH",$J,IBA)=IBHDT^IBHLG^IBHUSR ; output - Worklist History Screen for one Patient / Auth |
|
| RUR | ; Determine RUR Reason Code
|
|
| BLD | ; build data to display
|
|
| SETL(LINE,DATA,LABEL,COL,LNG) | ; Creates a line of data to be set into the body
; of the worklist ; Input: LINE - Current line being created ; DATA - Information to be added to the end of the current line ; LABEL - Label to describe the information being added ; COL - Column position in line to add information add ; LNG - Maximum length of data information to include on the line ; Returns: Line updated with added information |
|
| HELP | ; -- help code
|
|
| EXIT | ; -- exit code
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^VA(200 - [#200] | GET1^DIQ |
