SDHLAPT2 ;MS/PB - VISTA SCHEDULING RPCS ;Nov 14, 2014
Source file <SDHLAPT2.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
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.
|
Name | Field # of Occurrence |
---|---|
^DIK | CHKCAN+10 |
$$GET1^DIQ | CHKCON+9 |
$$UTC^DIUTC | JSONTFM+12 |
$$SCIEN^SDECU2 | CHKCAN+5 |
PARSESEG^SDHL7APU | AIL+1 |
RESLKUP^SDHL7APU | AIL+2 |
SENDERR^SDHL7APU | CHKCON+12, CHKCON+24 |
$$CHKINST^SDTMPHLA | JSONTFM+8 |
$$INST^SDTMPHLA | NEWTIME+3 |
$$TMCONV^SDTMPHLA | NEWTIME+6 |
$$FMADD^XLFDT | NEWTIME+5, JSONTFM+13 |
FileNo | Call Tags |
---|---|
^GMR(123 - [#123] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | CHKCON+11, CHKCON+23 |
^GMR(123 - [#123] | CHKCON+10 |
^SDEC(409.85 - [#409.85] | AIL+9, AIL+11, CHKCON+21 |
Name | Line Occurrences |
---|---|
$$JSONTFM | NEWTIME+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> AIL | AIL+1 |
>> AIL( | CHKCON+7, CHKCON+19 |
>> AIL(1 | AIL+6, AIL+7, AIL+8, AIL+15, CHKCON+1 |
>> AIL(2 | NEWTIME+3, CHKCON+1 |
>> AIL(3 | AIL+2 |
CLINIC | CHKCAN~, CHKCAN+3, CHKCAN+5, CHKCAN+8, CHKCAN+9 |
CONSID | AIL+3~, AIL+7* |
DA | CHKCAN+1~, CHKCAN+9*, CHKCAN+11! |
DA(1 | CHKCAN+9* |
DA(2 | CHKCAN+9* |
DATE | CHKCAN~, CHKCAN+4, CHKCAN+5, CHKCAN+8, CHKCAN+9, JSONTFM+6~, JSONTFM+9*, JSONTFM+12, JSONTFM+13 |
DFN | CHKCON~, CHKCON+10, CHKCON+11, CHKCON+21, CHKCON+23 |
DIFF | JSONTFM+6~, JSONTFM+12*, JSONTFM+13 |
DIK | CHKCAN+1~, CHKCAN+8*, CHKCAN+11! |
DTTM | JSONTFM~, JSONTFM+7, JSONTFM+9, JSONTFM+10 |
>> ERR | CHKCON+11*, CHKCON+12, CHKCON+23*, CHKCON+24 |
GMRDFN | CHKCON+3~, CHKCON+9*, CHKCON+10 |
>> HL | AIL+1 |
IENS | CHKCON+3~, CHKCON+7*, CHKCON+8, CHKCON+9, CHKCON+10, CHKCON+11, CHKCON+19*, CHKCON+20, CHKCON+21 |
INST | NEWTIME+3*, NEWTIME+4, NEWTIME+6, JSONTFM~, JSONTFM+8 |
MTC | AIL+3~, AIL+9*, AIL+12 |
PAT | CHKCAN~, CHKCAN+2, CHKCAN+5 |
>> PROVAPT( | AIL+16 |
RET | AIL+2~ |
RET1 | AIL+2~ |
RTCID | AIL+11!*, AIL+12 |
SDAPTYP | AIL+5*, AIL+7*, AIL+12*, AIL+15*, CHKCON~, CHKCON+4, CHKCON+16, CHKCON+23 |
>> SDCL | AIL+2* |
>> SDECNOTE | AIL+16* |
>> SDECRES | AIL+2* |
>> SDMRTC | AIL+9* |
>> SDPARENT | AIL+6*, AIL+9, AIL+11 |
SDT | JSONTFM+6~, JSONTFM+13*, JSONTFM+14 |
>> SDTMPHL(1 | NEWTIME+2, NEWTIME+8* |
>> SDTMPHL(5 | NEWTIME+9* |
>> SEG | AIL+1 |
ST1 | NEWTIME+1~, NEWTIME+2*, NEWTIME+4*, NEWTIME+5*, NEWTIME+6*, NEWTIME+7 |
ST12 | NEWTIME+1~, NEWTIME+2*, NEWTIME+7*, NEWTIME+8, NEWTIME+9 |
STCREC | AIL+3~, AIL+4* |
>> STOPME | CHKCON+2*, CHKCON+6, CHKCON+13*, CHKCON+18, CHKCON+22* |
TIEN | CHKCAN+1~, CHKCAN+5*, CHKCAN+6, CHKCAN+7, CHKCAN+9 |
TM | JSONTFM+6~, JSONTFM+10*, JSONTFM+11*, JSONTFM+12, JSONTFM+13 |
TZINST | JSONTFM+6~, JSONTFM+8*, JSONTFM+12 |
X1 | CHKCON+3~, CHKCON+5*, CHKCON+7, CHKCON+17*, CHKCON+19 |
X12 | AIL+11!* |
>> XX | AIL+16 |
ZULU | JSONTFM+6~, JSONTFM+7*, JSONTFM+12 |