MBAARPC2 ;OIT-PD/PB - Scheduling RPCs ;FEB 23, 2017
Source file <MBAARPC2.m>
| Package | Total | Call Graph |
|---|---|---|
| Mobile Scheduling Applications Suite | 10 | $$CANCEL^MBAAAPI1 ERRX^MBAAAPIE ($$CLNRGHT,$$GETSCAP)^MBAAMAP1 $$ISAPTCO^MBAAMAP4 BLDLST^MBAAMAPI ($$COVERB,CANCEL)^MBAAMDA1 ($$GETAPT0,GETAPTS,LSTCSTA1)^MBAAMDA2 CANCEL^MBAAMDA3 STATUS^MBAARPC1 $$NEW^MBAAWLAP |
| Kernel | 3 | $$NOW^XLFDT $$UP^XLFSTR $$IEN^XUMF |
| Scheduling | 3 | ($$HANDLE,BEFORE,CANCEL)^SDAMEVT SDECCAN^SDEC08 $$APPTGET^SDECUTL |
| VA FileMan | 2 | ^%DT $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CANCEL(RV,DFN,SC,SD,TYPE,RSN,RMK) | ; SD APPOINTMENT CANCEL
; MBAA RPC: MBAA CANCEL APPOINTMENT |
|
| CANCEL1(RETURN,DFN,SC,SD,TYP,RSN,RMK) | ; Cancel appointment MBAA RPC: MBAA CANCEL APPOINTMENT
|
|
| CHKCAN(RETURN,DFN,SC,SD) | ; Verify cancel MBAA RPC: MBAA CANCEL APPOINTMENT
|
|
| CHKSPC(RETURN,DFN,SD) | ; Check if status permit cancelation, MBAA RPC: MBAA CANCEL APPOINTMENT
|
|
| NEWEWL(RV,SDWLD) | ; ZLV EWL NEW
|
|
| ENRCHK | ; Check enrollee status codes - must be either N, E, P or U
|
|
| REQBY | ; Checksto be sure a correct value for the REQBY parameter is correct based on the Wait List Type
|
| Name | Field # of Occurrence |
|---|---|
| ^%DT | NEWEWL+38, NEWEWL+49 |
| $$GET1^DIQ | NEWEWL+24, NEWEWL+65 |
| $$CANCEL^MBAAAPI1 | CANCEL1+15 |
| ERRX^MBAAAPIE | CHKCAN+9, CHKCAN+12, CHKCAN+17, CHKCAN+20 |
| $$CLNRGHT^MBAAMAP1 | CHKCAN+14 |
| $$GETSCAP^MBAAMAP1 | CANCEL1+6 |
| $$ISAPTCO^MBAAMAP4 | CHKCAN+11 |
| BLDLST^MBAAMAPI | CHKSPC+14 |
| $$COVERB^MBAAMDA1 | CANCEL1+14 |
| CANCEL^MBAAMDA1 | CANCEL1+16 |
| $$GETAPT0^MBAAMDA2 | CHKSPC+8 |
| GETAPTS^MBAAMDA2 | CHKCAN+6 |
| LSTCSTA1^MBAAMDA2 | CHKSPC+13 |
| CANCEL^MBAAMDA3 | CANCEL1+13 |
| STATUS^MBAARPC1 | CHKSPC+11 |
| $$NEW^MBAAWLAP | NEWEWL+73 |
| $$HANDLE^SDAMEVT | CANCEL1+10 |
| BEFORE^SDAMEVT | CANCEL1+11 |
| CANCEL^SDAMEVT | CANCEL1+22 |
| SDECCAN^SDEC08 | CANCEL1+20 |
| $$APPTGET^SDECUTL | CANCEL1+19 |
| $$NOW^XLFDT | CANCEL1+5, CANCEL1+12 |
| $$UP^XLFSTR | NEWEWL+57 |
| $$IEN^XUMF | NEWEWL+11 |
| RPC Name | Call Tags |
|---|---|
| MBAA CANCEL APPOINTMENT | CANCEL |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^SDWL(409.3 - [#409.3] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | CHKCAN+4, NEWEWL+8 |
| ^SDWL(409.3 - [#409.3] | NEWEWL+63, NEWEWL+65 |
| ^XUSEC("PROVIDER" | NEWEWL+26 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | CANCEL1+1~, CANCEL1+4*, CANCEL1+6*, CANCEL1+15*, CHKCAN+2~, CHKCAN+14* |
| APT | CHKCAN+2!, CHKCAN+6 |
| APT("APT" | CHKCAN+8 |
| APT0 | CHKSPC+4~, CHKSPC+8*, CHKSPC+11 |
| APTR | NEWEWL+62~, NEWEWL+65*, NEWEWL+67! |
| CAPT | CANCEL1+2~, CANCEL1+6 |
| CAPT("CONSULT" | CANCEL1+15 |
| CAPT("DATE" | CANCEL1+8 |
| CAPT("IFN" | CANCEL1+7 |
| CAPT("USER" | CANCEL1+8 |
| CDATE | CANCEL1+1~, CANCEL1+5* |
| CDT | CANCEL1+1~, CANCEL1+12*, CANCEL1+13 |
| CHK | NEWEWL+76!, ENRCHK+1*, ENRCHK+2 |
| CIFN | CANCEL1+2~, CANCEL1+7*, CANCEL1+11, CANCEL1+14, CANCEL1+15, CANCEL1+16, CANCEL1+22 |
| DFN | CANCEL~, CANCEL+3, CANCEL1~, CANCEL1+4, CANCEL1+6, CANCEL1+11, CANCEL1+13, CANCEL1+16, CANCEL1+19, CANCEL1+22 , CHKCAN~, CHKCAN+4, CHKCAN+6, CHKCAN+11, CHKCAN+19, CHKSPC~, CHKSPC+8, CHKSPC+11, NEWEWL+8*!, NEWEWL+76! |
| DUZ | CANCEL1+13, CANCEL1+20 |
| ERR | CANCEL1+1~, CANCEL1+13, NEWEWL+20, NEWEWL+23*, NEWEWL+24*, NEWEWL+26*, NEWEWL+27, NEWEWL+30*, NEWEWL+31, NEWEWL+34* , NEWEWL+35, NEWEWL+38*, NEWEWL+39, NEWEWL+42*, NEWEWL+43, NEWEWL+46*, NEWEWL+49*, NEWEWL+50, NEWEWL+53*, NEWEWL+54 , NEWEWL+58*, NEWEWL+59, NEWEWL+63*, NEWEWL+65*, NEWEWL+68, NEWEWL+70!*, NEWEWL+71*, NEWEWL+72!, NEWEWL+76!, ENRCHK+2* , REQBY+1*, REQBY+2*, REQBY+5*, REQBY+7*, REQBY+9* |
| IEN | NEWEWL+23~*, NEWEWL+24, NEWEWL+26, NEWEWL+76! |
| IND | CHKSPC+4~, CHKSPC+15*, CHKSPC+16*, CHKSPC+17 |
| JX | NEWEWL+24~* |
| ODT | CANCEL1+1~, CANCEL1+8*, CANCEL1+13 |
| OIFN | CANCEL1+1~, CANCEL1+14* |
| OUSR | CANCEL1+1~, CANCEL1+8*, CANCEL1+13 |
| PTR | NEWEWL+63*, NEWEWL+65, NEWEWL+76! |
| R1 | CHKSPC+11! |
| REQBY | NEWEWL+76!, REQBY+1*, REQBY+2, REQBY+3, REQBY+5, REQBY+7, REQBY+8 |
| RESULT | CANCEL+2~, CANCEL+3, NEWEWL+73~ |
| RESULT(0 | CANCEL+5 |
| RET | CHKCAN+2~, CHKCAN+14, CHKCAN+15 |
| RET("CLN" | CHKCAN+16 |
| RETURN | CANCEL1~, CANCEL1+3*, CANCEL1+4, CANCEL1+15, CANCEL1+23*, CANCEL1+24, CHKCAN~, CHKCAN+3*, CHKCAN+4*, CHKCAN+8* , CHKCAN+9, CHKCAN+11*, CHKCAN+12, CHKCAN+15*, CHKCAN+17, CHKCAN+19*, CHKCAN+20, CHKCAN+23*, CHKCAN+25, CHKSPC~ , CHKSPC+5*, CHKSPC+16, CHKSPC+17*, CHKSPC+19*, CHKSPC+20 |
| RMK | CANCEL~, CANCEL+3, CANCEL1~, CANCEL1+13, CANCEL1+15, CANCEL1+20 |
| RSN | CANCEL~, CANCEL+3, CANCEL1~, CANCEL1+13, CANCEL1+20 |
| RV | CANCEL~, CANCEL+5*, NEWEWL~, NEWEWL+74* |
| RV(0 | NEWEWL+2*, NEWEWL+4*, NEWEWL+5*, NEWEWL+7*, NEWEWL+8*, NEWEWL+10*, NEWEWL+11*, NEWEWL+13*, NEWEWL+16*, NEWEWL+17* , NEWEWL+24*, NEWEWL+26*, NEWEWL+30*, NEWEWL+34*, NEWEWL+37*, NEWEWL+38*, NEWEWL+42*, NEWEWL+45*, NEWEWL+49*, NEWEWL+53* , NEWEWL+58*, NEWEWL+63*, NEWEWL+65*, NEWEWL+72*, NEWEWL+75*, ENRCHK+2*, REQBY+2*, REQBY+5*, REQBY+7*, REQBY+9* |
| SC | CANCEL~, CANCEL+3, CANCEL1~, CANCEL1+4, CANCEL1+6, CANCEL1+11, CANCEL1+14, CANCEL1+15, CANCEL1+16, CANCEL1+19 , CANCEL1+22, CHKCAN~, CHKCAN+14 |
| SD | CANCEL~, CANCEL+3, CANCEL1~, CANCEL1+4, CANCEL1+6, CANCEL1+11, CANCEL1+13, CANCEL1+14, CANCEL1+15, CANCEL1+16 , CANCEL1+19, CANCEL1+22, CHKCAN~, CHKCAN+4, CHKCAN+6, CHKCAN+8, CHKCAN+11, CHKCAN+19, CHKSPC~, CHKSPC+8 , CHKSPC+11 |
| SDATA | CANCEL1+9~, CANCEL1+11, CANCEL1+22 |
| SDCPHDL | CANCEL1+9~, CANCEL1+10*, CANCEL1+11, CANCEL1+22 |
| SDECAPPT | CANCEL1+18~, CANCEL1+19*, CANCEL1+20 |
| SDWLD | NEWEWL~, NEWEWL+2, NEWEWL+3, NEWEWL+6, NEWEWL+9, NEWEWL+12, NEWEWL+15, NEWEWL+18, NEWEWL+21, NEWEWL+28 , NEWEWL+32, NEWEWL+36, NEWEWL+40, NEWEWL+44, NEWEWL+47, NEWEWL+51, NEWEWL+55, NEWEWL+60, NEWEWL+73 |
| SDWLD("CHDCLINP" | NEWEWL+60*, NEWEWL+61, NEWEWL+63 |
| SDWLD("CMNTS" | NEWEWL+40*, NEWEWL+41, NEWEWL+42 |
| SDWLD("DSRDDT" | NEWEWL+36*, NEWEWL+37, NEWEWL+38 |
| SDWLD("ENRDF" | NEWEWL+51*, NEWEWL+52, NEWEWL+53 |
| SDWLD("ENRDU" | NEWEWL+47*, NEWEWL+48, NEWEWL+49 |
| SDWLD("ENRSTAT" | NEWEWL+44*, NEWEWL+45, ENRCHK+1 |
| SDWLD("INSTITUTION" | NEWEWL+9*, NEWEWL+10, NEWEWL+11 |
| SDWLD("PATIENT" | NEWEWL+6*, NEWEWL+7, NEWEWL+8, NEWEWL+65 |
| SDWLD("PRIORITY" | NEWEWL+15*, NEWEWL+16, NEWEWL+17 |
| SDWLD("PROVIDER" | NEWEWL+21*, NEWEWL+22, NEWEWL+23 |
| SDWLD("REQBY" | NEWEWL+18*, NEWEWL+71, REQBY+1 |
| SDWLD("SCPRCNT" | NEWEWL+28*, NEWEWL+29, NEWEWL+30 |
| SDWLD("SCPRIORITY" | NEWEWL+32*, NEWEWL+33, NEWEWL+34 |
| SDWLD("TICKLER" | NEWEWL+55*, NEWEWL+56, NEWEWL+57*, NEWEWL+58 |
| SDWLD("WAITFOR" | NEWEWL+12*, NEWEWL+13 |
| SDWLD("WLTYPE" | NEWEWL+3*, NEWEWL+4, NEWEWL+5, NEWEWL+69, REQBY+1 |
| SITE | NEWEWL+11~* |
| STAT | CHKCAN+19, CHKSPC+4~, CHKSPC+13, CHKSPC+14 |
| STATS | CHKSPC+4~, CHKSPC+14 |
| STATS( | CHKSPC+16, CHKSPC+17 |
| STATUS | CANCEL+2~, CANCEL+3*, CHKSPC+4~, CHKSPC+11*, CHKSPC+17, NEWEWL+73~*, NEWEWL+74, NEWEWL+75 |
| TXT | CHKCAN+2~, CHKCAN+17, CHKCAN+20 |
| TXT(1 | CHKCAN+16* |
| TXT(2 | CHKCAN+16* |
| TYP | CANCEL1~, CANCEL1+13, CANCEL1+15 |
| TYPE | CANCEL~, CANCEL+3, NEWEWL+76!, REQBY+1*, REQBY+4, REQBY+6, REQBY+9 |
| X | NEWEWL+11*, NEWEWL+38*, NEWEWL+49*, NEWEWL+76! |
| Y | NEWEWL+1~, NEWEWL+38, NEWEWL+49 |
