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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBCNEDE3

Package: Integrated Billing

Routine: IBCNEDE3


Information

IBCNEDE3 ;AITC/CKB - eIV Appointment Extract ;23-OCT-2023

Source Information

Source file <IBCNEDE3.m>

Entry Points

Name Comments DBIA/ICR reference
STRIP(VALUE) ; check non-alpha numeric characters
STRIPX ;
UPDSD(PIEN,AIEN,SVDT) ;Update service date based on Payers allowed date range - Appointment Extract
ALL(DFN,VAR) ;Find all insurance data on a patient for the Appointment Extract
INSCHKQ ;
CHK(X,PIEN,PINS,Z) ; Check patient policy - logic from CHK^IBCNS1
CHKQ ;
TQUPDSV(DFN,PAYER,SRVDT,SUBID,GRPNUM) ; Update TQ service date for entries to be transmitted
; used by the Appointment Extract - logic from TQUPDSV^IBCNEUT5
TQUPDSVX ;TQUPDSV exit
TQCHKS(DFN,PAYER,SRVDT,SUBID,GRPNUM,FRESHNESS) ; Looks at the TQ file for an existing entry
; checks to see if a new entry can be added to the TQ - used by the Appointment Extract
TQCHKSX ;TQCHKS exit
ADDTQ(DFN,PAYER,SUBID,GRPNUM,SRVDT,FDAYS) ; Function - Returns flag (0/1)
; used by the Appointment Extract - logic from ADDTQ^IBCNEUT5
; 1 - TQ File entry can be added as the service date for the patient
; and payer >= MAX TQ service date + Freshness Days
; 0 - otherwise
ADDTQX ; ADDTQ exit pt
TQMAXSV(DFN,PAYER,SUBID,GRPNUM) ; Returns MAX(TQ Service Date) for Patient & Payer
TQMAXSVX ;TQMAXSV exit
BFEXIST(DFN,INSNAME,SUBID,GRPNUM) ;Checks for the existence in the Buffer
BFEXIT ;BFEXIST exit

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
2.312 GET1^DIQ
^IBA(355.3 - [#355.3] GET1^DIQ
^DIC(36 - [#36] GET1^DIQ
^IBCN(365.1 - [#365.1] GET1^DIQ
365.121 GET1^DIQ
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call