IBCN118 ;ALB/KML - TRIGGER LOGIC CALLED BY DD XREF 2.312, 1.08 ;06-APR-2015
Source file <IBCN118.m>
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
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|