IBFBWL5 ;ALB/PAW-IB NVC Precert Worklist Main ;30-SEP-2015
Source file <IBFBWL5.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETAUT(IBGRP) | ; Obtain new authorizations, based upon review group
|
|
| LOOP1 | ; Loop to create Insurance Verification Worklist
|
|
| LOOP2 | ; Loop to create RUR Worklist
|
|
| BLDTMP | ; Build ^TMP("IBFBWL",$J)
|
|
| DEMOS | ; Auth Demographics
|
|
| BLDWL | ; Build Work List Screen
; Build display lines ; Loop by IV (IBGRP=1) or RUR (IBGRP=2) sort |
|
| 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 |
|
| SETX | ; Set temp global IBFBWLX by VCNT
|
| FileNo | Call Tags |
|---|---|
| 161.01 | GET1^DIQ |
| ^FBAA(161.43 - [#161.43] | GET1^DIQ |
| ^DIC(36 - [#36] | GET1^DIQ |
| ^IBFB(360 - [#360] | GET1^DIQ |
