IBRFIWLA ;ALB/FA - IB LIST OF Request For Additional Information (RFAI) SCREEN ;18-JUL-2015
Source file <IBRFIWLA.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SORTSET(LEVEL,DEFSORT,IBSORT1,IBDONE) | ;EP
; Allows the user to select Primary or Secondary sort option ; Input: LEVEL - 1 - Setting Primary Sort ; 2 - Setting Secondary sort ; DEFSORT - Default sort value ; Optional, defaults to "" ; IBSORT1 - Current Primary Sort Value ; Optional, only passed when selecting the Secondary sort ; Output: IBDONE - 1 if user '^' or timed out, 0 otherwise ; Returns: Selected Sort Option |
|
| SELMSG(PROMPT) | ;EP
; Select a message ; Input: PROMPT - Prompt to display to the user ; ^TMP("IBRFIWLIX",$J,CNT)=RFAIEN ; Returns: IEN of the selected message or "" |
|
| SELENTRY(PROMPT,START,END) | ||
| BLDCOM(RFAIEN,SLINE,ELINE) | ; Build the Comment Section (if a comment exists) - called from IBRFIWL1
; Input: RFAIEN - IEN of the selected Message ; SLINE - Starting Section Line Number ; ELINE - Current Ending Section Line Number ; Output: ELINE - Updated Ending Section Line Number |
|
| WRAP(STRING,ROOM,SUBS,IBARY) | ; wrap long lines without breaking up words, called from IBRFIWL1
|
|
| SD(SORT) | ;EP
; Returns the sort description given the sort code ; Input: SORT - Sort Code ; Returns: Sort Description |
|
| ZZ | ; List of allowable sort criteria
|
|
| ZZN | ;;N:Earliest Date Received
|
|
| ZZO | ;;O:Latest Date Received
|
|
| ZZE | ;;E:Earliest Due Date
|
|
| ZZD | ;;D:Latest Due Date
|
|
| ZZI | ;;I:Insurance Company Name
|
|
| ZZP | ;;P:Patient Name
|
|
| ZZB | ;;B:Authorizing Biller
|
|
| ZZL | ;;L:LOINC Code
|
|
| END | ;;END
|
|
| PURGWL | ; purge file 368 entries based on # of days in PURGE DAYS 277 RFAI
; in IB SITE PARAMETERS (field #52.02 in file #350.9) ; Called from NIGHTLY^IBTRKR (tasked option IB MT NIGHT COMP) ; null entry (the default) indicates the transactions will be stored forever. |
|
| BLDSLI(RFAIEN,SLINE,ELINE) | ; Build the Service Line Information Section - called from IBRFIWL1
; Input: RFAIEN - IEN of the selected Message ; SLINE - Starting Section Line Number ; ELINE - Current Ending Section Line Number ; Output: ELINE - Updated Ending Section Line Number |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | FIND1^DIC |
| ^IBE(350.9 - [#350.9] | GET1^DIQ |
| ^IBA(368 - [#368] | GET1^DIQ |
| ^IBE(368.001 - [#368.001] | GET1^DIQ |
| 368.0201 | GET1^DIQ |
| 368.12199 | GET1^DIQ |
