IBCNBLE2 ;ALB/ESG - Expand ins buffer - ePharmacy entry ;14-Oct-2010
Source file <IBCNBLE2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Entry point
|
|
| EX | ;
|
|
| EN1(RESPIEN) | ;IB*822/CKB
|
|
| EX1 | ;
|
|
| DISPLAY | ;IB*822/CKB - call from EN or EN1 to display the ePharmacy
|
|
| DATE(X) | ;IB*822/CKB - make the date readable, convert YYYYMMDD to MM/DD/YYYY
|
|
| NODATA | ;IB*822/CKB - if BPS RESPONSE is not found display no data found
|
| FileNo | Call Tags |
|---|---|
| ^BPSR - [#9002313.03] | GETS^DIQ |
| 9002313.0301 | GETS^DIQ |
| ^BPS(9002313.19 - [#9002313.19] | GET1^DIQ |
| ^BPS(9002313.43 - [#9002313.43] | GET1^DIQ |
| ^BPS(9002313.44 - [#9002313.44] | GET1^DIQ |
| ^BPS(9002313.45 - [#9002313.45] | GET1^DIQ |
