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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBCNEDE2

Package: Integrated Billing

Routine: IBCNEDE2


Information

IBCNEDE2 ;DAOU/DAC - eIV Appointment Extract ;23-SEP-2015

Source Information

Source file <IBCNEDE2.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
Integrated Billing 9 PT^IBCNEBF  $$SIDCHK^IBCNEDE5  UPDDTS^IBCNEDE6  ($$PYRACTV,$$SETTINGS,$$SETTQ)^IBCNEDE7  $$INSERROR^IBCNEUT3  $$EXCLUDE^IBCNEUT4  ($$ADDTQ,$$BFEXIST,$$MGRP,MSG,TQUPDSV)^IBCNEUT5  PAYER^IBCNINSU  
ALL^IBCNS1  
Kernel 3 $$S^%ZTLOAD  ($$FMADD,$$FMDIFF,$$FMTE)^XLFDT  $$LJ^XLFSTR  
VA FileMan 2 $$FIND1^DIC  $$GET1^DIQ  
Registration 1 INP^VADPT  
Scheduling 1 $$SDAPI^SDAMA301  

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 IBCNEDE  IBCNEDE4  IBCNEQU1  

Entry Points

Name Comments DBIA/ICR reference
EN ; Loop through designated cross-references for updates
; Appointment extract
; IB*2.0*593 - Added EXCLTOC,EXCLTOP now initialized at top. Removed YY.
; IB*2.0*549 - Added YY,ZZ, Re-Arranged in alphabetical order
; IB*2*659/vd - Added the MFRESHDAY variable for Medicare Frequency.
; IB*2.0*743/DTG - Added IBBCK,IBFNDBLUP,IBPAYBLU,IBPQ,IBSNDOK,IBSRVICEDT for management of split dfn find and ins work.
; IB*2.0*743 Reorganize routine thus eliminating looping through the patient's insurance multiple times.
; This improves the efficiency and reduces risk of duplicate requests for the same policy. Make
; sure to create no more than one TQ entry per Blue payer per patient.
ENQ
GETELST(FILE) ; Returns a '^' delimited list of Type of Plans or Type of
; coverages to be excluded with leading and trailing '^'s
; IB*2.0*549 Added method
; IB*2.0*593 Added NO-FAULT INSURANCE. Refactored.
; Input: FILE - 355.1 - Return a list of Type of Plans to be excluded
; 355.2 - Return a list of Type of Coverages to be excluded
; Returns: '^' delimited list of Type of Plans or Type of Coverages
; to be excluded
CLINICEX ; Clinic exclusion
ELG ; Eligibility exclusion
INP ; Inpatient status
SET(SID,INR,PATID) ; Set data in TQ
ERRMSG ; Send a message indicating an extract error has occurred
OKFRESH(INREC,FRESHDAY,MFRESHDAY,MFLG) ; Identify those policies to exclude when
; verified within the "freshness days" for Medicare and non-Medicare policies.
; INPUT:
; INREC - IEN to current Insurance Plan
; FRESHDAY - Freshness Days Span
; MFRESHDAY - Medicare Freshness Days Span
; MFLG - Used to determine if the insurance plan is a Medicare Plan - 1=MEDICARE, 0=non-MEDICARE
; OUTPUT:
; OK = 0 - Exclude Policy
; = 1 - Include Policy
EXPIRED(EXPDT) ; check if insurance policy has already expired
; EXPDT - expiration date (2.312/3)
; returns 1 if expiration date is in the past, 0 otherwise

External References

