TIUPXAP1 ;SLC/JER - Interface w/PCE/Visit Tracking ;Dec 29, 2023@07:48:22
Source file <TIUPXAP1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
QUE | ; Post visit tracking information
; if there is already a visit, and no workload data quit ; *295 Skip defer logic if from reassign (TIURD3) ; *314 move check for call from TIURD3 to the Quit condition |
|
WORKOK(DA) | ; Evaluate whether workload collection is appropriate
|
|
ENQ | ; Entry point for Resource
|
|
POST(TIUX,DFN,TIUDA,ICD,CPT,SC) | ; Call on commitment to post data to PCE/AmbCare
|
|
PXAPI(TIUVSIT,DFN,VLOC,VDT,VCAT,VSTOP,ICD,CPT,SC,TIUDA) | ; Build input root
|
|
PROVIDER(USER,DATE) | ; Was USER a PROVIDER on DATE?
|
|
PROVIDEX | ||
DEFER(DA) | ; Mark record to defer workload collection
|