SDESBLKANDMOVE ;ALB/TAW,MGD,LAB - BLOCK AND MOVE ;May 09,2023
Source file <SDESBLKANDMOVE.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
APPTBLOCKMOVE(RETURN,APPTIEN,TORES,TODTNET,EASTRCKNGNMBR) | ;
|
|
VALIDATEINPUT | ;Validate input parameters from the APPTBLOCKMOVE entry point
|
|
LOADAPPTDATA(FN,APPTARY,SDECAPPTIENS) | ;Load variables used throughout B&M
|
|
VALIDATE | ; Simple validation
|
|
COMPARETIMESCALE | ;Compare the Time Scale of the Clinic Resource from the original appt vs new appt
|
|
SDSEGMENTS | ; Build local array of slots with SCHEDULE and EVALUATE nodes
|
|
SEGARRAY(CLIEN,TIMESCALE,FROMDTFM,CLINBEG,CLINID) | ; Create local array to hold segments for validation comparisons
|
|
SLOTCOUNT | ;
; Verifying that we don't have more than the max allowable slots defined for the period of time we are reviewing |
|
APPDEL | ;Call APPDEL RPC to cancel the current appointment
|
|
APPADD(SDECAPPTIEN,SDECSTART,SDECLEN,SDECRES,SDECEND,FN,APPTARY,SDECAPPTIENS) | ;entry point before calling APPADD^SDEC07
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | FIND1^DIC |
^HOLIDAY - [#40.5] | FIND1^DIC |
^SD(409.2 - [#409.2] | FIND1^DIC |
^SDEC(409.831 - [#409.831] | GET1^DIQ |
^SC - [#44] | GET1^DIQ |