Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

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

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
Info |  Source |  Entry Points |  Interaction Calls