IBCNGP ;ALB/CKB - REPORT OF COVERAGE LIMITATIONS (MAIN DRIVER/PROMPTS) ; 07-OCT-2021
Source file <IBCNGP.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;Main Entry point
; Initialize variables |
|
C10 | ; All/Selected Insurance Companies
|
|
C20 | ; Inactive/Active/Both Insurance Company look-up filter
|
|
C30 | ; Insurance Company look-up listman template
; Allow user selection of Insurance Companies |
|
G10 | ; All/Selected Group Plans
|
|
G20 | ; Inactive/Active/Both Group Plan filter
|
|
G30 | ; Group Name/Group Number/Both filter
|
|
G40 | ; Group(s)that Begin/Contain/Range XXX
|
|
G50 | ; Group Coverage Status filter
|
|
O10 | ; Report or CSV output
|
|
EXIT | ;
|
|
DEVICE | ;
|
|
ENQ | ;
|
|
START | ; Group Plan look-up listman template
; Allow user selection of one or more Group Plans ; Input: IBCNGP("IBIP") 0-Selected, 1-All Group Plans ; IBCNGP("IBIPA") 0-Inactive, 1-Active, 2-Both Active and Inactive Group Plans ; IBCNGP("IBIGN") 1-Group Name, 2-Group Number, 3-Both Group Name and Group Number ; IBCNGP("IBFIL") A^B^C where" ; A - 1-Begin with, 2-Contains, 3-Range ; B - A=1 Begin with text, A=2 Contains text, A=3 Range start text ; C - only if A=3 Range End text |
|
STARTQ | ;
|
|
GETGRP | ; Gather Group Plans by Insurance Companies
|
|
SORT | ; Sort the currently selected insurance companies into name order
|
|
SELI | ; Prompt user to select all or subset of insurance companies
; Count insurance companies with plans ; Returns: 0 - User selects insurance companies ; 1 - Run report for all insurance companies with plans ; STOP=1 - No selection made |
|
SELIQ | ;
|
|
SELA | ; Prompt user to select Active/Inactive/Both Insurance Companies
; Returns: 0 - INACTIVE Insurance Companies Only ; 1 - ACTIVE Insurance Companies Only ; 2 - Both ACTIVE and INACTIVE Insurance Companies ; STOP=1 - No selection made |
|
SELAQ | ;
|
|
SELG | ; Prompt user to select all or subset of group plans
; Count of group plans ; Returns: 0 - Selected Group Plans ; 1 - All Group Plans ; STOP=1 - No selection made |
|
SELGQ | ;
|
|
SELGA | ; Prompt user to select Active/Inactive/Both Group Plans
; Input: None ; Returns: 0 - INACTIVE Group Plans Only ; 1 - ACTIVE Group Plans Only ; 2 - Both ACTIVE and INACTIVE Group Plans ; -1 - No selection made |
|
SELGAQ | ;
|
|
SELGN | ; Prompt user to select Group Name/Group Number/Both filter
; Returns: 1 - Group Name ; 2 - Group Number ; 3 - Both Group Name and Group Number ; -1 - No selection made |
|
SELGNQ | ;
|
|
SELFILT() | ; Group Plan filter
; Returns: A^B^C Where: ; A - 1 - Search for Group(s) that begin with ; the specified text (case insensitive) ; 2 - Search for Group(s) that contain ; the specified text (case insensitive) ; 3 - Search for Group(s) in a specified ; range (inclusive, case insensitive) ; 4 - Search for Group(s) that are BLANK or null ; B - Begin with text if A=1, Contains Text if A=2 or ; the range start if A=3 ; C - Range End text (only present when A=3) ; -1 if a valid filter was not selected |
|
SELFILTQ | ;
|
|
SELCS | ; Prompt user to select Coverage Status of the Group Plan(s)
; Input: None ; Returns: 1 - Coverage Status COVERED only ; 2 - Coverage Status NOT COVERED only ; 3 - Coverage Status CONDITIONAL only ; 4 - Coverage Status BY DEFAULT only ; 5 - ALL Coverage Statuses ; -1 - No selection made |
|
SELCSQ | ;
|
|
OUT | ; Prompt to allow users to select output format
; Returns: E - Output to excel ; R - Output to report ; STOP=1 - No Selection made |
|
OUTQ | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DIC(36 - [#36] | GET1^DIQ |