SDEC ;ALB/SAT,PC,LAB - VISTA SCHEDULING RPCS ;Jul 15, 2021@10:40
Source file <SDEC.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ACCGROUP(SDECY) | ;EP return active entries from the SDEC ACCESS GROUP file 409.822
 | 
|
| ACCGPTYG(SDECY) | ;EP Get access group types
 | 
|
| ACCTYPE(SDECY) | ;EP return active entries from the SDEC ACCESS TYPE file 409.823
 | 
|
| ADDACCG(SDECY,SDECVAL) | ;EP ADD/EDIT ACCESS GROUP
 | 
|
| ADDACCTY(SDECY,SDECVAL) | ;EP ADD/EDIT ACCESS TYPE
 | 
|
| ADDAGI(SDECY,SDECIEN,SDECIEN1) | ;EP Add access group item - Adds ACCESS GROUP TYPE file entry
 | 
|
| ADDRES(SDECY,SDECVAL) | ;EP ADD/EDIT RESOURCE
 | 
|
| ADDRESU(SDECY,SDECVAL) | ;EP ADD/EDIT RESOURCE USER
 | 
|
| ADDRG(SDECY,SDECVAL) | ;EP ADD/EDIT RESOURCE GROUP
 | 
|
| ADDRGI(SDECY,SDECIEN,SDECIEN1) | ;EP Adds RESOURCEID SDECIEN1 to RESOURCE GROUP entry SDECIEN
 | 
|
| APBLKOV(SDECY,SDECSTART,SDECEND,SDECRES,SDECWI) | ;EP APPT BLOCKS OVERLAP
 | 
|
| APPADD | ;EP ADD NEW APPOINTMENT
 | 
|
| APPDEL(SDECY,S1,S2,S3,S4,S5,S6,S7,S8,S9,S10,S11) | ;EP Cancels appointment *745,756
 | 
|
| APPIDGET(SDECY,SDID) | ;GET SDEC APPOINTMENT ien for given External ID
 | 
|
| APPSDGET(SDECY,MAXREC,LASTSUB,SDBEG,SDEND,NOTEFLG,SDRES,DFN,SDID,SDIEN) | ;GET appointment data from SDEC APPOINTMENT file 409.84
 | 
|
| APPSLOTS(SDECY,SDCL,SDBEG,SDEND) | ;return array of appt slots and availability - RPC
 | 
|
| APPTLETR(SDECY,SDECAPID,LT) | ;EP Print Appointment Letter
 | 
|
| APPTYPES(RET,DFN) | ; EP for SDEC APPTYPES - Return all active Appointment types from the APPOINTMENT TYPE file 409.1
 | 
|
| ARCLOSE(RET,S1,S2,S3,S4,S5) | ;Appt Request close
 | 
|
| ARCLOSE1(RET,INP) | ; Appt Request CLOSE (without ... for VistA calls) ;
 | 
|
| ARDGET(SDECY) | ;get values for disposition field of SDEC APPT REQUEST file
 | 
|
| ARGET(RET,ARIEN1,MAXREC,SDBEG,SDEND,DFN,LASTSUB,SDTOP,SVCL,DESDT,PRL,SVCR,SCVISIT,CLINIC,ORIGDT) | ;EP Appt Request GET
 | 
|
| ARMRTGET(SDECY,ARIEN) | ;GET number of entries and values in MRTC CALC PREF DATES
 | 
|
| ARMRTSET(SDECY,ARIEN,MRTC) | ;SET MRTC CALC PREF DATES dates - clears the multiple and sets the new ones that are passed in
 | 
|
| AROPEN(RET,ARAPP,ARIEN,ARDDT) | ;Appt Request Open/re-open
 | 
|
| ARPCSET(SDECY,INP,ARIEN) | ;SET update patient contacts in SDEC APPT REQUEST file
 | 
|
| ARSET(RET,S1,S2,S3,S4,S5,S6,S7,S8,S9,S10,S11,S12,S13,S14,S15,S16,S17,S18,S19,S20,S21,S22,S23,S24,S25,S26,S27,S28,S29) | ;EP Appt Request Set ;
 | 
|
| ARSET1(RET,INP) | ;EP Appt Request Set (without ... for VistA calls)
 | 
