SDHLAPT1 ;MS/PB - VISTA SCHEDULING RPCS ;Nov 14, 2014
Source file <SDHLAPT1.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 |
|---|---|---|
| ARSET(RET,INP) | ;Appointment Request Set
|
|
| FDAPRER(FDA,ARPRER,ARIEN) | ;Setup the FDA array for the PREREQUISITE multiple (#48)
|
|
| DELPRER(ARIEN) | ;Delete all entries in the PREREQUISITE multiple (#48)
|
|
| GETPRER(RET,ARIEN) | ;Return the values in the PREREQUISITE multiple (#48)
|
|
| ARAUD(ARIEN,ARCLIN,ARSTOP,DATE,USER) | ;populate VS AUDIT multiple field 45
; ARIEN - (required) pointer to SDEC APPT REQUEST file 409.85 ; ARCLIN - (optional) pointer to HOSPITAL LOCATION file 44 ; ARSTOP - (optional) pointer to CLINIC STOP file ; DATE - (optional) date/time in fileman format |
|
| AR433(ARIEN,SDEC) | ;set MULT APPTS MADE
|
|
| AR433D(SDEC) | ;delete MULT APPTS MADE
|
|
| AR438(ARIEN,SDPARENT,SDEC) | ;set PARENT REQUEST field 43.8; set as child in MULTAPPTS MADE in parent request
|
|
| AR435(SDDT,ARIEN) | ;set dates into MRTC CALC PREF DATES multiple field 43.5
|
|
| WLACT(NAME) | ;
|
|
| AR23(INP17,ARI) | ;Patient Contacts
|
|
| UPDATE(ARIEN,APPDT,SDCL,SVCP,SVCPR,NOTE,SDAPPTYP) | ;update REQ APPT REQUEST at apointment add
|
|
| GETAPP(DFN,SDECRES,STARTDT) | ; returns the appointment id in 409.84
|
| Name | Field # of Occurrence |
|---|---|
| ^%DT | ARSET+73, ARSET+95, ARSET+164, AR435+7, AR23+7 |
| UPDATE^DIE | ARSET+191, ARAUD+17, AR433+20, AR433D+13, AR438+2, AR435+11, AR23+26, UPDATE+26 |
| ^DIK | DELPRER+4 |
| $$GET1^DIQ | AR433+14, AR433D+8, AR433D+9 |
| GETS^DIQ | ARSET+160, AR23+14 |
| $$FNUM^SDECAR | ARSET+63 |
| $$NOW^XLFDT | ARSET+95, ARAUD+11, WLACT+4, UPDATE+14 |
| FileNo | Call Tags |
|---|---|
| ^SDEC(409.84 - [#409.84] | GET1^DIQ |
| 409.8544 | GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(40.8 - [#40.8] | UPDATE+19 |
| ^DIC(4 - [#4] | ARSET+77 |
| ^DIC(40.7 - [#40.7] | WLACT+3, WLACT+4 |
| ^DPT - [#2] | ARSET+71 |
| ^SC - [#44] | ARSET+82, UPDATE+16, UPDATE+17, UPDATE+18 |
| ^SC("B" | ARSET+85 |
| ^SD(409.1 - [#409.1] | ARSET+109 |
| ^SDEC(409.84 - [#409.84] | AR433+19, AR433D+7, GETAPP+4, GETAPP+5 |
| ^SDEC(409.85 - [#409.85] | ARSET+110, ARSET+116, ARSET+119, ARSET+120, ARSET+123, ARSET+196, DELPRER+4, GETPRER+2, GETPRER+4, GETPRER+5 , ARAUD+9, ARAUD+10, AR433+9, AR433+16, AR433+18, AR433D+10, AR433D+11, AR435+9 |
| ^VA(200 - [#200] | ARSET+89, ARSET+93, AR23+16, AR23+22 |
| Name | Line Occurrences |
|---|---|
| AR433 | ARSET+200, ARSET+201 |
| ARAUD | ARSET+199 |
| DELPRER | ARSET+185 |
| FDAPRER | ARSET+148, ARSET+186 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | ARSET+57~, ARSET+73*, ARSET+95*, ARSET+164*, AR435+5~, AR435+7*, AR23+2~, AR23+7* |
| ACTIVE | WLACT+1~, WLACT+2*, WLACT+3, WLACT+5*, WLACT+6 |
| APPDT | UPDATE~, UPDATE+13 |
| APT | GETAPP+2~, GETAPP+3*, GETAPP+5*, GETAPP+6 |
| ARAPTYP | ARSET+58~, ARSET+109*, ARSET+137, ARSET+170 |
| ARASD | AR23+1~, AR23+7*, AR23+8 |
| ARASDH | AR23+1~, AR23+10*, AR23+11, AR23+13, AR23+20 |
| ARCLIN | ARSET+58~, ARSET+79*, ARSET+80, ARSET+81, ARSET+82, ARSET+84, ARSET+85*, ARSET+86, ARSET+108, ARSET+135 , ARSET+168, ARSET+199, ARAUD~, ARAUD+7*, ARAUD+10, ARAUD+15 |
| ARCOMM | ARSET+59~, ARSET+98*, ARSET+151, ARSET+180 |
| ARDAPTDT | ARSET+59~, ARSET+94*, ARSET+95, ARSET+96*, ARSET+97*, ARSET+146, ARSET+179 |
| ARDATA | ARSET+60~, ARSET+159! |
| ARDATA( | ARSET+165, ARSET+166, ARSET+167, ARSET+168, ARSET+169, ARSET+171, ARSET+172, ARSET+173, ARSET+174, ARSET+175 , ARSET+176, ARSET+177, ARSET+178, ARSET+179, ARSET+180 |
| ARDATA1 | AR23+1~ |
| ARDT | AR23+2~, AR23+9*, AR23+15, AR23+21 |
| AREDT | ARSET+59~, ARSET+72*, ARSET+73*, ARSET+75, ARSET+139, ARSET+172 |
| AREESTAT | ARSET+59~ |
| ARENPRI | ARSET+61~, ARSET+99*, ARSET+100*, ARSET+141, ARSET+174 |
| ARERR | ARSET+60~, ARSET+159!, ARSET+161 |
| ARERR1 | AR23+1~ |
| ARHOSN | ARSET+60~ |
| ARI | AR23~, AR23+3 |
| ARI1 | AR23+1~, AR23+4*, AR23+5 |
| ARIEN | ARSET+58~, ARSET+68*, ARSET+125*, ARSET+126, ARSET+158*, ARSET+160, ARSET+162, ARSET+165, ARSET+166, ARSET+167 , ARSET+168, ARSET+169, ARSET+171, ARSET+172, ARSET+173, ARSET+174, ARSET+175, ARSET+176, ARSET+177, ARSET+178 , ARSET+179, ARSET+180, ARSET+185, ARSET+186, ARSET+196, ARSET+199, ARSET+200, ARSET+201, ARSET+203, FDAPRER~ , FDAPRER+6, DELPRER~, DELPRER+2, DELPRER+3, DELPRER+4, GETPRER~, GETPRER+2, GETPRER+4, GETPRER+5, ARAUD~ , ARAUD+6*, ARAUD+9, ARAUD+10, ARAUD+13, ARAUD+14, ARAUD+15, ARAUD+16, AR433~, AR433+8*, AR433+9 , AR433+16, AR433+18, AR433+19, AR433D+3~, AR433D+10*, AR433D+11, AR433D+12, AR438~, AR438+2, AR435~ , AR435+9, AR435+10, UPDATE~, UPDATE+12, UPDATE+13, UPDATE+14, UPDATE+15, UPDATE+16, UPDATE+17, UPDATE+20 , UPDATE+21, UPDATE+22, UPDATE+23, UPDATE+24, UPDATE+25 |
| ARIENS | AR23+1~, AR23+3*, AR23+11 |
| ARIENS1 | AR23+1~, AR23+11*, AR23+12, AR23+14 |
| ARINST | ARSET+58~, ARSET+76*, ARSET+77*, ARSET+133, ARSET+166 |
| ARINSTI | ARSET+58~, ARSET+196* |
| ARMAI | ARSET+61~, ARSET+102*, ARSET+153, ARSET+182 |
| ARMAN | ARSET+61~, ARSET+103*, ARSET+154, ARSET+183 |
| ARMAR | ARSET+61~, ARSET+101*, ARSET+152, ARSET+153, ARSET+154, ARSET+181 |
| ARMSG | ARSET+60~, ARSET+161*, ARSET+192, ARSET+195 |
| ARMSG("DIERR" | ARSET+193 |
| ARNEW | ARSET+60~, ARSET+126*, ARSET+127 |
| ARNLT | ARSET+59~, ARSET+111*, ARSET+116*, ARSET+147, ARSET+184 |
| ARORDN | ARSET+59~, ARSET+113*, ARSET+123*, ARSET+149, ARSET+187 |
| ARORIGDT | ARSET+58~, ARSET+75*, ARSET+132, ARSET+163, ARSET+164*, ARSET+165 |
| ARORIGDTI | ARSET+58~, ARSET+164*, ARSET+165 |
| ARPARENT | ARSET+61~, ARSET+110*, ARSET+115, ARSET+116, ARSET+117, ARSET+119, ARSET+120, ARSET+122, ARSET+123, ARSET+156 , ARSET+189, ARSET+201 |
| ARPATTEL | ARSET+61~ |
| ARPOS | ARSET+58~ |
| ARPRER | ARSET+112*, ARSET+121*, ARSET+148, ARSET+186, FDAPRER~, FDAPRER+2, FDAPRER+4, FDAPRER+5 |
| ARPRIO | ARSET+59~, ARSET+95*, ARSET+140, ARSET+173 |
| ARPROV | ARSET+59~, ARSET+93*, ARSET+143, ARSET+176 |
| ARQUIT | ARSET+59~, ARSET+62*, ARSET+82*, ARSET+86*, ARSET+87 |
| ARREQBY | ARSET+59~, ARSET+91*, ARSET+92*, ARSET+142, ARSET+175 |
| ARRET | ARSET+60~ |
| ARRET(1 | ARSET+196, ARSET+199, ARSET+200, ARSET+201, ARSET+202 |
| ARRET1 | AR23+1~ |
| ARSRVSP | ARSET+58~ |
| ARSTOP | ARSET+61~, ARSET+107*, ARSET+108, ARSET+136, ARSET+169, ARSET+199, ARAUD~, ARAUD+8*, ARAUD+10, ARAUD+16 |
| ARSVCCON | ARSET+61~, ARSET+104*, ARSET+145, ARSET+178 |
| ARSVCCOP | ARSET+61~, ARSET+105*, ARSET+144, ARSET+177 |
| ARTEAM | ARSET+58~ |
| ARTYPE | ARSET+58~, ARSET+78*, ARSET+134, ARSET+167 |
| ARUSER | ARSET+59~, ARSET+88*, ARSET+89*, ARSET+90*, ARSET+138, ARSET+171, AR23+16 |
| ARUSR | AR23+2~, AR23+16*, AR23+22* |
| ASEQ | FDAPRER+1~, FDAPRER+3*, FDAPRER+6* |
| AUDF | ARSET+60~, ARSET+62*, ARSET+128*, ARSET+168*, ARSET+169*, ARSET+199 |
| CC | GETPRER+1~, GETPRER+4*, GETPRER+5 |
| DA | DELPRER+1~, DELPRER+4* |
| DA(1 | DELPRER+3* |
| DATE | ARAUD~, ARAUD+11*, ARAUD+13 |
| DELIM | FDAPRER+1~, FDAPRER+3*, FDAPRER+4, FDAPRER+5 |
| DFN | ARSET+58~, ARSET+69*, ARSET+70, ARSET+71, ARSET+130, AR433D+3~, AR433D+8*, AR433D+10, GETAPP~, GETAPP+5 |
| DIEN | AR433D+3~, AR433D+9*, AR433D+11 |
| DIK | DELPRER+1~, DELPRER+3* |
| DUZ | ARSET+90, ARAUD+12, UPDATE+21 |
| FDA | ARSET+60~, ARSET+129*, ARSET+130, ARSET+132, ARSET+133, ARSET+134, ARSET+135, ARSET+136, ARSET+137, ARSET+138 , ARSET+139, ARSET+140, ARSET+141, ARSET+142, ARSET+143, ARSET+144, ARSET+145, ARSET+146, ARSET+147, ARSET+148 , ARSET+149, ARSET+150, ARSET+151, ARSET+152, ARSET+153, ARSET+154, ARSET+155, ARSET+156, ARSET+161!, ARSET+162* , ARSET+165, ARSET+166, ARSET+167, ARSET+168, ARSET+169, ARSET+170, ARSET+171, ARSET+172, ARSET+173, ARSET+174 , ARSET+175, ARSET+176, ARSET+177, ARSET+178, ARSET+179, ARSET+180, ARSET+181, ARSET+182, ARSET+183, ARSET+184 , ARSET+186, ARSET+187, ARSET+188, ARSET+189, ARSET+191, FDAPRER~, AR23+1~, AR23+6!, AR23+12*, AR23+15 , AR23+16, AR23+17, AR23+18, AR23+21, AR23+22, AR23+23, AR23+24, AR23+26 |
| FDA( | ARSET+129, ARSET+162, FDAPRER+6*, AR23+12 |
| FNUM | ARSET+60~, ARSET+63*, ARSET+129, ARSET+160, ARSET+162, ARSET+165, ARSET+166, ARSET+167, ARSET+168, ARSET+169 , ARSET+171, ARSET+172, ARSET+173, ARSET+174, ARSET+175, ARSET+176, ARSET+177, ARSET+178, ARSET+179, ARSET+180 |
| H | WLACT+1~, WLACT+3*, WLACT+4, WLACT+5 |
| INP | ARSET~ |
| INP(1 | ARSET+68 |
| INP(10 | ARSET+93 |
| INP(11 | ARSET+94 |
| INP(12 | ARSET+98* |
| INP(13 | ARSET+99 |
| INP(14 | ARSET+101 |
| INP(15 | ARSET+102 |
| INP(16 | ARSET+103 |
| INP(18 | ARSET+104 |
| INP(19 | ARSET+105 |
| INP(2 | ARSET+69 |
| INP(21 | ARSET+107 |
| INP(22 | ARSET+109 |
| INP(23 | ARSET+155, ARSET+188 |
| INP(24 | ARSET+200 |
| INP(25 | ARSET+110 |
| INP(26 | ARSET+111, ARSET+115 |
| INP(27 | ARSET+112, ARSET+117 |
| INP(28 | ARSET+113, ARSET+122 |
| INP(3 | ARSET+72 |
| INP(4 | ARSET+76 |
| INP(5 | ARSET+78 |
| INP(6 | ARSET+79 |
| INP(7 | ARSET+88 |
| INP(9 | ARSET+91 |
| INP17 | AR23~, AR23+4, AR23+5 |
| MI | ARSET+58~, ARSET+193* |
| NAME | WLACT~, WLACT+3 |
| NOTE | UPDATE~, UPDATE+25 |
| PC | FDAPRER+1~, FDAPRER+4*, FDAPRER+5 |
| PR | ARSET+118~, ARSET+120*, ARSET+121, FDAPRER+1~, FDAPRER+5*, FDAPRER+6, GETPRER+1~, GETPRER+5*, GETPRER+6 |
| PRIEN | ARSET+118~, ARSET+119*, ARSET+120 |
| RET | ARSET~, ARSET+64*, ARSET+70*, ARSET+71*, ARSET+74*, ARSET+82*, ARSET+86*, ARSET+108*, ARSET+193*, ARSET+202* , ARSET+203*, GETPRER~, GETPRER+2*, GETPRER+3*, GETPRER+6* |
| SDAPP | AR433+7~, AR433+13*, AR433+14*, AR433+15, AR433+16, AR433+18, AR433+19, AR433D+3~, AR433D+6*, AR433D+7 , AR433D+8, AR433D+9 |
| SDAPPTYP | UPDATE~, UPDATE+12 |
| SDCL | UPDATE~, UPDATE+15, UPDATE+16, UPDATE+17, UPDATE+18 |
| SDDIV | UPDATE+11~, UPDATE+18*, UPDATE+19 |
| SDDT | AR435~, AR435+6, AR435+7 |
| SDEC | AR433~, AR433+10*, AR433+11, AR433+13, AR433D~, AR433D+4*, AR433D+5, AR433D+6, AR438~ |
| SDECRES | GETAPP~, GETAPP+4 |
| SDFDA | ARAUD+5~, AR433+7~, AR433+12!, AR433+20, AR433D+3~, AR438+1~, AR435+5~, UPDATE+11~ |
| SDFDA( | ARAUD+13*, ARAUD+14*, ARAUD+15*, ARAUD+16*, AR433+18*, AR433+19*, AR433D+12*, AR438+2*, AR435+10*, UPDATE+12* , UPDATE+13*, UPDATE+14*, UPDATE+15*, UPDATE+16*, UPDATE+17*, UPDATE+20*, UPDATE+21*, UPDATE+22*, UPDATE+23*, UPDATE+24* , UPDATE+25* |
| SDI | ARSET+200~*, AR433+7~, AR433+11*, AR433+13, AR433D+3~, AR433D+5*, AR433D+6, AR435+5~, AR435+6*, AR435+7 |
| SDIEN | AR433+7~, AR433+16*, AR433+17*, AR433+18, AR433+19 |
| SDJ | AR433D+3~, AR433D+11*, AR433D+12, AR435+5~, AR435+7*, AR435+8, AR435+9, AR435+10 |
| SDMSG | UPDATE+11~ |
| SDP | ARAUD+5~, ARAUD+9*, ARAUD+10 |
| SDPARENT | AR438~, AR438+2 |
| SDPN | ARAUD+5~, ARAUD+10* |
| SDREC | ARSET+60~, ARSET+200* |
| SDSN | UPDATE+11~, UPDATE+19*, UPDATE+20 |
| SDTYP | AR433D+3~, AR433D+9*, AR433D+10 |
| STARTDT | GETAPP~, GETAPP+4 |
| STR17 | AR23+1~, AR23+5*, AR23+7, AR23+9, AR23+15, AR23+16, AR23+17, AR23+18, AR23+21, AR23+22 , AR23+23, AR23+24 |
| SVCP | UPDATE~, UPDATE+23 |
| SVCPR | UPDATE~, UPDATE+24 |
| U | ARSET+116, ARSET+123, ARSET+196, GETPRER+5, GETPRER+6, ARAUD+10, WLACT+4, AR23+16, AR23+22, UPDATE+16 , UPDATE+17, UPDATE+18, UPDATE+19 |
| USER | ARAUD~, ARAUD+12*, ARAUD+14 |
| X | ARSET+57~, ARSET+73*, ARSET+95*, ARSET+164*, AR435+5~, AR435+7*, AR23+2~, AR23+7* |
| XX | GETAPP+2~, GETAPP+4*, GETAPP+5 |
| Y | ARSET+57~, ARSET+73, ARSET+74, ARSET+95, ARSET+96, ARSET+97, ARSET+164, AR435+5~, AR435+7, AR23+2~ , AR23+7 |