Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
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>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Integrated Billing 4 EN^IBCNILK  $$SELFILT^IBCNOR1  OK^IBCNSM3  LKP^IBCNSU21  
Kernel 2 $$UP^XLFSTR  EN^XUTMDEVQ  
VA FileMan 2 ($$GET1,GETS)^DIQ  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Integrated Billing 3 IBCN PT MISSING COVERAGE REPT  IBCNOR1  IBCNOR1A  

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

External References

Name Field # of Occurrence
$$GET1^DIQ Q45+9, SELI+9, SELG+15, SELG+18, CHKINS+4, CHKINS+5
GETS^DIQ BLDINSGR+12
^DIR Q10+16, Q20+4, Q45+18, SELI+20, SELG+39, SELGN+16, NRR+4, NRR+11, SELALL+10, OUT+11
, STOP+10, SELFILT+33, SELFILT+50, SELFILT+62
EN^IBCNILK Q10+7
$$SELFILT^IBCNOR1 Q40+3
OK^IBCNSM3 BLDSELECT+14
LKP^IBCNSU21 BLDSELECT+21
$$UP^XLFSTR NRR+6, NRR+13, CHKNM+4
EN^XUTMDEVQ DEVICE+14

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
Routine Call
  • DIR
  • Line Location:
    • Q10+16
    • Q20+4
    • Q45+18
    • SELI+20
    • SELG+39
    • SELGN+16
    • NRR+4
    • NRR+11
    • SELALL+10
    • OUT+11
    • STOP+10
    • SELFILT+33
    • SELFILT+50
    • SELFILT+62

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(355.3 - [#355.3] GET1^DIQ,  GETS^DIQ
^DIC(36 - [#36] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBA(355.3 - [#355.3] SELI+8, SELG+16, SELG+17, BLDINSGR+9
^TMP("IBCNILKA" Q10+8, Q10+9, Q10+11, Q20+10
^TMP("IBCNOR" Q10+2!, Q10+14*, Q45+7, Q45+9, Q45+15, Q45+16, EXIT+2!, SELG+13, SELG+14, BLDSELECT+11!
, BLDSELECT+24!, BLDSELECT+31*, BLDSELECT+32, BLDINSGR+7, BLDINSGR+16*
^TMP($J Q10+2!, Q10+9!*, Q20+10!*, EXIT+3!, BLDSELECT+3!, BLDSELECT+20!, BLDSELECT+23, BLDSELECT+27, BLDSELECT+29, BLDSELECT+32!*

Label References

Name Line Occurrences
BLDSELECT Q45+12
DEVICE Q70+4
EXIT Q10+4, Q10+16, Q20+2, Q20+4, Q30+1, Q40+5, Q45+3, Q50+4, Q60+3, Q70+2
NR Q50+3
NRR NRR+14
OUT Q70+1
OUTQ OUT+12
Q50 Q10+19, Q20+6
SELALL Q60+2
SELFILTQ SELFILT+36, SELFILT+53
SELG Q20+2
SELGN Q30+1
SELGNQ SELGN+17
SELGQ SELG+40
SELI Q10+3
SELIQ SELI+21
STOPX STOP+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIC EN+16~
DIR EN+16~, Q10+16!, Q20+4!, Q45+18!, SELI+12~, SELI+20!, SELG+31~, SELG+39!, SELGN+6~, SELGN+16!
, NR+1~, SELALL+1~, SELALL+10!, OUT+4~, OUT+11!, STOP+2~, STOP+10!, SELFILT+13~, SELFILT+40!, SELFILT+50!
, SELFILT+57!
DIR("?" SELI+18*, SELI+19*, SELG+37*, SELG+38*, SELGN+13*, SELGN+14*, SELGN+15*, NRR+3*, NRR+10*, SELALL+9*
, OUT+9*, OUT+10*, STOP+8*, STOP+9*, SELFILT+23*, SELFILT+24*, SELFILT+25*, SELFILT+26*, SELFILT+27*, SELFILT+28*
, SELFILT+29*, SELFILT+30*, SELFILT+31*, SELFILT+45*, SELFILT+47*, SELFILT+49*, SELFILT+61*
DIR("A" SELI+15*, SELI+16*, SELI+17*, SELG+34*, SELG+35*, SELG+36*, SELGN+9*, SELGN+10*, SELGN+11*, SELGN+12*
, NRR+2*, NRR+9*, SELALL+4*, SELALL+5*, SELALL+6*, SELALL+7*, SELALL+8*, OUT+7*, STOP+6*, SELFILT+18*
, SELFILT+19*, SELFILT+20*, SELFILT+21*, SELFILT+22*, SELFILT+43*, SELFILT+59*
DIR("B" SELALL+3*, OUT+8*, STOP+7*, SELFILT+60*
DIR(0 Q10+16*, Q20+4*, Q45+18*, SELI+14*, SELG+33*, SELGN+8*, NRR+2*, NRR+9*, SELALL+3*, OUT+6*
, STOP+5*, SELFILT+17*, SELFILT+41*, SELFILT+58*
DIROUT SELI+12~, SELI+21, SELG+31~, SELG+40, SELGN+6~, SELGN+17, NR+1~, SELALL+1~, SELALL+12, OUT+4~
, OUT+12, SELFILT+13~, SELFILT+34, SELFILT+51, SELFILT+63
DIRUT SELI+12~, SELI+21, SELG+31~, SELG+40, SELGN+6~, SELGN+17, NR+1~, SELALL+1~, SELALL+12, OUT+4~
, OUT+12, STOP+2~, STOP+11, SELFILT+13~, SELFILT+34, SELFILT+51, SELFILT+63
DTOUT SELI+12~, SELI+21, SELG+31~, SELG+40, SELGN+6~, SELGN+17, NR+1~, NRR+4, NRR+11, SELALL+1~
, SELALL+12, OUT+4~, OUT+12, SELFILT+13~, SELFILT+34, SELFILT+51, SELFILT+63
DUOUT SELI+12~, SELI+21, SELG+31~, SELG+40, SELGN+6~, SELGN+17, NR+1~, NRR+4, NRR+11, SELALL+1~
, SELALL+12, OUT+4~, OUT+12, SELFILT+13~, SELFILT+34, SELFILT+51, SELFILT+63
FILTER SELFILT+13~, SELFILT+35*, SELFILT+36, SELFILT+42, SELFILT+44, SELFILT+46, SELFILT+48, SELFILT+52*, SELFILT+53, SELFILT+60
, SELFILT+64*, SELFILTQ+1
GCT BLDSELECT+2~, BLDSELECT+28*, BLDSELECT+30*, BLDSELECT+31, BLDINSGR+2~, BLDINSGR+6*, BLDINSGR+8*, BLDINSGR+15*, BLDINSGR+16
GIEN BLDSELECT+2~, BLDSELECT+29*, BLDSELECT+31, BLDINSGR+2~
I DEVICE+1~
IBA SELI+6~, SELI+7*, SELI+8*, SELI+9, SELG+6~, SELG+14*, SELG+15, SELG+16, SELG+17, CHKINS+2~
, CHKNM+3~
IBA0 SELG+6~, SELG+13*, SELG+14
IBARRAY EN+16~, Q10+1!
IBB EN+16~, SELI+6~, SELI+7*, SELI+10*, SELI+14, SELI+15, SELG+17*, SELG+18, DEVICE+1~, DEVICE+13*
, CHKINS+2~, CHKNM+3~
IBC CHKINS+2~, BLDSELECT+2~, BLDSELECT+9*, BLDSELECT+11, BLDSELECT+24, BLDSELECT+31, BLDINSGR+2~, BLDINSGR+6*, BLDINSGR+7*, BLDINSGR+16
IBCNOR EN+16~
IBCNOR("IBFIL" Q10+23*, Q20+8*, Q40+6*, BLDSELECT+21
IBCNOR("IBI" Q10+5, Q10+19, Q60+2, SELI+22*, SELG+22
IBCNOR("IBIA" EN+20*, SELI+23*
IBCNOR("IBIG" Q10+21*, Q20+6, Q45+3, Q60+2, SELG+8*, SELG+24*, SELG+41*, BLDSELECT+5, BLDINSGR+5
IBCNOR("IBIGA" EN+21*, SELG+9*, SELG+42*
IBCNOR("IBIGN" Q10+22*, Q20+7*, SELGN+18*, BLDSELECT+21
IBCNOR("IBOUT" DEVICE+3, OUT+13*
IBCNS EN+16~, Q10+6~, Q10+11*, Q10+14
IBCO BLDSELECT+2~, BLDSELECT+6*, BLDSELECT+9*, BLDSELECT+13
IBCT SELG+6~, SELG+12*, SELG+19*, SELG+22, SELG+33, SELG+34, BLDINSGR+2~, BLDINSGR+4*, BLDINSGR+10*
IBFILTER EN+16~, Q40+3*, Q40+4, Q40+6
IBI Q45+5~, Q45+7*, Q45+9, Q45+11, Q45+14~, Q45+15*, Q45+16
IBI36 EN+16~
IBIN SELG+6~, SELG+18*
IBINAME EN+16~
IBINM EN+17~
IBINS BLDSELECT+2~, BLDSELECT+8*, BLDSELECT+9, BLDSELECT+21, BLDINSGR+2~, BLDINSGR+6*, BLDINSGR+7*, BLDINSGR+9
IBINSLNM EN+17~, SELG+13*, SELG+15*
IBINSN BLDSELECT+2~, BLDSELECT+6*, BLDSELECT+7*, BLDSELECT+8, BLDSELECT+9, BLDSELECT+13
IBISN CHKINS~, CHKINS+4, CHKINS+5
IBITYP EN+17~
IBJ Q45+5~, Q45+14~, Q45+16*
IBJOB DEVICE+7~, DEVICE+12*
IBL CHKINS+2~, CHKNM+3~
IBLEVEL EN+16~, NRRHLP~, NRRHLP+1, NRRHLP+2, NRRHLP+3
IBN Q45+5~, Q45+9*, Q45+11, Q45+14~, Q45+15*, Q45+16*, Q45+17
IBNM Q45+8~, Q45+9*, Q45+10, Q45+11
IBOK EN+17~, CHKINS+3*, CHKINS+7*, CHKINS+10*, CHKINS+11*, CHKINS+12*, CHKINS+13*, CHKINS+14*, CHKINS+15*, CHKINS+16*
, CHKINS+17*, CHKINS+18*, CHKNM+2*, CHKNM+4*, CHKNM+5*, CHKNM+6*, CHKNM+7*, CHKNM+8*, CHKNM+9*, CHKNM+10*
, CHKNM+11*, CHKNM+12*, CHKNM+13*, CHKNM+14*, CHKNM+15*, BLDSELECT+13*, BLDSELECT+17
IBOK1 EN+17~
IBP BLDSELECT+2~, BLDINSGR+2~, BLDINSGR+8*, BLDINSGR+9*, BLDINSGR+12, BLDINSGR+13, BLDINSGR+16
IBQUIT EN+17~, EN+19*, Q10+8*, Q10+16, Q40+2*, Q45+3*, Q45+12, BLDSELECT+6*, BLDSELECT+7, BLDSELECT+8
, BLDSELECT+15, BLDSELECT+22
IBRF EN+17~, Q60+2, NRR+5*, NRR+6
IBRFU EN+17~, Q60+2, NRR+6*, NRR+14
IBRL EN+17~, Q60+2, NRR+12*, NRR+13
IBRLU EN+18~, Q60+2, NRR+13*, NRR+14
IBSCR EN+18~
IBSORT EN+17~, Q45+5~, Q45+6!
IBSORT( Q45+11*, BLDSELECT+7, BLDSELECT+8, BLDSELECT+9
IBSTOP EN+18~, EN+19*, Q10+3*, Q10+4, Q20+2*, Q30+1*, Q40+2*, Q40+4*, Q40+5, Q45+3*
, Q45+12, Q45+17*, Q50+2*, Q50+4, Q60+1*, Q60+3, Q70+1*, Q70+2, SELI+21*, SELG+40*
, SELGN+17*, NRR+4*, NRR+11*, SELALL+3*, SELALL+12*, OUT+12*, STOP+11*, STOP+12*, BLDSELECT+6*, BLDSELECT+7
, BLDSELECT+8, BLDSELECT+15*, BLDSELECT+22*, BLDINSGR+6*, BLDINSGR+7
IBTMP EN+17~
IBTYP EN+17~, CHKINS+5*, CHKINS+10, CHKINS+11, CHKINS+12, CHKINS+13, CHKINS+14, CHKINS+15, CHKINS+16, CHKINS+17
, CHKINS+18
IBXTFEED EN+17~
IIEN EN+18~
INACT EN+16~, SELI+6~, SELI+9*, SELI+10, SELG+6~, CHKINS+4*, CHKINS+7
INSCT EN+18~, Q10+6~, Q10+10*, Q10+12*, Q10+14, Q10+20*
INSNAM CHKNM+3~, CHKNM+4*, CHKNM+5, CHKNM+6, CHKNM+7, CHKNM+8, CHKNM+9, CHKNM+10, CHKNM+11, CHKNM+12
, CHKNM+13, CHKNM+14, CHKNM+15
INSNAME EN+18~, CHKNM~, CHKNM+2*, CHKNM+4
IOST BLDINSGR+10
NGFLG EN+18~, SELG+11*, SELG+16*, SELG+28
NGFND EN+18~, Q20+4, SELG+11*, SELG+24*
PLANDATA BLDSELECT+2~, BLDINSGR+2~, BLDINSGR+11!
PLANDATA( BLDINSGR+13
PLANOK BLDSELECT+2~, BLDINSGR+2~, BLDINSGR+11!
POP EN+18~, DEVICE+1~, DEVICE+7~
X EN+18~, SELI+12~, SELG+31~, SELGN+6~, NR+1~, SELALL+1~, OUT+4~, STOP+2~, SELFILT+13~
XX SELFILT+13~, SELFILT+32*, SELFILT+42*, SELFILT+43
Y EN+18~, SELI+12~, SELI+22!, SELG+31~, SELG+41!, SELGN+6~, SELGN+18, NR+1~, NRR+5, NRR+12*
, SELALL+1~, SELALL+11*, SELALL+12, OUT+4~, OUT+13, STOP+2~, STOP+11*, STOP+12, STOPX+1, SELFILT+13~
, SELFILT+35, SELFILT+52, SELFILT+64
ZTDESC DEVICE+7~, DEVICE+9*, DEVICE+14
ZTRTN DEVICE+7~, DEVICE+8*, DEVICE+14
ZTSAVE DEVICE+7~, DEVICE+14
ZTSAVE( DEVICE+13*
ZTSAVE("^TMP(""IBCNILKA"",$J," DEVICE+11*
ZTSAVE("^TMP(""IBCNOR"",$J," DEVICE+10*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All