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

Package: Integrated Billing

Routine: IBCNSC0


Information

IBCNSC0 ;ALB/NLR - INSURANCE COMPANY EDIT - ; 12-MAR-1993

Source Information

Source file <IBCNSC0.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 FILE^DIE  $$GET1^DIQ  ^DIR  
Integrated Billing 1 SET^IBCNSP  

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

Package Total Caller Graph
Integrated Billing 5 IBCEF21  IBCNSC  IBCNSC1  IBCNSI  IBEDIT INS CO1  

Entry Points

Name Comments DBIA/ICR reference
CLAIMS1 ; display Inpatient Claims information
CLMS1AD ; KDM US2487 IB*2.0*592 call in tag from IBCNSI
R1Q
CLAIMS2 ; display Outpatient Claims information
CLMS2AD ; KDM US2487 IB*2.0*592 call in tag from IBCNSI
ADDRESS(INS,NODE,PH) ; -- generic find address
REDO ; gather insurance carrier's main address information
ADDRESQ ; concatenate company name, address, phone and fax
ADDREQ
ADD2(INS,NODE,PH) ;
FTF(IBIEN,IBEXIT) ; Edit Filing Time Frame fields
; Input: IBIEN - IEN of the entry being checked
; IBEXIT - 0 default value from input template
; Returns: 1 - if user entered '^' to exit for any of the FTF fields
P12 ;Prompt for field .12
CHECK ;
; If NONE of the 3 fields were updated, quit
QUIT ;
UPDINS ; Update Insurance Co FTF fields (added with IB*702)
GETGRP ; Get count of all Active group plans (added with IB*702)
UPDGRP ; Update all Active group plans with ALL Insurance Co FTF fields (added with IB*702)
PFLD18 ; Prompt for field .18 STANDARD FTF (added with IB*702)
EVFLD18 ;Evaluate field .18. Determine if field .18 should be updated (IBFLG18=1) and
; if the user should be prompted to enter STANDARD FTF VALUE field .19
PFLD19 ; Prompt for field .19 STANDARD FTF VALUE (added with IB*702)
PFLD12 ; Prompt for field .12 FILING TIME FRAME (added with IB*702)
DELETE() ; Confirm Deletion (added with IB*702)
; Returns: 1 - YES
; 0 - NO or user entered "^"

External References

Name Field # of Occurrence
FILE^DIE UPDINS+5, UPDGRP+6
$$GET1^DIQ FTF+10, FTF+11, FTF+12, CHECK+30, CHECK+31, CHECK+32, GETGRP+5, GETGRP+7
^DIR CHECK+23, CHECK+44, PFLD18+12, PFLD19+8, PFLD12+10, DELETE+7
SET^IBCNSP CLMS1AD+1, CLMS1AD+7, CLMS1AD+8, CLMS1AD+9, CLMS1AD+11, CLMS1AD+12, CLMS1AD+13, CLMS1AD+14, CLMS2AD+1, CLMS2AD+7
, CLMS2AD+8, CLMS2AD+9, CLMS2AD+11, CLMS2AD+12, CLMS2AD+13, CLMS2AD+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: CHECK+12
Function Call: WRITE
  • Prompt: !!,"The Filing Time Frame for all ACTIVE group plans will be changed to:"
  • Line Location: CHECK+29
Function Call: WRITE
  • Prompt: !," STANDARD FILING TIME FRAME: ",$S(IB18="@":"<deleted>",1:$$GET1^DIQ(36,IBIENS,.18))
  • Line Location: CHECK+30
Function Call: WRITE
  • Prompt: !,"STANDARD FILING TIME FRAME VALUE: ",$S(IB19="@":"<deleted>",1:$$GET1^DIQ(36,IBIENS,.19))
  • Line Location: CHECK+31
Function Call: WRITE
  • Prompt: !," FILING TIME FRAME: ",$S(IB12="@":"<deleted>",1:$$GET1^DIQ(36,IBIENS,.12))
  • Line Location: CHECK+32
Function Call: WRITE
  • Prompt: !
  • Line Location: CHECK+33
Function Call: WRITE
  • Prompt: !
  • Line Location: CHECK+50
Function Call: WRITE
  • Prompt: " <NOTHING DELETED>"
  • Line Location: EVFLD18+5
Function Call: WRITE
  • Prompt: " <NOTHING DELETED>"
  • Line Location: PFLD19+13
Function Call: WRITE
  • Prompt: " <NOTHING DELETED>"
  • Line Location: PFLD12+15
Routine Call
  • DIE
  • Line Location:
    • UPDINS+5
    • UPDGRP+6
