SDESAPPTLETTERS ;ALB/BWF - VISTA SCHEDULING RPCS - LETTER PRINT ; August 29, 2022
Source file <SDESAPPTLETTERS.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 3 | BUILDJSON^SDESBUILDJSON ERRLOG^SDESJSON ($$EASVALIDATE,$$TIMEZONEDATA)^SDESUTIL |
| VA FileMan | 3 | DW^%DTC $$FIND1^DIC ($$GET1,GETS)^DIQ |
| Kernel | 2 | $$FMTE^XLFDT $$NAMEFMT^XLFNAME |
| Registration | 2 | $$FML^DGNFUNC (ADD,DEM,KVAR)^VADPT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRINTLETTER(SDRES,APPTIEN,LTYPE,SDEAS) | ;
|
|
| PRINTLETTERS(SDRES,APPTLIST,LTYPE,SDEAS) | ;
|
|
| VALAPPTS(ERRORS,LIST) | ;
|
|
| VALAPPT(ERRORS,APPTIEN) | ;
|
|
| VALLETTYPE(ERRORS,LTYPE) | ;
|
|
| VALIDATEEAS(ERRORS,SDEAS) | ;
|
|
| APPTLETTER(SDECY,SDECAPID,LT) | ||
| PRT(DFN,SDC,SD,LT,SDLET,SDFORM) | ;
; DFN - pointer to PATIENT file 2 ; SDC - pointer to HOSPITAL LOCATION file 44 ; SD - appointment time in FM format ; LT - Letter type - "N"=No Show; "P"=Pre-Appointment; "A"=Cancelled by Patient; "C"=Cancelled by Clinic ; SDLET - pointer to LETTER file 407.5 ; SDFORM - address location on letters (1 - bottom, 0 - top) |
|
| WRAPP(DFN,SDC,SD,LT,SDLET) | ;WRITE APPOINTMENT INFORMATION
|
|
| FORM(SDC,SDCL,SDX,LEXPROC) | ;
|
|
| REST(DFN,SDC,SD,LT,SDLET,SDFORM) | ;WRITE THE REMAINDER OF LETTER
|
|
| ADDR(DFN) | ;
|
|
| DTS(Y) | ;
|
|
| LAST4(DFN) | ;Return patient "last four"
|
|
| BADADD | ;Print patients with a Bad Address Indicator
|
|
| TST(SDCL,DOW) | ; handle scheduled tests
|
|
| FILL(PADS,CHAR) |
| Name | Field # of Occurrence |
|---|---|
| DW^%DTC | FORM+3 |
| $$FML^DGNFUNC | ADDR+4 |
| $$FIND1^DIC | VALLETTYPE+4 |
| $$GET1^DIQ | APPTLETTER+17, APPTLETTER+19, APPTLETTER+21, APPTLETTER+23, APPTLETTER+26, PRT+28, WRAPP+3, WRAPP+7, WRAPP+8, WRAPP+9 , WRAPP+10, WRAPP+11, WRAPP+12, FORM+14, FORM+15, FORM+16, FORM+17, FORM+20, FORM+21, FORM+22 , REST+4, ADDR+5, ADDR+8, ADDR+9 |
| GETS^DIQ | APPTLETTER+11 |
| BUILDJSON^SDESBUILDJSON | PRINTLETTER+7, PRINTLETTER+21, PRINTLETTERS+10, PRINTLETTERS+26 |
| ERRLOG^SDESJSON | PRINTLETTERS+3, VALAPPTS+2, VALAPPTS+4, VALAPPT+1, VALAPPT+2, VALLETTYPE+2, VALLETTYPE+3, VALIDATEEAS+2 |
| $$EASVALIDATE^SDESUTIL | VALIDATEEAS+1 |
| $$TIMEZONEDATA^SDESUTIL | FORM+2 |
| ADD^VADPT | ADDR+6 |
| DEM^VADPT | LAST4+2 |
| KVAR^VADPT | ADDR+29 |
| $$FMTE^XLFDT | PRT+13, DTS+2 |
| $$NAMEFMT^XLFNAME | PRT+22 |
| RPC Name | Call Tags |
|---|---|
| SDES PRINT APPT LETTER | PRINTLETTER |
| SDES PRINT APPT LETTERS | PRINTLETTERS |
| FileNo | Call Tags |
|---|---|
| 2.98 | GET1^DIQ |
| ^DG(40.8 - [#40.8] | GET1^DIQ |
| ^VA(407.6 - [#407.6] | FIND1^DIC |
| ^SDEC(409.831 - [#409.831] | GET1^DIQ |
| ^SDEC(409.84 - [#409.84] | GETS^DIQ |
| ^DG(43 - [#43] | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ |
| 44.1 | GET1^DIQ |
| ^DIC(5 - [#5] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD("FUNC" - [#.5] | FORM+5 |
| ^DG(40.8 - [#40.8] | APPTLETTER+24 |
| ^DG(43 - [#43] | ADDR+5 |
| ^SC - [#44] | FORM+19 |
| ^SDEC(409.84 - [#409.84] | VALAPPTS+4, VALAPPT+2 |
| ^TMP("SDEC" | APPTLETTER+8!, APPTLETTER+10*, APPTLETTER+22*, APPTLETTER+28*, APPTLETTER+32*, PRT+14*, PRT+15*, PRT+17*, PRT+19*, PRT+23* , PRT+24*, PRT+25*, PRT+28*, PRT+29*, WRAPP+13*, FORM+8*, FORM+10*, FORM+23*, FORM+27*, FORM+30* , REST+4*, REST+5*, ADDR+4*, ADDR+13*, ADDR+16*, ADDR+18*, ADDR+19*, ADDR+22*, ADDR+24*, ADDR+26* , ADDR+27*, ADDR+28*, BADADD+3*, BADADD+4*, BADADD+6*, BADADD+7*, BADADD+8*, BADADD+11*, BADADD+12*, BADADD+13* , BADADD+14*, TST+3*, TST+6*, TST+9* |
| ^TMP($J | BADADD+1, BADADD+9, BADADD+10 |
| ^VA(200 - [#200] | FORM+29 |
| ^VA(407.5 - [#407.5] | PRT+27, FORM+30, REST+3 |
| ^VA(407.6 - [#407.6] | VALLETTYPE+3 |
| Name | Line Occurrences |
|---|---|
| $$FILL | PRT+14, PRT+15, ADDR+4, ADDR+13, ADDR+16, ADDR+18, ADDR+19, ADDR+22, ADDR+24, ADDR+26 , ADDR+27, BADADD+3, BADADD+4, BADADD+8 |
| $$LAST4 | PRT+15, BADADD+11 |
| $$VALLETTYPE | PRINTLETTERS+6 |
| ADDR | PRT+18, REST+6 |
| APPTLETTER | PRINTLETTER+8, PRINTLETTERS+14 |
| FORM | WRAPP+4, WRAPP+8, WRAPP+10, WRAPP+12 |
| PRT | APPTLETTER+29 |
| REST | APPTLETTER+31 |
| TST | FORM+32 |
| VALAPPT | PRINTLETTER+3 |
| VALAPPTS | PRINTLETTERS+5 |
| VALIDATEEAS | PRINTLETTER+5, PRINTLETTERS+7 |
| VALLETTYPE | PRINTLETTER+4 |
| WRAPP | APPTLETTER+30 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| APPT | VALAPPTS+1~, VALAPPTS+3*, VALAPPTS+4 |
| APPTIEN | PRINTLETTER~, PRINTLETTER+2*, PRINTLETTER+3, PRINTLETTER+8, PRINTLETTER+12, PRINTLETTER+15, PRINTLETTERS+1~, PRINTLETTERS+11*, PRINTLETTERS+13*, PRINTLETTERS+14 , PRINTLETTERS+17, PRINTLETTERS+20, VALAPPT~, VALAPPT+1, VALAPPT+2 |
| APPTLIST | PRINTLETTER+1~, PRINTLETTERS~, PRINTLETTERS+2, PRINTLETTERS+5 |
| APPTLIST( | PRINTLETTERS+13 |
| B | WRAPP+1~ |
| CHAR | FILL~, FILL+2*, FILL+3*, FILL+5 |
| CLIN | VALLETTYPE+1~ |
| CLINICIEN | APPTLETTER+5~, APPTLETTER+17*, APPTLETTER+19, APPTLETTER+21, APPTLETTER+23, APPTLETTER+29, APPTLETTER+30, APPTLETTER+31 |
| DFN | APPTLETTER+5~, APPTLETTER+13*, APPTLETTER+29, APPTLETTER+30, APPTLETTER+31, PRT~, PRT+9, PRT+15, PRT+18, PRT+21 , WRAPP~, WRAPP+6, REST~, REST+6, ADDR~, ADDR+4, LAST4~ |
| DOW | FORM+1~, FORM+3*, FORM+8, FORM+32, TST~, TST+3, TST+6, TST+9 |
| DPTNAME | PRT+8~, PRT+22 |
| DPTNAME("FIELD" | PRT+21* |
| DPTNAME("FILE" | PRT+21* |
| DPTNAME("IENS" | PRT+21* |
| DT | PRT+12 |
| ERRORS | PRINTLETTER+1~, PRINTLETTER+3, PRINTLETTER+4, PRINTLETTER+5, PRINTLETTER+6, PRINTLETTER+7, PRINTLETTER+20, PRINTLETTERS+1~, PRINTLETTERS+3, PRINTLETTERS+5 , PRINTLETTERS+6, PRINTLETTERS+7, PRINTLETTERS+8, PRINTLETTERS+10, PRINTLETTERS+25, VALAPPTS~, VALAPPTS+2, VALAPPTS+4, VALAPPT~, VALAPPT+1 , VALAPPT+2, VALLETTYPE~, VALLETTYPE+2, VALLETTYPE+3, VALIDATEEAS~, VALIDATEEAS+2 |
| ERRORS("Letters" | PRINTLETTERS+9* |
| ERRTXT | APPTLETTER+6~, APPTLETTER+21*, APPTLETTER+22 |
| FINSEC | REST+1~, REST+3*, REST+4 |
| GBL | PRINTLETTER+1~, PRINTLETTER+8, PRINTLETTER+10, PRINTLETTER+16, PRINTLETTER+17, PRINTLETTER+18, PRINTLETTERS+1~, PRINTLETTERS+14, PRINTLETTERS+15, PRINTLETTERS+21 , PRINTLETTERS+22, PRINTLETTERS+23 |
| I | PRT+17*, PRT+19*, FILL+1~, FILL+5* |
| INITSEC | PRT+8~, PRT+27*, PRT+28 |
| J | FORM+1~, FORM+19*, FORM+20, FORM+21 |
| LCNT | PRINTLETTER+1~, PRINTLETTER+9*, PRINTLETTER+11*, PRINTLETTER+12, PRINTLETTER+13, PRINTLETTER+14*, PRINTLETTER+15, PRINTLETTER+16, PRINTLETTER+18, PRINTLETTERS+1~ , PRINTLETTERS+11*, PRINTLETTERS+16*, PRINTLETTERS+17, PRINTLETTERS+18, PRINTLETTERS+19*, PRINTLETTERS+20, PRINTLETTERS+21, PRINTLETTERS+23 |
| LETIEN | PRINTLETTERS+1~, PRINTLETTERS+6*, PRINTLETTERS+8 |
| LETTERS | PRINTLETTER+1~, PRINTLETTER+19, PRINTLETTER+20*, PRINTLETTER+21, PRINTLETTERS+1~, PRINTLETTERS+24, PRINTLETTERS+25*, PRINTLETTERS+26 |
| LETTERS("Letters" | PRINTLETTER+12*, PRINTLETTER+13*, PRINTLETTER+15*, PRINTLETTER+16*, PRINTLETTER+18*, PRINTLETTER+19*, PRINTLETTERS+17*, PRINTLETTERS+18*, PRINTLETTERS+20*, PRINTLETTERS+21* , PRINTLETTERS+23*, PRINTLETTERS+24* |
| LEXPROC | FORM~, FORM+7, FORM+8, FORM+9, FORM+22, FORM+24, FORM+30, FORM+32 |
| LIEN | VALLETTYPE+1~, VALLETTYPE+4*, VALLETTYPE+5 |
| LINE | PRINTLETTER+1~, PRINTLETTER+17*, PRINTLETTER+18, PRINTLETTERS+1~, PRINTLETTERS+22*, PRINTLETTERS+23 |
| LIST | VALAPPTS~ |
| LIST( | VALAPPTS+3 |
| LIST(0 | VALAPPTS+2 |
| LL | ADDR+2~, ADDR+13*, ADDR+22* |
| LT | APPTLETTER~, APPTLETTER+18, APPTLETTER+21, APPTLETTER+29, APPTLETTER+30, APPTLETTER+31, PRT~, PRT+10, WRAPP~, REST~ |
| LTYPE | PRINTLETTER~, PRINTLETTER+2*, PRINTLETTER+4, PRINTLETTER+8, PRINTLETTERS~, PRINTLETTERS+4*, PRINTLETTERS+6, PRINTLETTERS+14, VALLETTYPE~, VALLETTYPE+2 , VALLETTYPE+3, VALLETTYPE+4 |
| PADS | FILL~, FILL+5 |
| PTAPPIENS | WRAPP+1~, WRAPP+6*, WRAPP+7, WRAPP+8, WRAPP+9, WRAPP+10, WRAPP+11, WRAPP+12 |
| RES | APPTLETTER+5~, APPTLETTER+14*, APPTLETTER+17 |
| RESOURCE | VALLETTYPE+1~ |
| RET | LAST4+1~, LAST4+3*, LAST4+5, FILL+1~, FILL+4*, FILL+5*, FILL+6 |
| S | WRAPP+1~ |
| SCLETFLD | APPTLETTER+6~, APPTLETTER+18*, APPTLETTER+19 |
| SD | PRT~, WRAPP~, WRAPP+2, WRAPP+6, REST~ |
| SDC | PRT~, WRAPP~, WRAPP+3, WRAPP+4, WRAPP+8, WRAPP+10, WRAPP+12, FORM~, FORM+2, FORM+8 , FORM+9, FORM+14, FORM+15, FORM+16, FORM+17, FORM+19, FORM+20, FORM+21, FORM+22, FORM+24 , FORM+29, FORM+30, REST~ |
| SDCCACT1 | ADDR+2~, ADDR+10*, ADDR+12, ADDR+21 |
| SDCCACT2 | ADDR+2~, ADDR+10*, ADDR+12, ADDR+21 |
| SDCL | WRAPP+1~, WRAPP+3*, WRAPP+4*, WRAPP+8*, WRAPP+10*, WRAPP+12*, FORM~, FORM+10, FORM+32, TST~ , TST+1, TST+3, TST+4, TST+6, TST+7, TST+9 |
| SDDAT | WRAPP+1~, FORM+6*, FORM+8, TST+3, TST+6, TST+9 |
| SDDFN | BADADD+2~, BADADD+10*, BADADD+11 |
| SDEAS | PRINTLETTER~, PRINTLETTER+2*, PRINTLETTER+5, PRINTLETTERS~, PRINTLETTERS+4*, PRINTLETTERS+7, VALIDATEEAS~, VALIDATEEAS+1*, VALIDATEEAS+2 |
| SDECAPID | APPTLETTER~, APPTLETTER+11, APPTLETTER+12, APPTLETTER+13, APPTLETTER+14 |
| SDECDATA | APPTLETTER+6~ |
| SDECDATA( | APPTLETTER+12, APPTLETTER+13, APPTLETTER+14 |
| SDECI | APPTLETTER+5~, APPTLETTER+7*, APPTLETTER+22*, APPTLETTER+32*, PRT+14*, PRT+15*, PRT+17*, PRT+19*, PRT+23*, PRT+24* , PRT+25*, PRT+28*, PRT+29*, WRAPP+13*, FORM+8*, FORM+10*, FORM+23*, FORM+27*, FORM+30*, REST+4* , REST+5*, ADDR+3*, ADDR+4, ADDR+13*, ADDR+16*, ADDR+18*, ADDR+19*, ADDR+22*, ADDR+24*, ADDR+26* , ADDR+27*, ADDR+28*, BADADD+3*, BADADD+4*, BADADD+6*, BADADD+7*, BADADD+8*, BADADD+11*, BADADD+12*, BADADD+13* , BADADD+14*, TST+2*, TST+3, TST+5*, TST+6, TST+8*, TST+9 |
| SDECY | APPTLETTER~, APPTLETTER+9* |
| SDFORM | APPTLETTER+6~, APPTLETTER+26*, APPTLETTER+29, APPTLETTER+31, PRT~, PRT+11*, PRT+16, REST~, REST+6 |
| SDHDR | BADADD+2~, BADADD+4* |
| SDHDR1 | BADADD+2~, BADADD+5*, BADADD+14 |
| SDHX | WRAPP+1~, FORM+1~, FORM+3*, FORM+6 |
| SDIENS | ADDR+2~, ADDR+8*, ADDR+9* |
| SDIV | APPTLETTER+6~, APPTLETTER+23*, APPTLETTER+24*, APPTLETTER+26 |
| SDLET | APPTLETTER+5~, APPTLETTER+19*, APPTLETTER+20, APPTLETTER+29, APPTLETTER+30, APPTLETTER+31, PRT~, PRT+27, PRT+28, WRAPP~ , FORM+22, FORM+30, REST~, REST+3, REST+4 |
| SDLOC | FORM+1~, FORM+14*, FORM+23 |
| SDNAM | APPTLETTER+6~, BADADD+2~, BADADD+9*, BADADD+10, BADADD+11 |
| SDPRNM | FORM+1~, FORM+29*, FORM+30 |
| SDPROV | FORM+1~, FORM+21*, FORM+28, FORM+29 |
| SDRES | PRINTLETTER~, PRINTLETTER+7, PRINTLETTER+21, PRINTLETTERS~, PRINTLETTERS+10, PRINTLETTERS+26 |
| SDT | APPTLETTER+5~, APPTLETTER+12*, APPTLETTER+29, APPTLETTER+30, APPTLETTER+31 |
| SDT0 | FORM+1~, FORM+6*, FORM+8, TST+3, TST+6, TST+9 |
| SDTEL | FORM+1~, FORM+15*, FORM+16, FORM+24, FORM+25 |
| SDTELEXT | FORM+1~, FORM+16*, FORM+17*, FORM+26 |
| SDTMP | FORM+1~, FORM+25*, FORM+26*, FORM+27 |
| SDX | WRAPP+1~, WRAPP+2*, WRAPP+4, WRAPP+5, WRAPP+8*, WRAPP+10*, WRAPP+12*, WRAPP+14*, FORM~, FORM+3 |
| SDX1 | WRAPP+1~, WRAPP+5*, WRAPP+14 |
| TIMEZONE | APPTLETTER+5~, FORM+1~, FORM+2*, FORM+8 |
| U | VALIDATEEAS+2, FORM+2, FORM+29, FORM+30, ADDR+8, ADDR+9, ADDR+16, ADDR+19, ADDR+24, ADDR+27 , LAST4+3 |
| VADM | LAST4+4! |
| VADM(1 | LAST4+3 |
| VADM(2 | LAST4+3 |
| VAHOW | ADDR+1! |
| VAPA | ADDR+2~ |
| VAPA( | ADDR+13, ADDR+22 |
| VAPA("P" | ADDR+5* |
| VAPA(11 | ADDR+16 |
| VAPA(12 | ADDR+10 |
| VAPA(16 | ADDR+24, ADDR+26 |
| VAPA(17 | ADDR+9*, ADDR+24 |
| VAPA(18 | ADDR+24 |
| VAPA(22 | ADDR+10 |
| VAPA(23 | ADDR+18 |
| VAPA(24 | ADDR+18 |
| VAPA(25 | ADDR+15, ADDR+19 |
| VAPA(26 | ADDR+26 |
| VAPA(27 | ADDR+26 |
| VAPA(28 | ADDR+23, ADDR+27 |
| VAPA(4 | ADDR+16, ADDR+18 |
| VAPA(5 | ADDR+8*, ADDR+16 |
| X | PRT+8~, PRT+22*, PRT+23, WRAPP+1~, WRAPP+14*, FORM+1~, FORM+3*, FORM+4*, FORM+6, ADDR+2~ , ADDR+8*, ADDR+9* |
| X1 | APPTLETTER+5~ |
| X2 | APPTLETTER+5~ |
| Y | APPTLETTER+5~, PRT+8~, PRT+12*, PRT+13*, PRT+14, DTS~, DTS+1, DTS+2 |
