SDAMA307 ;BPOIFO/ACS-Filter API Call RSA ; 9/14/05 12:45pm
Source file <SDAMA307.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DATA(SDARRAY,SDVRFR) | ;Get RSA appointment data (Phase II)
|
|
| IMP() | ;RSA Implemented
|
|
| GETSRVNM() | ;return the VL 2.0 application server name
|
|
| CLMIG(SDCLIEN,SDARRAY) | ;clinic status switch
|
|
| RSACLNC(SDCLNC) | ;determine if Clinic is an RSA Clinic
|
|
| VI() | ;Get VistA Instance
|
|
| MAXAPPTS(SDARRAY) | ;Adjust combined appointments (VistA/RSA) to MAX
|
|
| CALLRSA(SDARRAY) | ;
|
|
| ERROR(SDERRNUM,SDVLRHNL) | ;error handling
|
|
| VLERR(SDVLRHNL,SDVRFR) | ;write vistalink errors to err log
|