PSNPPSNW ;HP/MJE-PPSN update NDF data additional update code ; 05 Mar 2014 1:20 PM
Source file <PSNPPSNW.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| REMATCH(DA,PSNFNM) | ;called by PSNPPSNU
|
|
| ASKND | ;
|
|
| RSET | ;
|
|
| EN1(PSNDIEN,PSN50IEN) | ;Receive Drug entries that have been unmatched
|
|
| REACT | ; code for reactivation of inactive drug in local drug file
|
|
| BLDIT | ; START ATTEMPT TO MATCH
|
|
| SET | ||
| CHK(PSNB) | ;
|
|
| REPORT | ;
|
|
| MSGHDR(NONE) | ;insert MESS3 header
|
|
| ADDLINE(X) | ;
|
|
| HDRTXT | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^PSNDF(50.68 - [#50.68] | GET1^DIQ |
