Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBCNOR1

Package: Integrated Billing

Routine: IBCNOR1


Information

IBCNOR1 ;AITC/DTG - PATIENT MISSING COVERAGE REPORT ;08/14/23

Source Information

Source file <IBCNOR1.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; entry point
Q10 ; ask ins
Q20 ; ask group
Q30 ; Group Name/Group Number/Both filter
Q40 ; type of group
; Group(s)that Begin/Contain/Range XXX
Q45 ; select groups if not all
Q50 ; ask patient
Q60 ; check if all and ask to proceed
Q70 ; Report or CSV output
EXIT ; quit
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 ;
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 ;
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 ;
NR ; Ask Name Range
NRR ;
NRRHLP(IBLEVEL) ; ?? Help for the Range Prompt
SELALL ; ask if user say run for all ins / groups / patients
SELALLQ ; back
DEVICE ;
ENQ ;
OUT ; Prompt to allow users to select output format
; Returns: E - Output to excel
; R - Output to report
; STOP=1 - No Selection made
OUTQ ;
STOP() ; Determine if user wants to exit out of the whole option
; Init vars
STOPX ; STOP exit pt
CHKINS(IBISN) ; check that insurance is allowed
CHKNM(INSNAME) ; check name
; check on ins name
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 ;
BLDSELECT ; go through selected insurances and get their groups
BLDINSGR ; go through insurances and get their groups

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This report allows the user to list patients who have an active medical"
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !,"policy/coverage and are missing an active pharmacy policy/coverage.",!!
  • Line Location: EN+14
Function Call: WRITE
  • Prompt: !!,"** No Insurance Companies selected! **",!!
  • Line Location: Q10+16
Function Call: WRITE
  • Prompt: !," No Groups/Plans selected for the chosen insurances",!!
  • Line Location: Q45+18
Function Call: WRITE
  • Prompt: !
  • Line Location: SELI+13
Function Call: WRITE
  • Prompt: !!,"The selected Company(s) does not contain any Groups",!!
  • Line Location: SELG+23
Function Call: WRITE
  • Prompt: !!,"Some Selected Companies do not contain groups and will not display on the report"
  • Line Location: SELG+28
Function Call: WRITE
  • Prompt: !
  • Line Location: SELG+32
Function Call: WRITE
  • Prompt: !
  • Line Location: SELGN+7
Function Call: WRITE
  • Prompt: !!,"Enter Start With value or Press <ENTER> to start at the beginning of the list.",!
  • Line Location: NRR+1
Function Call: WRITE
  • Prompt: !!,"Enter Go To value or Press <ENTER> to finish at the end of the list.",!
  • Line Location: NRR+8
Function Call: WRITE
  • Prompt: !!,?5,"* The Go to Patient Name must follow after the Start with Name. *",!
  • Line Location: NRR+14
Function Call: WRITE
  • Prompt: !!,?5,"Enter a value the Patient Name should ",IBLEVEL," with."
  • Line Location: NRRHLP+1
Function Call: WRITE
  • Prompt: !,?5,"Press <ENTER> to start at the beginning of the list."
  • Line Location: NRRHLP+2
Function Call: WRITE
  • Prompt: !,?5,"Press <ENTER> to finish at the end of the list."
  • Line Location: NRRHLP+3
Function Call: WRITE
  • Prompt: !
  • Line Location: SELALL+2
Function Call: WRITE
  • Prompt: !!,"We recommend you queue this report as it will take awhile."
  • Line Location: DEVICE+2
Function Call: WRITE
  • Prompt: !!,"For CSV output, turn logging or capture on now.",!
  • Line Location: DEVICE+4
Function Call: WRITE
  • Prompt: !
  • Line Location: OUT+5
Function Call: WRITE
  • Prompt: !
  • Line Location: STOP+4
Function Call: WRITE
  • Prompt: !
  • Line Location: SELFILT+16
Function Call: WRITE
  • Prompt: !
  • Line Location: SELFILT+39
Function Call: WRITE
  • Prompt: !
  • Line Location: SELFILT+56
Function Call: WRITE
  • Prompt: !!,"Insurance Company # "_IBCO_": "_IBINSN
  • Line Location: BLDSELECT+13
Function Call: WRITE
  • Prompt: " ...building a list of plans..."
  • Line Location: BLDSELECT+18
Function Call: WRITE
  • Prompt: "."
  • Line Location: BLDINSGR+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(355.3 - [#355.3] GET1^DIQ,  GETS^DIQ
^DIC(36 - [#36] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call