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: IBCNSU1

Package: Integrated Billing

Routine: IBCNSU1


Information

IBCNSU1 ;ALB/AAS - INSURANCE UTILITY ROUTINE ;19-MAY-93

Source Information

Source file <IBCNSU1.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Integrated Billing 5 $$NOPUNCT^IBCEF  HLP^IBCNSM32  $$VALHIC^IBCNSMM  $$GETWNR^IBCNSMM1  $$MCRWNR^IBEFUNC  
VA FileMan 4 EN^DDIOL  FILE^DICN  ^DIE  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Integrated Billing 1 IBCNSD  
Registration 1 DGRUUTL  

Entry Points

Name Comments DBIA/ICR reference
CHKQUAL(DFN,IEN,QUAL,PC1,PC2) ; check for duplicate qualifiers for patient
; and subscriber secondary ID's. All parameters required.
ADDBUQ
ADDBU(DFN,IBCPOL,IBYR,IBCDFN) ; -- add entries to Benefits Used file
; Input: DFN = pointer to patient file
; IBCDFN = point to patient policy (2.312)
; IBCPOL = pointer to health insurance policy file
; IBYR = fileman internal date, year will be calendar
; year of the internal date, Default = dt
BUQ
VET() ; -- Input Transform for sub-file 2.312, Name of Insured (#17)
; Quit 1 to stuff Patient Name
; Quit 0 to not stuff and allow editing
HICNQ
SUBID ; -- Input Transform for sub-file #2.312, Subscriber ID (#1)
BU(DFN,IBCPOL,IBYR,IBCDFN,IBASK) ; -- Return entry in Benefits Used file
; Input: IBCDFN = pointer to patient file policy (2.312)
; DFN = patient pointer
; IBCPOL = pointer to health insurance policy file
; IBYR = fileman internal date, year will be calendar
; year of the internal date, Default = dt
; IBASK = 1 if want to ask okay to add new entry
RCHK(X) ; -- Input transform for different revenue codes in file 36
; Returns 1 if passes, 0 if not pass input transform
VETQ
CHKQUALX ;
CQ2 ; specific error message#2
HICN(DFN) ; -- return Patient's Medicare HIC number
; Return HICN of Medicare WNR Part A or Part B
; Return -1 if none exits
CQ1 ; specific error message#1
RCHKQ

External References

Name Field # of Occurrence
EN^DDIOL CQ1+2, CQ1+3, CQ2+2, CQ2+3
FILE^DICN ADDBU+18
^DIE ADDBU+20
^DIR BU+24
$$NOPUNCT^IBCEF SUBID+9, SUBID+10
HLP^IBCNSM32 SUBID+6
$$VALHIC^IBCNSMM SUBID+6
$$GETWNR^IBCNSMM1 VET+8, SUBID+6, HICN+5
$$MCRWNR^IBEFUNC CHKQUAL+23

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"You cannot add a new Benefits Used BENEFIT YEAR",!!
  • Line Location: BU+17
Routine Call
  • DIE
  • Line Location:
    • ADDBU+20
Routine Call
  • DIR
  • Line Location:
    • BU+24

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(355.5 - [#355.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] VET+6, SUBID+2, SUBID+9, HICN+6, HICN+7, HICN+8, CHKQUAL+17, CHKQUAL+22
^IBA(355.4 - [#355.4] BU+17
^IBA(355.5 - [#355.5] BU+20

Label References

Name Line Occurrences
$$ADDBU BU+25
ADDBUQ ADDBU+12, ADDBU+13, ADDBU+18
BUQ BU+13, BU+17
CHKQUALX CHKQUAL+16, CHKQUAL+18, CHKQUAL+19, CHKQUAL+23
CQ1 CHKQUAL+18, CHKQUAL+19
CQ2 CHKQUAL+23
HICNQ HICN+6
RCHKQ RCHK+4
VETQ VET+5, VET+7, VET+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT ADDBU+10~
DA ADDBU+10~, ADDBU+19*, ADDBU+20!, VET+6, SUBID+2
DA(1 VET+6, SUBID+2, SUBID+9
DATA CHKQUAL+14~, CHKQUAL+17*, CHKQUAL+18, CHKQUAL+19
DD ADDBU+10~, ADDBU+15!
DFN BU~, BU+20, BU+25, ADDBU~, ADDBU+19, HICN~, HICN+6, HICN+7, HICN+8, CHKQUAL~
, CHKQUAL+17, CHKQUAL+22
DIC ADDBU+10~, ADDBU+15!*, ADDBU+20!
DIC(0 ADDBU+15*
DIE ADDBU+10~, ADDBU+19*, ADDBU+20!
DIR BU+11~
DIR("A" BU+24*
DIR("B" BU+24*
DIR(0 BU+24*
>> DIRUT BU+24
DLAYGO ADDBU+10~, ADDBU+15*
DO ADDBU+10~, ADDBU+15!
DR ADDBU+10~, ADDBU+15!, ADDBU+19*, ADDBU+20!
DT BU+14, ADDBU+14
DUZ ADDBU+19
I RCHK+3~, RCHK+5*
IB0 VET+4~, VET+6*, VET+7, VET+8, VET+9, HICN+4~, HICN+8*, HICN+9, HICN+11
IBASK BU~, BU+24
IBCBU BU+11~, BU+12*, BU+20*, BU+23, BU+25*, BUQ, ADDBU+10~, ADDBU+11*, ADDBU+19*, ADDBUQ
IBCDFN BU~, BU+20, BU+25, ADDBU~, ADDBU+12, ADDBU+19
IBCPOL BU~, BU+13, BU+17, BU+20, BU+25, ADDBU~, ADDBU+13, ADDBU+18
IBN1 ADDBU+10~
IBWNR HICN+4~, HICN+5*, HICN+6, HICN+7, HICN+9
IBX HICN+4~, HICN+7*, HICN+8
IBY VET+4~*, VET+8*, VET+9*, VETQ, HICN+4~, HICN+5*, HICN+6*, HICN+7, HICN+11*, HICN+12*
, HICNQ
IBYR BU~, BU+14*, BU+17, BU+20, BU+25, ADDBU~, ADDBU+14*, ADDBU+19
IEN CHKQUAL~, CHKQUAL+17, CHKQUAL+22
INS CHKQUAL+14~, CHKQUAL+22*, CHKQUAL+23
L SUBID+1~, SUBID+9*, SUBID+11
NO RCHK+3~, RCHK+5*, RCHK+6
NODE SUBID+1~, SUBID+2*, SUBID+6
OK CHKQUAL+14~, CHKQUAL+15*, CHKQUALX+1, CQ1+1*, CQ2+1*
PC1 CHKQUAL~, CHKQUAL+18
PC2 CHKQUAL~, CHKQUAL+19
QUAL CHKQUAL~, CHKQUAL+16, CHKQUAL+18, CHKQUAL+19, CHKQUAL+23
RC RCHK+3~, RCHK+5*
U SUBID+6, SUBID+9, HICN+9, HICN+11, CHKQUAL+18, CHKQUAL+19
>> VALMQUIT BU+24*
X RCHK~, RCHK+4, RCHK+5, ADDBU+18*, VET+9, SUBID+6*!, SUBID+10, SUBID+11*, SUBID+13!
X1 SUBID+1~, SUBID+10*, SUBID+11
Y RCHK+3~*, RCHK+6*, RCHKQ, BU+24, ADDBU+18, ADDBU+19
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