Routine Call
  • DIR
  • Line Location:
    • CHECK+23
    • CHECK+44
    • PFLD18+12
    • PFLD19+8
    • PFLD12+10
    • DELETE+7

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(36 - [#36] CLMS1AD+7, CLMS2AD+7, REDO+1, REDO+11, REDO+12, REDO+14, REDO+16, ADD2+2, ADD2+4, ADD2+7
^DIC(5 - [#5] CLMS1AD+12, CLMS2AD+12
^IBA(355.3 - [#355.3] GETGRP+3

Label References

Name Line Occurrences
$$ADD2 CLMS1AD+5, CLMS2AD+5
$$DELETE EVFLD18+6, PFLD19+14, PFLD12+16
CHECK FTF+19, FTF+26, P12+2
EVFLD18 PFLD18+19
GETGRP CHECK+7
P12 FTF+22
PFLD12 P12+1, PFLD12+15
PFLD18 FTF+18, EVFLD18+5
PFLD19 FTF+25, PFLD19+13
QUIT CHECK+2, CHECK+8, CHECK+24, CHECK+25, CHECK+45, CHECK+46
REDO REDO+16
UPDGRP CHECK+49
UPDINS CHECK+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DELETE FTF+4~, PFLD18+2*, EVFLD18+5, EVFLD18+6*, EVFLD18+7, PFLD19+2*, PFLD19+13, PFLD19+14*, PFLD19+15, PFLD12+2*
, PFLD12+15, PFLD12+16*, PFLD12+17
DIC FTF+4~
DIR FTF+4~, CHECK+13!, CHECK+34!, PFLD18+1!, PFLD19+1!, PFLD12+1!, DELETE+3!
DIR("?" CHECK+18*, CHECK+19*, CHECK+20*, CHECK+21*, CHECK+22*, CHECK+39*, CHECK+40*, CHECK+41*, CHECK+42*, CHECK+43*
, PFLD19+7*, PFLD12+7*, PFLD12+8*, PFLD12+9*
DIR("A" CHECK+15*, CHECK+16*, CHECK+36*, CHECK+37*, PFLD18+4*, PFLD18+9*, PFLD18+10*, PFLD19+4*, PFLD12+4*, DELETE+5*
DIR("B" CHECK+17*, CHECK+38*, PFLD18+5*, PFLD18+11*, PFLD19+6*, PFLD12+6*, DELETE+6*
DIR(0 CHECK+14*, CHECK+35*, PFLD18+3*, PFLD19+3*, PFLD12+3*, DELETE+4*
DIRUT FTF+4~, CHECK+13!, CHECK+25, CHECK+34!, CHECK+46, PFLD19+1!, PFLD12+1!, DELETE+3!, DELETE+8
GRPERR UPDGRP+1~
GRPUPD UPDGRP+1~
GRPUPD( UPDGRP+3*, UPDGRP+4*, UPDGRP+5*
IB12 FTF+4~, FTF+15*, CHECK+32, UPDINS+4, UPDGRP+5, PFLD12+11*, PFLD12+13, PFLD12+15, PFLD12+19
IB12PRE FTF+4~, FTF+12*, PFLD12+6, PFLD12+13, PFLD12+19
IB18 FTF+4~, FTF+15*, CHECK+30, UPDINS+2, UPDGRP+3, PFLD18+13*, PFLD18+17, PFLD18+18, EVFLD18+5, EVFLD18+11
, EVFLD18+15
IB18PE FTF+4~, FTF+10*, PFLD18+5, PFLD18+8, PFLD18+9
IB18PRE FTF+4~, FTF+10*, PFLD18+17, PFLD18+18
IB19 FTF+4~, FTF+15*, CHECK+31, UPDINS+3, UPDGRP+4, EVFLD18+17*, PFLD19+9*, PFLD19+11, PFLD19+13, PFLD19+17
IB19PRE FTF+4~, FTF+11*, EVFLD18+17*, PFLD19+6, PFLD19+11, PFLD19+17
IBA ADDRESS+2~, ADDRESQ+1*, ADDRESQ+2*, ADDRESQ+3*, ADDRESQ+4*, ADDREQ, ADD2+1~, ADD2+8*, ADD2+9
>> IBACMAX CLAIMS1+4, CLAIMS2+5
IBADD CLAIMS1+1~, CLMS1AD+11*, CLMS1AD+12, CLMS1AD+13, CLMS1AD+14, CLAIMS2+2~, CLMS2AD+11*, CLMS2AD+12, CLMS2AD+13, CLMS2AD+14
IBAGP GETGRP+1~, GETGRP+7*, GETGRP+8
>> IBCNS CLMS1AD+5, CLMS2AD+5
IBCNS12 CLAIMS1+1~, CLMS1AD+5*, CLMS1AD+7, CLMS1AD+8, CLMS1AD+9, CLMS1AD+11, CLMS1AD+12, CLMS1AD+13, CLMS1AD+14
IBCNS16 CLAIMS2+2~, CLMS2AD+5*, CLMS2AD+7, CLMS2AD+8, CLMS2AD+9, CLMS2AD+11, CLMS2AD+12, CLMS2AD+13, CLMS2AD+14
IBCNT ADDRESS+2~
IBEXIT FTF~, FTF+19*, FTF+26*, P12+2*, CHECK+24*, CHECK+45*, QUIT+1
IBFLG12 FTF+5~, FTF+14*, CHECK+2, PFLD12+17*, PFLD12+19*
IBFLG18 FTF+5~, FTF+14*, CHECK+2, EVFLD18+8*, EVFLD18+11*, EVFLD18+15*, EVFLD18+17
IBFLG19 FTF+5~, FTF+14*, CHECK+2, EVFLD18+17*, PFLD19+15*, PFLD19+17*
IBFX ADDRESS+2~, REDO+1*, REDO+15*, ADDRESQ+4, ADD2+1~, ADD2+4*, ADD2+8
IBG UPDGRP+1~, UPDGRP+2*, UPDGRP+3, UPDGRP+4, UPDGRP+5
IBGARR FTF+5~
IBGARR( GETGRP+10*, UPDGRP+2
IBGCT FTF+5~, CHECK+8, CHECK+16, GETGRP+2*, GETGRP+9*
IBGIEN GETGRP+1~, GETGRP+3*, GETGRP+4, GETGRP+10
IBGIENS GETGRP+1~, GETGRP+4*, GETGRP+5, GETGRP+7
IBIEN FTF~, FTF+7, GETGRP+3
IBIENS FTF+5~, FTF+7*, FTF+10, FTF+11, FTF+12, CHECK+30, CHECK+31, CHECK+32, UPDINS+2, UPDINS+3
, UPDINS+4
IBINACT GETGRP+1~, GETGRP+5*, GETGRP+6
IBPH ADDRESS+2~, REDO+1*, REDO+13*, REDO+14*, ADDRESQ+3, ADD2+1~, ADD2+4*, ADD2+7*, ADD2+8
IBSKIP FTF+5~, FTF+14*, FTF+22, PFLD18+17*, PFLD18+18*, EVFLD18+8*, EVFLD18+15*
IBX ADDRESS+2~, ADDRESS+3*, REDO+1*, REDO+12*, REDO+13, REDO+15, ADDRESQ+1, ADD2+1~, ADD2+2*, ADD2+4
, ADD2+8
INS ADDRESS~, REDO+1, REDO+11, REDO+12, REDO+14, REDO+16*, ADDRESQ+2, ADD2~, ADD2+2*, ADD2+4
, ADD2+7, ADD2+8
INSERR UPDINS+1~
INSSAVE ADDRESS+2~, REDO+16*, ADD2+1~, ADD2+2*
INSUPD UPDINS+1~
INSUPD(36 UPDINS+2*, UPDINS+3*, UPDINS+4*
>> IORVOFF CLMS1AD+1, CLMS2AD+1
>> IORVON CLMS1AD+1, CLMS2AD+1
NODE ADDRESS~, REDO+11, REDO+12, REDO+13, REDO+16, ADD2~, ADD2+2, ADD2+7
OFFSET CLAIMS1+1~, CLAIMS1+4*, CLMS1AD+1, CLMS1AD+7, CLMS1AD+8, CLMS1AD+9, CLMS1AD+10~*, CLMS1AD+11, CLMS1AD+12, CLMS1AD+13
, CLMS1AD+14, CLAIMS2+2~, CLAIMS2+5*, CLMS2AD+1, CLMS2AD+7, CLMS2AD+8, CLMS2AD+9, CLMS2AD+10~*, CLMS2AD+11, CLMS2AD+12
, CLMS2AD+13, CLMS2AD+14
PH ADDRESS~, REDO+13, REDO+14, ADD2~, ADD2+4
START CLAIMS1+1~, CLAIMS1+4*, CLMS1AD+1, CLMS1AD+7, CLMS1AD+8, CLMS1AD+9, CLMS1AD+11, CLMS1AD+12, CLMS1AD+13, CLMS1AD+14
, CLAIMS2+2~, CLAIMS2+5*, CLMS2AD+1, CLMS2AD+7, CLMS2AD+8, CLMS2AD+9, CLMS2AD+11, CLMS2AD+12, CLMS2AD+13, CLMS2AD+14
U ADD2+2, ADD2+4, ADD2+7, ADD2+8, FTF+5~
X FTF+5~, FTF+19, FTF+26, P12+2, CHECK+13!, CHECK+24, CHECK+34!, CHECK+45, PFLD18+1!, PFLD18+12
, PFLD18+13, PFLD19+1!, PFLD19+8, PFLD19+9, PFLD12+1!, PFLD12+10, PFLD12+11, DELETE+3!
Y FTF+5~, CHECK+13!, CHECK+25, CHECK+34!, CHECK+46, PFLD18+1!, PFLD18+13, PFLD19+1!, PFLD12+1!, DELETE+3!
, DELETE+9
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