PRCVIBF ;WOIFO/AS-FUND PROCESSING USING DATA FROM DYNAMED ;4/11/05 15:15
Source file <PRCVIBF.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INIT(NOD) | ;
; 1. Find out it is IV or SV |
|
| PROCESS | ;
|
|
| TRANS | ; 2. get new transaction number
|
|
| NOD0 | ; 3. create file 410, node 0 and 3
|
|
| NODE2 | ; 4. create file 410, node 2
|
|
| CC | ; 6. Cost Center
|
|
| ITEM | ; FIND UPDATE^DIE USAGE
|
|
| TOT | ; TOTAL COST and Date Commited
|
|
| 445 | ;
|
|
| COMMIT | ;
|
|
| ESIG | ;
|
|
| POSTING | ;
; Buyer and Seller's FCP provided by DynaMed |
|
| FILE | ;
|
|
| FINAL | ;
; All issue book from DynaMed are FINAL |
|
| EXIT | ;
|
|
| ADJ | ;
; Adjustment ; Get IEN from "AS" |
|
| DMITEM | ;
; Initiate new item number for DynaMed interface |
|
| ERR(N) | ;
; if error, send HL7 app ACK of AE |
|
| ERCODE | ;
|
| FileNo | Call Tags |
|---|---|
| ^PRC(441 - [#441] | WP^DIE |
| ^PRC(443 - [#443] | Classic Fileman Calls |
