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

Package: Integrated Billing

Routine: IBCNSC3


Information

IBCNSC3 ;ALB/NLR - INACTIVATE AND REPOINT INS STUFF1 ; 20-APR-93

Source Information

Source file <IBCNSC3.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Integrated Billing 5 $$ZND^IBCNS1  COV^IBCNSJ  $$IR^IBCNSJ21  $$PT^IBEFUNC  $$DAT1^IBOUTL  
VA FileMan 3 ^DIC  ^DIE  ^DIR  
Registration 1 OAD^VADPT  

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

Package Total Caller Graph
Integrated Billing 1 IBCNSC2  

Entry Points

Name Comments DBIA/ICR reference
RPTASK ; -- ask if user wishes to repoint patients to active insurance company
RPTASKQ
COVD ; Adjust 'Covered by Insurance' prompt for repointed patients
VERIFY ; -- allow user to change mind about inactivating company
HDR ; -- print header
BUILD ; -- set list of patients in ^tmp array
SET ; -- store data to be printed in temp array

External References

Name Field # of Occurrence
^DIC RPTASK+7
^DIE RPTASK+10, RPTASK+18, RPTASK+22, RPTASK+29
^DIR RPTASK+3, VERIFY+6
$$ZND^IBCNS1 BUILD+9
COV^IBCNSJ RPTASK+25, COVD+1, BUILD+4
$$IR^IBCNSJ21 SET+8
$$PT^IBEFUNC BUILD+5
$$DAT1^IBOUTL HDR+5
OAD^VADPT SET+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: RPTASK+7
Function Call: WRITE
  • Prompt: !
  • Line Location: VERIFY+6
Function Call: WRITE
  • Prompt: !,?1,"PATIENTS WITH "_$S(+IBV=0:"ACTIVE",+IBV=1:"INACTIVATED")_" INSURANCE, "_$P(^DIC(36,IBCNS,0),U),?69,"PAGE ",IBPAG,?77,$$DAT1^IBOUTL(DT)
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: $P(X,"^",4)
  • Line Location: HDR+13
Function Call: WRITE
  • Prompt: ", "
  • Condition for execution: $P(X,"^",4)]""&($P(X,"^",5)]"")
  • Line Location: HDR+13
Function Call: WRITE
  • Prompt: $P($G(^DIC(5,+$P(X,"^",5),0)),"^")
  • Line Location: HDR+14
Function Call: WRITE
  • Prompt: $E($P(X,"^",6),1,5),$S($E($P(X,"^",6),6,9)]"":"-"_$E($P(X,"^",6),6,9),1:"")
  • Line Location: HDR+16
Function Call: WRITE
  • Prompt: !?1,"PATIENT",?31,"PATIENT ID",?45,"IR?",?52,"EFF DATE",?63,"EXP DATE",?74,"SUBSCR ID",?95,"WHOSE INS",?106,"EMPLOYER",!
  • Line Location: HDR+18
Function Call: WRITE
  • Prompt: $TR($J(" ",IOM)," ","-")
  • Line Location: HDR+19
Routine Call
  • DIC
  • Line Location:
    • RPTASK+7
Routine Call
  • DIE
  • Line Location:
    • RPTASK+10
    • RPTASK+18
    • RPTASK+22
    • RPTASK+29
Routine Call
  • DIR
  • Line Location:
    • RPTASK+3
    • VERIFY+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^IBA(355.3 - [#355.3] Classic Fileman Calls
^IBT(356.2 - [#356.2] Classic Fileman Calls
^DIC(36 - [#36] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(36 - [#36] HDR+5, HDR+8
^DIC(5 - [#5] HDR+14
^DPT - [#2] RPTASK+17, RPTASK+19*
^DPT("AB" RPTASK+13, RPTASK+14, COVD+1, BUILD+3, BUILD+7
^IBA(355.3 - [#355.3] RPTASK+28
^IBT(356.2 - [#356.2] RPTASK+22
^TMP($J BUILD+2!, SET+8*

Label References

Name Line Occurrences
COVD RPTASK+3, RPTASK+7
RPTASKQ RPTASK+3, RPTASK+7
SET BUILD+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA RPTASK+10*!, RPTASK+18*!, RPTASK+22*!, RPTASK+29*!
DA(1 RPTASK+18*
DFN RPTASK+13*, RPTASK+14, RPTASK+17, RPTASK+18, RPTASK+19, RPTASK+22, RPTASK+25, RPTASKQ!, COVD+1*, BUILD+3*
, BUILD+4, BUILD+5, BUILD+6, BUILD+7, BUILD+9, SET+8
DIC RPTASK+6*, RPTASK+7!
DIC("A" RPTASK+6*
DIC("S" RPTASK+6*
DIC("W" RPTASK+6*
DIC(0 RPTASK+6*
DIE RPTASK+10*!, RPTASK+18*!, RPTASK+22*!, RPTASK+29*!
DIR RPTASK+3!, VERIFY+6!
DIR("?" VERIFY+3*, VERIFY+4*, VERIFY+5*
DIR("A" RPTASK+2*, VERIFY+2*
DIR("B" RPTASK+2*, VERIFY+2*
DIR(0 RPTASK+2*, VERIFY+2*
DIROUT RPTASKQ!
DIRUT RPTASK+3, RPTASK+7, RPTASKQ!, VERIFY+6
DR RPTASK+10*!, RPTASK+18*!, RPTASK+22*!, RPTASK+29*!
DT HDR+5
DTOUT RPTASKQ!
DUOUT RPTASKQ!
DUZ RPTASK+18
>> IBC RPTASK+2, RPTASK+6
>> IBCNS RPTASK+10, RPTASK+13, RPTASK+14, RPTASK+28, COVD+1, HDR+5, HDR+8, BUILD+3, BUILD+7, BUILD+10
>> IBCOV RPTASK+3, RPTASK+7
IBD RPTASK+14*, RPTASK+17, RPTASK+18, RPTASK+19, RPTASK+22, RPTASK+28*, RPTASK+29, RPTASKQ!, BUILD+7*, BUILD+9
, SET+8
>> IBIND BUILD+9*, BUILD+10, SET+5, SET+8
>> IBN VERIFY+2, VERIFY+3, VERIFY+5
>> IBNA BUILD+5*, BUILD+6*, SET+8
>> IBNO BUILD+5*, SET+8
>> IBPAG HDR+3, HDR+4*, HDR+5
>> IBQUIT VERIFY+6*
IBR RPTASK+7*, RPTASK+10, RPTASK+18, RPTASK+22, RPTASK+29, RPTASKQ!
>> IBV VERIFY+7*, HDR+5, HDR+8
>> IBWI SET+5*, SET+6, SET+8
IBX RPTASK+22*, RPTASKQ!
IBXXX RPTASK+17*, RPTASK+19, RPTASKQ!
IOF HDR+3
IOM HDR+19
IOST HDR+3
TAB HDR+2~, HDR+8*, HDR+9, HDR+10, HDR+11, HDR+12
U HDR+5, BUILD+5, BUILD+10, SET+8
>> VAOA("A" SET+6*
>> VAOA(9 SET+8
X HDR+2~, HDR+8*, HDR+9, HDR+10, HDR+11, HDR+12, HDR+13, HDR+14, HDR+15, HDR+16
, BUILD+5*
>> Y RPTASK+3, RPTASK+7, VERIFY+7
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