IBCNAU1 ;ALB/KML/AWC - USER EDIT REPORT (REPORT FILTER SELECTION) ;6-APRIL-2015
Source file <IBCNAU1.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 2 | $$PYRAPP^IBCNEUT5 PAYER^IBCNINSL |
VA FileMan | 1 | ^DIR |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Integrated Billing | 1 | IBCNAU |
Name | Comments | DBIA/ICR reference |
---|---|---|
SELR() | ;EP - Select Report Type
; IB*2.0*664 - Added function ; Prompt user to select report for User edits to Insurance Company/Group Plan or Payers or BOTH ; Input: None ; Returns: 1 - Insurance Company/Group Plan ; 2 - Payers ; 3 - Both Insurance Company/Group Plan and Payers ; -1 - No selection made |
|
SELRQ | ||
SELI() | ; Prompt user to select all or subset of insurance companies
; Count ins. companies with plans |
|
SELIQ | ||
SELP(ALLINS,PLANS) | ; Prompt user if Group Plans is to be on the report
; input/output - PLANS passed by reference. Returned with 1 or 0 ; function output returns 1 or 0 in IBV2 |
|
SELPQ | ||
SELPY() | ; Prompt user if Payer(s) are to be on the report
; function output returns 1 or 0 in IBV5 |
|
SELPYQ | ||
GPYR(ALLPYRS) | ; Select the Payers to be reported on.
; -- allow user to select payers |
|
GPYRALL | ; User wants to see all PAYERS that have received edits
|
|
SELU() | ; prompt user to select user id
|
|
SELUQ | ||
GETTYP() | ; Get display/output type
; RETURNS : Output destination (0=Display; 1=MS Excel) ; LOCAL VARIABLES : ; DIR,DUOUT - Standard FileMan variables ; Y - User input |
|
OK(QUIT) | ; -- ask okay
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(36 - [#36] | SELI+6 |
^IBE(365.12 - [#365.12] | GPYRALL+3, GPYRALL+4 |
^TMP("IBPYR" | GPYR+2!, GPYR+10*, GPYRALL+2!, GPYRALL+8* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ALLINS | SELP~, SELP+15 |
ALLPYRS | GPYR~, GPYR+3 |
DIR | SELR+9~, SELI+3~, SELP+5~, SELPY+4~, SELU+2~, GETTYP+5~, GETTYP+10!, OK+1~ |
DIR("?" | SELR+16*, SELR+17*, SELR+18*, SELI+9*, SELI+10*, SELP+22*, SELPY+10*, SELU+7* |
DIR("A" | SELR+12*, SELR+13*, SELR+14*, SELR+15*, SELI+6*, SELI+7*, SELI+8*, SELP+7*, SELP+19*, SELP+20* , SELP+21*, SELPY+7*, SELPY+8*, SELPY+9*, SELU+4*, SELU+5*, SELU+6*, GETTYP+8*, OK+3* |
DIR("B" | SELR+19*, GETTYP+9*, OK+3* |
DIR(0 | SELR+11*, SELI+5*, SELP+6*, SELP+18*, SELPY+6*, SELU+3*, GETTYP+7*, OK+3* |
DIROUT | SELR+9~, SELI+3~, SELP+5~, SELPY+4~, SELU+2~ |
DIRUT | SELR+9~, SELR+21, SELI+3~, SELI+11, SELP+5~, SELP+10, SELP+24, SELPY+4~, SELPY+12, SELU+2~ , SELU+8, GETTYP+5~, GETTYP+11, OK+4 |
DTOUT | SELR+9~, SELI+3~, SELP+5~, SELPY+4~, SELU+2~ |
DUOUT | SELI+3~, SELP+5~, SELPY+4~, SELU+2~, GETTYP+5~, GETTYP+11, OK+4 |
IBPAYER | GPYR+4~, GPYR+7 |
IBPAYER( | GPYR+9 |
IBPYR | GPYR+4~, GPYR+8*, GPYR+9*, GPYR+10 |
IBTXT | GPYR+4~, GPYR+9*, GPYR+10 |
IBV0 | SELR+9~, SELR+22*, SELRQ |
IBV1 | SELI+3~, SELI+11*, SELI+12*, SELIQ |
IBV2 | SELP+5~, SELP+10*, SELP+12*, SELP+15*, SELP+24*, SELP+25*, SELPQ |
IBV3 | SELU+2~, SELU+8*, SELU+9*, SELUQ |
IBV5 | SELPY+4~, SELPY+12*, SELPY+13*, SELPYQ |
PLANS | SELP~, SELP+12*, SELP+15*, SELP+25* |
PYRIEN | GPYRALL+1~, GPYRALL+4*, GPYRALL+7, GPYRALL+8 |
PYRNAM | GPYRALL+1~, GPYRALL+3*, GPYRALL+4, GPYRALL+8 |
PYRTXT | GPYRALL+1~ |
QUIT | OK~, OK+4* |
U | SELI+6 |
X | SELI+3~, SELP+5~, SELPY+4~, SELU+2~, OK+1~ |
Y | SELR+21, SELR+22, SELI+3~, SELI+11, SELI+12, SELP+5~, SELP+12, SELP+15, SELP+24, SELP+25 , SELPY+4~, SELPY+12, SELPY+13, SELU+2~, SELU+8, SELU+9, GETTYP+5~, GETTYP+11*, GETTYP+12, OK+1~ , OK+5 |