|
| AVADD(SDECY,SDECSTART,SDECEND,SDECTYPID,SDECRES,SDECSLOTS,SDECNOTE) | ;EP SET Create entry in SDEC ACCESS BLOCK
 | 
|
| AVDEL(SDECY,SDECAVID) | ;EP Cancel Availability - Deletes Access Block
 | 
|
| AVDELDT(SDECY,SDECRESD,SDECSTART,SDECEND) | ;EP Cancel availability in a date range
 | 
|
| BOOKHLDY(SDECY,SDECCL) | ; Returns can book on holiday flag for a clinic. 12/1/17 wtc 679
 | 
|
| CANCKOUT(SDECY,SDECAPTID) | ;EP Cancel Check Out appointment
 | 
|
| CANREAS(SDECY,SDECIN) | ;EP return active/inactive entries from the CANCELLATION REASONS table 409.2
 | 
|
| CAP(SDECY,DFN,SDAMEVT,SDT,DVBADA,SDAUTORB,SDCANVET) | ;
 | 
|
| CGET(SDECY) | ;GET active Countries from the COUNTRY CODE file 779.004
 | 
|
| CHECKIN(SDECY,SDECAPTID,SDECCDT,SDECCC,SDECPRV,SDECROU,SDECVCL,SDECVFM,SDECOG,SDECCR,SDECPCC,SDECWHF) | ;EP Check in appointment
 | 
|
| CHECKOUT(SDECY,DFN,SDT,SDCODT,SDECAPTID,VPRV) | ;EP Check Out appointment
 | 
|
| CLINALL(RET,MAXREC,SDECP) | ; EP Return the IEN and NAME for all entries in the SD WL CLINIC LOCATION file
 | 
|
| CLINDIS(SDECY,SDECCLST,SDECBEG,SDECEND,SDECWI) | ;EP Return formatted text output of the Clinic Schedules Report
 | 
|
| CLINDISW(SDECY,SDECCLST,SDECBEG,SDECEND) | ;EP Return formatted text output of the Clinic Schedules Report for Walkins
 | 
|
| CLINLET(SDECY,SDECCLST,SDECBEG,SDECEND,SDECWI) | ;EP CLINIC LETTERS Appointment data
 | 
|
| CLINLETW(SDECY,SDECCLST,SDECBEG,SDECEND) | ;EP CLINIC LETTERS WALK-IN Appointment data for Walk-in Appointments only
 | 
|
| CLINPROV(SDECY,SDECCL) | ;EP return all providers for a given clinic from the HOSPITAL LOCATION file 44
 | 
|
| CLINSET(SDECY,SDNOSLOT,SDIENS,SDECP,SDNOLET,MAXREC) | ;EP Returns CLINIC SETUP PARAMETERS for clinics that are active in the HOSPITAL LOCATION file
 | 
|
| CLINSTOP(SDECY,SDP) | ;EP CLINIC STOP remote procedure
 | 
|
| COPYAPPT(SDECY,SDECRES,SDEC44,SDECBEG,SDECEND) | ;EP Copy appointments from HOSPITAL LOCATION to SDEC RESOURCE
 | 
|
| CPCANC(SDECY,SDECTSK) | ;EP Copy Appointment Cancel
 | 
|
| CPSTAT(SDECY,SDECTSK) | ;EP Copy Appointment Status
 | 
|
| CRSCHED(SDECY,SDECRES,SDECSTART,SDECEND,SDECWKIN,MAXREC,LASTSUB) | ;EP Create Resource Appointment Schedule ;alb/sat 672
 | 
|
| CSLOTSCH(SDECY,SDECRES,SDECSTART,SDECEND,SDECTYPES,SDECSRCH) | ;GET Create Assigned Slot Schedule
 | 
|
| CURFACG(SDECY,SDECDUZ) | ;EP get current division/facility for given user
 | 
|
| CVARAPPT(SDECY,SDCL) | ;EP IS Clinic Variable Appointment Length
 | 
|
| DELAG(SDECY,SDECGRP) | ;EP Deletes entry having IEN SDECGRP from SDEC ACCESS GROUP file
 | 
|
| DELAGI(SDECY,SDECIEN,SDECIEN1) | ;EP Deletes entry having Access Group SDECIEN and Access Type SDECIEN1 the SDEC ACCESS GROUP TYPE file
 | 
