XUPSPRA ;ALB/CMC - Build PRA segment;Aug 6, 2010
Source file <XUPSPRA.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(XUPSIEN,XUPSSTR,HL) | ;
|
|
QUIT | ||
DEAXDT(DEA) | ; 689 - Return Expiration Date for DEA
|
|
PRXDT(IEN) | ; 689 - called from PRXDT^XUSER
|
|
PRDEA(IEN) | ; 689 - Called from PRDEA^XUSER
|
|
PRSCH(IEN,SCHTYP) | ; 689 - Called from PRSCH^XUSER
; IEN : PROVIDER DUZ ; SCHTYP : NULL or 0 = First Active DEA Number ; 1 = Inpatient DEA ; 2 = First Institutional DEA |
|
DEASCH(DEA) | ; 689 - Return DEA schedules for DEA
; DEA number |