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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBACCWLPURGE

Package: Integrated Billing

Routine: IBACCWLPURGE


Information

IBACCWLPURGE ;EDE/TAZ - ACC (Automated Community Care) Claims - Purge ; 20-MAR-2024

Source Information

Source file <IBACCWLPURGE.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 4 $$FIND1^DIC  ^DIE  $$GET1^DIQ  ^DIR  
Integrated Billing 1 $$ACTIVE^IBJTU4  
Kernel 1 $$FMADD^XLFDT  

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

Package Total Caller Graph
Integrated Billing 2 IBACC ACC ENCOUNTER PURGE  IBACC MONTHLY ENCOUNTER PURGE  

Entry Points

Name Comments DBIA/ICR reference
EN ;Entry point from Option
EN1 ; Entry point from scheduled
PURGE(TYPE) ;Purge record based on Purge Time in IB Site Parameters
PURGEQ ;
FINDCLONES(CLAIM) ;Find all the times this claim has been cloned, so we're only looking at the most recent one ;MJL;EBILL-6180

External References

Name Field # of Occurrence
$$FIND1^DIC PURGE+6
^DIE PURGE+17, PURGE+20
$$GET1^DIQ EN1+5, EN1+10, PURGE+7, PURGE+10, FINDCLONES+2, FINDCLONES+6
^DIR EN+7
$$ACTIVE^IBJTU4 EN1+8
$$FMADD^XLFDT PURGE+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Purging. Please stand by."
  • Line Location: EN+10
Routine Call
  • DIC
  • Line Location:
    • PURGE+6
Routine Call
  • DIE
  • Line Location:
    • PURGE+17
    • PURGE+20
Routine Call
  • DIR
  • Line Location:
    • EN+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(364.9 - [#364.9] Classic Fileman Calls,  GET1^DIQ
364.95 GET1^DIQ
^IBA(364.991 - [#364.991] FIND1^DIC,  GET1^DIQ
^DGCR(399 - [#399] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBA(364.9 - [#364.9] EN1+4, PURGE+13

Label References

Name Line Occurrences
$$FINDCLONES EN1+7
PURGE EN1+6, EN1+10, EN1+11
PURGEQ EN+8, EN+9, PURGE+11

Naked Globals

Name Field # of Occurrence
^( PURGE+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CLAIM EN1+1~, EN1+5*, EN1+6, EN1+7, FINDCLONES~, FINDCLONES+2, FINDCLONES+3
CLONEDTO FINDCLONES+1~, FINDCLONES+6*, FINDCLONES+7, FINDCLONES+8
CNT PURGE+1~, PURGE+12*, PURGE+13*, PURGE+16
DA PURGE+14~, PURGE+16*, PURGE+19*
DA(1 PURGE+16*
DATE PURGE+1~, PURGE+10*, PURGE+11
DAYS PURGE+1~, PURGE+7*, PURGE+8, PURGE+11
DIE PURGE+14~, PURGE+16*, PURGE+19*
DIR EN+1~
DIR("A" EN+3*, EN+4*, EN+5*
DIR("B" EN+6*
DIR(0 EN+2*
>> DIRUT EN+8
DR PURGE+14~, PURGE+16*, PURGE+19*
DT PURGE+11
FIELD PURGE+1~, PURGE+5*, PURGE+6
FINALCLONE EN1+1~, EN1+7*, EN1+8
IBVAR PURGE+1~, PURGE+6*, PURGE+7
IEN EN1+1~, EN1+3*, EN1+4*, EN1+5, EN1+10, PURGE+10, PURGE+13, PURGE+16, PURGE+19
LASTCLONE FINDCLONES+1~, FINDCLONES+3*, FINDCLONES+6, FINDCLONES+8*, FINDCLONES+9
STOP FINDCLONES+1~, FINDCLONES+4*, FINDCLONES+5, FINDCLONES+7*
STR PURGE+1~, PURGE+13*, PURGE+15
TYPE PURGE~, PURGE+5
>> Y EN+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 |  Naked Globals |  Local Variables  | All