|
| DELRESGP(SDECY,SDECGRP) | ;EP Deletes entry name SDECGRP from SDEC RESOURCE GROUP file
 | 
|
| DELRGI(SDECY,SDECIEN,SDECIEN1) | ;EP Deletes entry SDECIEN1 from entry SDECIEN in the SDEC RESOURCE GROUP file
 | 
|
| DELRU(SDECY,SDECIEN) | ;EP Delete Resource User from SDEC RESOURCE USER file
 | 
|
| EDITAPPT(SDECY,SDECAPTID,SDECNOTE,SDECLEN) | ;EP Edit appointment (only 'note text' and appointment length can be edited)
 | 
|
| EHRPT(SDECY,SDECWID,SDECDFN) | ;EP Raise patient selection event to EHR
 | 
|
| ETHGET(SDECY) | ;GET active Ethnicities from the ETHNICITY file 10.2
 | 
|
| ETHCMGET(SDECY) | ;GET values from the RACE AND ETHNICITY COLLECTION METHOD file 10.3
 | 
|
| FACLIST(SDECY,DFN) | ; Return list of remote facilities for patient
 | 
|
| FAPPTGET(SDECY,DFN,SDBEG,SDEND,SDANC) | ;GET Future appointments for given patient and date range
 | 
|
| GETFAC(SDECY,SDECDUZ) | ;EP Gets all facilities for a user
 | 
|
| GETONE(SDECY,SDGMR) | ;EP Return data on one consult
 | 
|
| GETREGA(SDECRET,DFN) | ;EP return basic reg info/demographics for given patient
 | 
|
| GETSITES(SDECY) | ;return active National VA site names and station numbers
 | 
|
| GETVPRV(BGOY,VPRV) | ;EP return data from the V PROVIDER file
 | 
|
| HIDE(SDECY) | ;Return clinics hidden from display
 | 
|
| HOLIDAY(SDECY,SDECBD) | ;EP return all entries from the HOLIDAY file 40.5
 | 
|
| HOSPLOC(SDECY,SDECP,MAXREC,LSUB) | ;EP return HOSPITAL LOCATIONs
 | 
|
| IMHERE(SDECRES) | ;
 | 
|
| NETLOC(SDECY,LOCATION) | ;GET data from the NETWORK LOCATION file 2005.2
 | 
|
| NEWPERS(SDECY,SDCLASS,SDPART,MAXREC,LSUB,INACT) | ;return entries from the USR CLASS MEMBERSHIP file that have the given USR CLASS (default is PROVIDER)
 | 
|
| NOSHOPAT(SDECY,DFN,SDCL) | ;EP COLLECT NO-SHOW DATA for Patient
 | 
|
| NOSHOW(SDECY,SDECAPTID,SDECNS,USERIEN,SDECDATE) | ;EP Sets appointment noshow flag in SDEC APPOINTMENT file
 | 
|
| OVBOOK(SDECY,SDCL,SDBEG,SDECRES) | ;EP RPC - OVERBOOK - CHECK FOR OVERBOOK FOR GIVEN CLINIC, DATE, AND RESOURCE
 | 
|
| PATAPPTD(SDECY,DFN) | ;EP Return the Patient appointment display
 | 
|
| PATAPPTH(SDECY,DFN) | ;EP return patient's appointment history for given patient - RPC
 | 
|
| PCSGET(SDECY,SDSVSP) | ;GET clinics for a service/specialty (clinic stop)
 | 
|
| PCSTGET(SDECY,DFN,SDCL,SDBEG,SDEND) | ;GET patient clinic status for a clinic for a given time frame - has the patient been seen by the given Clinic in the past 24 months
 | 
|
| PCST2GET(SDECY,DFN,STOP,SDBEG,SDEND) | ;GET patient clinic status for a service/specialty (clinic stop) for a given time frame - has the patient been seen any clinics with the given service/specialty (clinic stop) in the past 24 months
 | 
|
| PREFGET(SDECY,DFN,INAC) | ;EP Get values from SDEC PREFERENCES AND SPECIAL NEEDS file for given patient
 | 
