SDHLAPT2 ;MS/PB - VISTA SCHEDULING RPCS ; 4/29/24 10:37am
Source file <SDHLAPT2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| AIL | ;
|
|
| NEWTIME | ||
| CHKCON(DFN,SDAPTYP) | ; checks if both consult ids or both rtc ids match the patient, if the consult or rts is not for the patient, reject
|
|
| CHKCAN(PAT,CLINIC,DATE) | ; check to see if the appointment in 44 is canceled correctly. if not cancel it
|
|
| JSONTFM(DTTM,INST) | ;Convert XML/JSON external time to FM format in local timezone. If zulu time, apply timezone difference.
|
|
| LOOPMSG(ERR,ERRTXT) | ;Loop to read in HL7 msg data. Code moved here from sdhl7apt. 879
|
|
| CHKCHILD() | ; Multi-RTC check if children exist
|
|
| CHILDREN(PARENT) | ;Check if any children Reqs exists from parent to end of file
; return 1 = Yes ; 0 = No |
|
| APPTSCENARIO | ;Examine SCH/AIL segments for correct passed in scenarios from CRM/HS also handle exceptions
|
|
| MRTCCHILD(PARENT,MTC) | ;Add children RTCs to Req file for a solo parent and increment CID date for each Req child
|
|
| BLDARRAYS(ERR,ERRTXT) | ;Build segment arrays. Code moved here from sdhl7apt. 879
|
|
| LASTCHILD(PARENT) | ;Check if the last child for this MRTC Appt was made
|
|
| MRTCCLOSEOUT | ;MRTC appts only closeout processing for parent
|
|
| MRTCREOPEN | ;Execute MRTC Parent Re-Open logic
|
| FileNo | Call Tags |
|---|---|
| ^GMR(123 - [#123] | GET1^DIQ |
| ^SDEC(409.85 - [#409.85] | GET1^DIQ |
