SDOEPRV ;ALB/MJK - ACRP Provider APIs For An Encounter ;8/12/96
Source file <SDOEPRV.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PRV(SDOE,SDERR) | ; -- SDOE ASSIGNED A PROVIDER
; API ID: 63 |
|
PRVQ | ||
GETPRV(SDOE,SDPRV,SDERR) | ; -- SDOE GET PROVIDERS
; API ID: 58 |
|
GETPRVG | ;; -- goto entry point
; -- do validation checks |
|
GETPRVQ | ||
FINDPRV(SDOE,SDPRVID,SDERR) | ; -- SDOE FIND PROVIDER
; API ID: 69 |
|
FINDPRVQ | ||
VALPRV(SDPRVID,SDERR) | ; -- validate provider input
|
|
OLDPRV(SDOE) | ; -- at least one provider for OLD encounter?
|
|
OLDPRVS(SDOE,SDARY) | ; -- get provider's for OLD encounter
|