PRCVLIC ;WOIFO/BMM - update message for 2237 line item cancel; 2/11/05 ; 3/24/05 2:50pm
Source file <PRCVLIC.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| V | ;;5.1;IFCAP;**81**;Oct 20, 2000
|
|
| EN | ;code to send update to DM notifying of canceled line item
|
|
| CREATEM | ;use data from 410 and 441 to create ^XTMP structure for sending
|
|
| UPDAUD | ;update the Audit file entry for this DM Doc ID
|
|
| DMERXMB(PRCVTMP,PRCVST,PRCVFCP) | ;create a bulletin to send to FCP users
|
|
| GETFCPU(PRCVXMY,PRCVST,PRCVFCP) | ;retrieve all the FCP users who are Control
|
|
| CHKDM(PRCVSUB) | ;function that checks if the given value in PRCVSUB
|
|
| D1 | ||
| EX |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^DIC(4 - [#4] | GET1^DIQ |
| ^PRCS(410 - [#410] | GETS^DIQ |
| ^PRC(440 - [#440] | GET1^DIQ |
| ^PRC(441 - [#441] | GET1^DIQ |
| 441.01 | GET1^DIQ |
