IBRXUTL ;ALB/MAF - PHARMACY API CALLS ;1/9/08 14:45
Source file <IBRXUTL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ZERO(IBDRV) | ;
|
|
DATA(IBDRV) | ;
|
|
FILE(DA,DR,INTEXT) | ;Returns single field from file 52
|
|
SUBFILE(DA,DASUB,DR,DRSUB,INTEXT) | ;Returns single field from subfile 52.1
|
|
RXZERO(PDFN,RXIEN) | ;Returns zero node of file 52
|
|
RXSEC(PDFN,RXIEN) | ;Returns second node of file 52
|
|
RX3(PDFN,RXIEN) | ;Returns third node of file 52
|
|
ZEROSUB(PDFN,RXIEN,RXSUB) | ;Returns zero node of subfile 52.1
|
|
RFNUM(RXIEN) | ;
|
|
IBND(DFN,RXIEN) | ;Returns IB node
|
|
IBNDFL(DFN,RXIEN,RXRFL) | ;
|
|
RFLNUM(IBRXN,FLDT,IBFLG) | ; find the refill number in file 52 for the given date
|