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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBCN118

Package: Integrated Billing

Routine: IBCN118


Information

IBCN118 ;ALB/KML - TRIGGER LOGIC CALLED BY DD XREF 2.312, 1.08 ;06-APR-2015

Source Information

Source file <IBCN118.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 1 $$NOW^XLFDT  
List Manager 1 PAUSE^VALM1  
VA FileMan 1 (FILE,UPDATE)^DIE  

Entry Points

Name Comments DBIA/ICR reference
TRIGSET ; trigger called from MUMPS xref from DD(2.312, 1.08)
; ensure that the new fields at the new COMMENT - SUBSCRIBER POLICY multiple (2.312, 1.18) get updated when 2.312, 1.08 is edited
ADCOM(IBDFN,IBPOLDA,IBPOLCOM) ; add new patient policy comment to multiple (2.312, 1.18)
EDCOM(IBDFN,IBDT,IBCDA) ; edit existing comment entry at 2.312,1.18 multiple
; Input:
; IBDT = date/time that comment was made
; CMIEN = comment IEN
TRIGKIL ; remove data at 2.312, 1.18 multiple when 2.312, 1.08 gets removed
CMLKD ; -- write record locked message

External References

Name Field # of Occurrence
FILE^DIE EDCOM+19, TRIGKIL+20
UPDATE^DIE ADCOM+13
PAUSE^VALM1 ADCOM+13, EDCOM+19, TRIGKIL+20, CMLKD+3
$$NOW^XLFDT ADCOM+8, EDCOM+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,!,"Error...ADCOM-IBCN118...Cannot Add policy comment"
  • Line Location: ADCOM+13
Function Call: WRITE
  • Prompt: !,!,"Error...EDCOM-IBCN118...Cannot edit policy comments"
  • Line Location: EDCOM+19
Function Call: WRITE
  • Prompt: !,!,"Error...TRIGKIL-IBCN118...Cannot Remove data from (2.312,1.18)"
  • Line Location: TRIGKIL+20
Function Call: WRITE
  • Prompt: !!,"Sorry, another user currently editing this entry."
  • Line Location: CMLKD+1
Function Call: WRITE
  • Prompt: !,"Try again later."
  • Line Location: CMLKD+2
Routine Call
  • DIE
  • Line Location:
    • EDCOM+19
    • TRIGKIL+20
Routine Call
  • DIE
  • Line Location:
    • ADCOM+13

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] TRIGSET+9, TRIGSET+12, TRIGSET+15, TRIGSET+18, ADCOM+2, ADCOM+14, EDCOM+6, EDCOM+10, EDCOM+16, EDCOM+20
, TRIGKIL+3, TRIGKIL+7, TRIGKIL+13

Label References

Name Line Occurrences
ADCOM TRIGSET+12
CMLKD ADCOM+2, EDCOM+10
EDCOM TRIGSET+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CMIEN TRIGKIL+5~, TRIGKIL+13*, TRIGKIL+14
>> DA TRIGSET+9, TRIGKIL+3, TRIGKIL+7, TRIGKIL+13, TRIGKIL+14
>> DA(1 TRIGSET+9, TRIGKIL+3, TRIGKIL+7, TRIGKIL+13, TRIGKIL+14
DIERR ADCOM+4~, ADCOM+13, EDCOM+8~, EDCOM+19, TRIGKIL+5~, TRIGKIL+20
DT TRIGKIL+10
DUZ TRIGSET+12, TRIGSET+18, ADCOM+9, EDCOM+15, TRIGKIL+7, TRIGKIL+13
FDA ADCOM+4~, EDCOM+8~, TRIGKIL+5~
FDA( ADCOM+8*, ADCOM+9*, ADCOM+10*, EDCOM+14*, EDCOM+15*, EDCOM+16*, TRIGKIL+15*, TRIGKIL+16*, TRIGKIL+17*
IBCDA TRIGSET+7~, TRIGSET+15*, TRIGSET+18, EDCOM~, EDCOM+6, EDCOM+13
IBDFN TRIGSET+7~, TRIGSET+9*, TRIGSET+12, TRIGSET+15, TRIGSET+18, ADCOM~, ADCOM+2, ADCOM+7, ADCOM+14, EDCOM~
, EDCOM+6, EDCOM+10, EDCOM+13, EDCOM+16, EDCOM+20
IBDT TRIGSET+7~, TRIGSET+15*, TRIGSET+18, EDCOM~, TRIGKIL+5~, TRIGKIL+7*, TRIGKIL+10, TRIGKIL+13
IBPOLCOM TRIGSET+7~, TRIGSET+9*, TRIGSET+12, ADCOM~, ADCOM+10
IBPOLDA TRIGSET+7~, TRIGSET+9*, TRIGSET+12, TRIGSET+15, TRIGSET+18, ADCOM~, ADCOM+2, ADCOM+7, ADCOM+14, EDCOM+6
, EDCOM+10, EDCOM+13, EDCOM+16, EDCOM+20
IENS ADCOM+4~, ADCOM+7*, ADCOM+8, ADCOM+9, ADCOM+10, EDCOM+8~, EDCOM+13*, EDCOM+14, EDCOM+15, EDCOM+16
, TRIGKIL+5~, TRIGKIL+14*, TRIGKIL+15, TRIGKIL+16, TRIGKIL+17
U TRIGSET+9, TRIGSET+18, EDCOM+6, EDCOM+16, TRIGKIL+3
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All