Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: SDECV

Package: Scheduling

Routine: SDECV


Information

SDECV ;ALB/SAT - VISTA SCHEDULING RPCS ;JAN 15, 2016

Source Information

Source file <SDECV.m>

Entry Points

Name Comments DBIA/ICR reference
CHKIN(BSDEVT,BSDCLN,BSDDT,APTN,DFN,BSDVSTN) ;EP; -- ask visit related check-in questions
; called by Scheduling Event driver
; user interface for 2 questions (clinic code and provider)
; Input variables:
; BSDEVT = type of event (4=checkin)
; BSDCLN = clinic ien
; BSDDT = appt date/time
; APTN = ien for appt under date multiple
; DFN = patient ien
VISIT(BSDCLN,BSDDT,APTN,DFN,BSDCC,BSDPROV,BSDOPT,BSDMSG,BSDVSTN,SDECC) ;EP; -- create visit
VSTEND
PP(VSTN,PROV) ;
VDATE(BSDEVT,BSDCLN,BSDDT,APTN,DFN,BSDCKO,BSDMSG) ;EP
RDT(X) ; -- reverse date
CLNCODE(CLINIC) ; -- asks user for clinic code
PROV(CLINIC) ; - asks user for visit provider
PRVIEN(Y) ; -- determines correct provider file to use
MSGADD(ERROR,STRING) ; -- put message string into array
MSG(DATA,PRE,POST) ; -- writes line to device
FAC(CLINIC) ; -- return facility location ien for clinic
; try institution field in file 44, then institution based on division
; then try user's division and make sure it is a PCC site
SERCAT(CLINIC,PAT) ;EP; -- returns service category for visit
VSTUPD(BSDCLN,BSDDT,APTN,DFN,BSDMSG) ; interactive updating of visit data during check-in edit
; if check in time different, update visit if there is one
PROVUPD ; will update provider on visit that was created earlier
HOSLUPD ; update hospital location on visit
SETVAR ; sets basic variables needed by API call
EN1 ;CLEANUP
EN2 ;CLEANUP

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^DIC(40.7 - [#40.7] GET1^DIQ
^DG(40.8 - [#40.8] GET1^DIQ
^SC - [#44] GET1^DIQ
^AUPNVSIT - [#9000010] Classic Fileman Calls
^AUPNVPRV - [#9000010.06] GET1^DIQ
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call