|
| PREFGETV(SDECY) | ;EP Get all valid PREFERENCE text from SDEC PREFERENCES AND SPECIAL NEEDS file
 | 
|
| PREFSET(SDECY,DFN,PREF,REMARK) | ;EP Set values to SDEC PREFERENCES AND SPECIAL NEEDS file ;alb/sat 658 add REMARK
 | 
|
| PRIV(SDECY,CLINIEN,USER) | ;IS this USER in the PRIVILEGED USER multiple for the clinic
 | 
|
| PROVALL(SDECY,SDECCL) | ;EP return all providers for a given clinic from the HOSPITAL LOCATION file 44
 | 
|
| PROVCLIN(SDECY,SDECPRV) | ;EP PROVIDER CLINICS remote procedure
 | 
|
| PTINQ(SDECY,DFN) | ;GET output from ORWPT PTINQ in DataTable format
 | 
|
| PTLOOKRS(SDECY,SDECP,SDECC,LASTSUB) | ;EP Patient Lookup
 | 
|
| PTSET(SDECY,S1,S2,S3,S4,S5,S6,S7,S8,S9,S10,S11,S12,S13,S14,S15,S16,S17,S18,S19,S20,S21,S22,S23,S24,S25,S26,S27,S28,S29,S30,S31,S32) | ;SET patient demographics
 | 
|
| PTSET1(SDECY,INP) | ;SET patient demographics (call from debug)
 | 
|
| RACEGET(SDECY) | ;GET active Race entries from the RACE file 10
 | 
|
| RAISEVNT(SDECY,SDECEVENT,SDECPARAM,SDECSIP,SDECSPT) | ;EP RAISE EVENT
 | 
|
| REBKLIST(SDECY,SDECLIST) | ;EP patient appointments used in listing REBOOKED appointments for a list of appointmentIDs.
 | 
|
| REBKNEXT(SDECY,SDECDATE,SDECRES,SDECTPID) | ;EP find the next ACCESS BLOCK in resource SDECRES after SDECSTART
 | 
|
| RECIEN(SDECY,RECIEN) | ;GET RECALL REMINDERS for given ID
 | 
|
| RECGET(SDECY,DFN,SDBEG,SDEND,MAXREC,LASTSUB,RECIEN,SDSTOP,SDFLAGS,SDCLL) | ; GET entries from the RECALL REMINDERS file 403.5 for a given Patient and Recall Date range. ;alb/sat 658 add SDCLL
 | 
|
| RECSET(SDECY,S1,S2,S3,S4,S5,S6,S7,S8,S9,S10,S11,S12,S13,S14,S15) | ; SET/EDIT/CANCEL/DELETE an entry to the RECALL REMINDERS file 403.5
 | 
|
| RECSET1(SDECY,INP) | ; SET/EDIT/CANCEL/DELETE an entry to the RECALL REMINDERS file 403.5
 | 
|
| RECDSET(SDECY,RECALLIEN,SDRRFTR,SDCOMM) | ; DELETE an entry to the RECALL REMINDERS file 403.5
 | 
|
| RECAPGET(SDECY) | ; GET entries from the RECALL REMINDERS APPT TYPE file 403.51
 | 
|
| RECPRGET(SDECY,RECINACT,SDECP,MAXREC,LASTSUB) | ;GET entries from the RECALL REMINDERS PROVIDERS file 403.54
 | 
|
| REGEVENT(SDECY,SDECEVENT,SDECIP,SDECPORT) | ;EP Called by client to inform server of client's interest in SDECEVENT
 | 
|
| REP1GET(SDECY,MAXREC,LASTSUB,PNAME) | ;GET clinic data for report
 | 
|
| REQGET(SDECY,SDBEG,SDEND,MAXREC,LASTSUB,SDGMR) | ; GET entries with an ACTIVITY of RECEIVED, but do not have an ACTIVITY of SCHEDULED from the REQUEST/CONSULTATING file 123
 | 
|
| RESGPUSR(SDECY,SDECDUZ) | ;EP GROUP RESOURCE
 | 
|
| RESGRPUS(SDECY,SDECDUZ) | ;EP return ACTIVE resource group names for the given user
 | 
