IBCNEDE2 ;DAOU/DAC - eIV Appointment Extract ;23-SEP-2015
Source file <IBCNEDE2.m>
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 |
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 | 3 | IBCNEDE IBCNEDE4 IBCNEQU1 |
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 |
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 |
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 |
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 |
>> | 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 |