Name Field # of Occurrence
$$S^%ZTLOAD EN+66
$$FIND1^DIC SET+15
$$GET1^DIQ EN+22, EN+102, EN+126, OKFRESH+13, OKFRESH+16, OKFRESH+18
PT^IBCNEBF EN+155, EN+159, EN+176
$$SIDCHK^IBCNEDE5 EN+174
UPDDTS^IBCNEDE6 EN+163
$$PYRACTV^IBCNEDE7 EN+153
$$SETTINGS^IBCNEDE7 EN+15
$$SETTQ^IBCNEDE7 SET+17
$$INSERROR^IBCNEUT3 EN+140
$$EXCLUDE^IBCNEUT4 EN+133
$$ADDTQ^IBCNEUT5 EN+170
$$BFEXIST^IBCNEUT5 EN+155, EN+159, EN+176
$$MGRP^IBCNEUT5 ERRMSG+4
MSG^IBCNEUT5 ERRMSG+22
TQUPDSV^IBCNEUT5 EN+166
PAYER^IBCNINSU EN+148
ALL^IBCNS1 EN+86
$$SDAPI^SDAMA301 EN+44
INP^VADPT INP+1
$$FMADD^XLFDT EN+24, EN+115, OKFRESH+20, OKFRESH+21
$$FMDIFF^XLFDT EXPIRED+5
$$FMTE^XLFDT ERRMSG+7
$$LJ^XLFSTR ERRMSG+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(350.9 - [#350.9] GET1^DIQ
^IBE(355.12 - [#355.12] FIND1^DIC
^IBA(355.3 - [#355.3] GET1^DIQ
^DIC(36 - [#36] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(43 - [#43] CLINICEX+2, ELG+2
^DIC(36 - [#36] EN+98
^DPT - [#2] EN+70, EN+71
^IBE( GETELST+24
^IBE(350.9 - [#350.9] EN+21
^SC - [#44] EN+33
^TMP("IBCNEDE2" EN+28!, EN+37*, ENQ!
^TMP($J EN+28!, EN+29!, EN+49, EN+52, EN+58, EN+68, EN+78*, EN+83, EN+92, ENQ!
ENQ+1!, ERRMSG+15

Label References

Name Line Occurrences
$$EXPIRED EN+135
$$GETELST EN+26, EN+27
$$OKFRESH EN+114
CLINICEX EN+35
ELG EN+75
ENQ EN+44
ERRMSG EN+44
SET EN+184, EN+193

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTINS EN+9~, EN+85!
ACTINS( EN+95, EN+97, EN+122, EN+135, EN+138, OKFRESH+11, OKFRESH+12, OKFRESH+15
ACTINS(0 EN+88
APTDT EN+9~, EN+54*, EN+58*, EN+61, EN+68
CLNC EN+9~, EN+31*, EN+33*, EN+37, EN+47*, EN+49*, EN+52, EN+58, EN+68, CLINICEX+2
CNT EN+9~, EN+23*, EN+33, EN+49, EN+52, EN+58, EN+95, EN+177*, SET+18*
DATA1 EN+9~, SET+8*, SET+9*, SET+17
DATA2 EN+9~, SET+13*, SET+17
DATA5 SET+6~, SET+15*, SET+17
DFN EN+9~, EN+52*, EN+58, EN+68, EN+70, EN+71, EN+78, EN+82*, EN+83*, EN+86
EN+92, EN+155, EN+159, EN+166, EN+170, EN+174, EN+176, SET+8
DISYS EN+9~
DT EN+24, EN+41, EN+54, ERRMSG+7, EXPIRED+4, EXPIRED+5
ELG EN+9~, EN+69*, EN+70*, ELG+1, ELG+2
ENDDT EN+9~, EN+24*, EN+41, EN+58
EXCLIST GETELST+21~, GETELST+22*, GETELST+26*, GETELST+27
EXCLTOC EN+9~, EN+26*, EN+105
EXCLTOP EN+9~, EN+27*, EN+129
EXPDT EXPIRED~, EXPIRED+4, EXPIRED+5
FILE GETELST~, GETELST+24
FOUND1 EN+9~
FOUND2 EN+9~
FRESHDAY EN+9~, EN+21*, EN+114, EN+115, EN+170, OKFRESH~, OKFRESH+20
FRESHDT EN+10~, EN+115*, EN+163, EN+174, SET+8
GIEN EN+10~, EN+122*, EN+126, OKFRESH+10~, OKFRESH+15*, OKFRESH+16
IBBCK EN+10~, EN+148!
IBBCK( EN+149
IBCNETOT EN+10~, EN+25*, EN+64*, EN+66
IBDDI EN+10~
IBFNDBLUP EN+10~, EN+83!
IBFNDBLUP( EN+150, EN+183, EN+186*, EN+192, EN+193*
IBINDT EN+10~
IBINS EN+10~
IBM ERRMSG+1~, ERRMSG+15*, ERRMSG+16*, ERRMSG+17*, ERRMSG+18*, ERRMSG+19*, ERRMSG+20*
IBOUTP EN+10~
IBPAYBLU EN+10~, EN+146*, EN+149*, EN+150, EN+183, EN+186, EN+192, EN+193
IBPQ EN+10~, EN+147*, EN+150*
IBSDA EN+10~, EN+44
IBSDA("FLDS" EN+40*
IBSDA(1 EN+41*
IBSDA(2 EN+42*
IBSDA(3 EN+43*
IBSDATA EN+10~, EN+68*, EN+69
IBSNDOK EN+11~, EN+192*, EN+193
IBSRVICEDT EN+11~, EN+91*, EN+92*, EN+94
IBX ERRMSG+1~, ERRMSG+15*
IEN GETELST+24~*, GETELST+25, GETELST+26
IIEN OKFRESH+10~, OKFRESH+12*, OKFRESH+13, OKFRESH+18
INR SET~, SET+13
INREC EN+11~, EN+94*, EN+95*, EN+97, EN+114, EN+122, EN+135, EN+138, EN+155, EN+159
EN+176, OKFRESH~, OKFRESH+11, OKFRESH+12, OKFRESH+15
INS EN+11~
INSIEN EN+11~, EN+97*, EN+98, EN+102, EN+140
INSNAME EN+11~, EN+98*, EN+118, EN+133, EN+155, EN+159, EN+176, EN+185, EN+194
MAXCNT EN+11~, EN+18*, EN+19*, EN+33, EN+49, EN+52, EN+58, EN+95, EN+177
MCAREFLG EN+11~, EN+55*, EN+90*, EN+118, EN+185*, EN+194*
MFLG EN+96~, EN+114, EN+115, EN+170, OKFRESH~, OKFRESH+11*, OKFRESH+13*, OKFRESH+14, OKFRESH+16*, OKFRESH+18*
, OKFRESH+20, OKFRESH+21
MFRESHDAY EN+11~, EN+22*, EN+114, EN+115, EN+170, OKFRESH~, OKFRESH+21
MGRP ERRMSG+1~, ERRMSG+4*, ERRMSG+22
MSG ERRMSG+1~
MSG( ERRMSG+15*, ERRMSG+16*, ERRMSG+17*, ERRMSG+18*, ERRMSG+19*, ERRMSG+20*
MSG(1 ERRMSG+7*
MSG(2 ERRMSG+8*
MSG(3 ERRMSG+9*
MSG(4 ERRMSG+10*
MSG(5 ERRMSG+11*
MSG(6 ERRMSG+12*
MSG(7 ERRMSG+13*
MSG(8 ERRMSG+14*
NUM EN+12~, EN+44*
OK EN+12~, EN+35, EN+75, CLINICEX+1*, CLINICEX+2*, ELG+1*, ELG+2*, ELG+3*, INP+2*, INP+4*
, OKFRESH+10~, OKFRESH+11*, OKFRESH+20*, OKFRESH+21*, OKFRESH+22
PATID EN+12~, EN+138*, EN+184, EN+193, SET~, SET+9
PAYER EN+12~
PAYERID EN+12~, EN+143*
PAYERSTR EN+12~, EN+140*, EN+142, EN+143, EN+144
PIEN EN+12~, EN+144*, EN+147, EN+148, EN+149, EN+150, EN+153, EN+163, EN+166, EN+170
EN+174, EN+183, EN+186, EN+192, EN+193, SET+8
QURYFLAG EN+12~, EN+172*, SET+13
SETSTR EN+12~, EN+15*, EN+16, EN+17, EN+18, EN+20
SID EN+12~, EN+179*, EN+181*, EN+182, EN+184, SET~, SET+8
SIDACT EN+12~, EN+175*, EN+176, EN+188
SIDARRAY EN+12~, EN+173!, EN+174
SIDARRAY( EN+181
SIDCNT EN+12~, EN+175*, EN+177
SIDDATA EN+13~, EN+174*, EN+175
SLCCRIT1 EN+13~, EN+17*, EN+24
SRVICEDT EN+13~, EN+61*, EN+78, EN+94*, EN+115, EN+163, EN+166, EN+170, SET+13, OKFRESH+20
, OKFRESH+21
SUPPBUFF EN+13~, EN+20*, EN+155, EN+159, EN+176
SYMBOL EN+13~, EN+142*, EN+154*, EN+155, EN+158, EN+159
TODAYSDT EN+13~
TQIEN EN+13~, EN+186, EN+193, SET+17*, SET+18
TYPE GETELST+21~, GETELST+23*, GETELST+24
U EN+17, EN+18, EN+20, EN+21, EN+69, EN+70, EN+71, EN+97, EN+98, EN+122
EN+135, EN+138, EN+143, EN+144, EN+175, SET+8, SET+9, SET+13, OKFRESH+11, OKFRESH+12
, OKFRESH+15
VAIN EN+13~, INP+2!, INP+3!
VAIN(1 INP+2
VDATE EN+13~, OKFRESH+10~, OKFRESH+11*, OKFRESH+20, OKFRESH+21
X1 EXPIRED+3~, EXPIRED+4*, EXPIRED+5
X2 EXPIRED+3~, EXPIRED+4*, EXPIRED+5
XMSUB ERRMSG+1~, ERRMSG+6*, ERRMSG+22
YY EN+13~
>> ZTQUEUED EN+66
>> ZTSTOP EN+33, EN+49, EN+52, EN+58, EN+66*
ZZ EN+13~, EN+102*, EN+105, EN+126*, EN+129
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All