|
| RESLETRF(SDECY,SDECRES,SDECLT) | ;EP Return formatted text output of the Resource's Letter - either "LETTER TEXT" (also used as Reminder Letter), NO SHOW LETTER, or CLINIC CANCELLATION LETTER.
 | 
|
| RESLETRS(SDECY,SDECLIST,SDLTR,SDNOS,SDCAN) | ;EP GET recordset of RESOURCES and associated LETTERS
 | 
|
| RESUSER(SDECY,SDRES) | ;EP SDEC RESOURCE USER remote procedure returns all entries from the SDEC RESOURCE USER table 409.833
 | 
|
| RESOURCE(SDECY,SDECDUZ,SDACT,SDTYPE,MAXREC,LASTSUBI,SDIEN,SDECP) | ;EP Returns ADO Recordset with ALL RESOURCE names
 | 
|
| SCHUSR(SDECY) | ;EP Return recordset of all users in NEW PERSON having SDECZMENU key
 | 
|
| SEARCHAV(SDECY,SDECRES,SDECSTRT,SDECEND,SDECTYPES,SDECAMPM,SDECWKDY) | ;EP Searches availability database
 | 
|
| SETFAC(SDECY,SDECDUZ,SDECFAC) | ;EP SET FACILITY
 | 
|
| SETRBOOK(SDECY,SDECAPPT,SDECDATE) | ;EP Sets rebook date into appointment
 | 
|
| SPACEBAR(SDECY,SDECDIC,SDECVAL) | ;EP Update ^DISV with most recent lookup value SDECVAL from file SDECDIC
 | 
|
| SUMMGET2(SDECRET,SDBEG,SDEND,USER) | ;Get compiled Audit Report for a given date range
 | 
|
| SUMMAGET(SDECY,SDBEG,SDEND,USER,LSUB,MAXREC) | ;get ALL appointments with a cancel status from SDEC APPOINTMENT for given date range and user
 | 
|
| SUSRINFO(SDECY,SDECDUZ,GUIVERS) | ;EP SCHEDULING USER INFO
 ; Added GUI version to parameters to prevent users from using old versions. SD*5.3*694 wtc 8/27/2018  | 
|
| SVSPALL(RET) | ; EP return IEN and NAME for all entries in the SD WL SERVICE/SPECIALTY file
 | 
|
| SYSSTAT(SDECY) | ; EP SYSTEM STATUS
 | 
|
| TPBLKOV(SDECY,SDECSTART,SDECEND,SDECRES) | ;EP TYPE BLOCKS OVERLAP
 | 
|
| UNREGEV(SDECY,SDECEVENT,SDECIP,SDECPORT) | ;EP rpc SDE UNREGEV Called by client to Unregister client's interest in SDECEVENT
 | 
|
| WAITLIST(SDECY,SDECRES) | ;EP COLLECT WAITLIST DATA
 | 
|
| WLCLOSE(RET,SD1,SD2,SD3,SD4) | ; Waitlist CLOSE
 | 
|
| WLCLOSE1(RET,INP) | ; Waitlist CLOSE (without ... for VistA calls)
 | 
|
| WLGET(RET,WLIEN1,MAXREC,SDBEG,SDEND,DFN,LASTSUB,SDTOP,SVCL,DESDT,PRI,SVCR,SCVISIT,CLINIC,ORIGDT) | ;EP Waitlist GET ;alb/sat 658 add SVCL-SCVISIT
 | 
|
| WLHIDE(SDECY,DFN,WLCL) | ;GET wait list entries in which the associated clinic's 'HIDE FROM DISPLAY?' field is 'YES'
 | 
|
| WLOPEN(RET,WLAPP,WLIEN,WLDDT) | ;SET Waitlist Open/re-open
 | 
|
| WLPCSET(SDECY,INP,WLIEN) | ;SET update patient contacts in SD WAIT LIST file
 | 
|
| WLSET(RET,S1,S2,S3,S4,S5,S6,S7,S8,S9,S10,S11,S12,S13,S14,S15,S16,S17,S18,S19,S20,S21,S22,S23,S24,S25,S26,SD27) | ;EP Waitlist Set
 | 
|
| WLSET1(RET,INP) | ;EP Waitlist Set (without ... for VistA calls)
 | 
|
| BLDARR(ARR,TAG) | ;array build *745
 |