Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^SC

Package: Scheduling

Global: ^SC


Information

FileMan FileNo FileMan Filename Package
44 HOSPITAL LOCATION Scheduling

Description

Directly Accessed By Routines, Total: 1154

Package Total Routines
Scheduling 358 ASSOCIATED LOCATION TYPES    PATIENT    PATTERN    PROVIDER    SCAPMC18    SCAPMC30    SCCVCST5    SCCVEAE1
SCDXFU11    SCDXPRN2    SCDXSUP    SCDXSUP1    SCDXUTL2    SCENI0    SCENI01    SCMCDD
SCMCDD1    SCMCEV1    SCMCEV3    SCMCMU    SCMCPT6    SCMCTPU    SCMSP66    SCMSPX1
SCMSPX2    SCMSVUT2    SCRPI01    SCRPI02    SCRPO1    SCRPPAT2    SCRPRAC2    SCRPW10
SCRPW11    SCRPW15    SCRPW16    SCRPW18    SCRPW41    SCRPW47    SCRPW51    SCRPW54
SCRPW56    SCRPW57    SCRPW58    SCRPW59    SCRPW61    SCRPW63    SD132PT    SD53103A
SD53120A    SD53430P    SD5384PT    SD53P377    SD53P544    SD53P567    SD599PT    SDAL0
SDAMCCKL    SDAMEVT    SDAMICD    SDAMOC    SDAMOCP    SDAMOCP1    SDAMODO2    SDAMOS
SDAMQ3    SDAPI    SDAPIAP    SDAPP    SDAUT1    SDAUT2    SDB    SDB0
SDB1    SDBT    SDBT2    SDBT3    SDBT5    SDC    SDC1    SDCAN
SDCCP    SDCLAS    SDCLAV    SDCLAV0    SDCLAV1    SDCLDOW    SDCNL    SDCNP1A
SDCO1    SDCO31    SDCO41    SDCO7    SDCOU    SDCOU2    SDCWL2    SDCWL3
SDD    SDD0    SDDSO    SDEC01    SDEC02    SDEC04    SDEC07    SDEC07B
SDEC08    SDEC25    SDEC26    SDEC27    SDEC29    SDEC40    SDEC45    SDEC48
SDEC52A    SDEC665    SDECAPI    SDECCON    SDECDEV    SDECINI2    SDECINIT    SDECRT
SDECRT0    SDECRT1    SDECU2    SDECUTL1    SDECUTL2    SDECV    SDECWL    SDECWL3
SDECXML2    SDECXUTL    SDF    SDF1    SDM    SDM4    SDMANA    SDMHAD1
SDMHNS1    SDMHPRO1    SDMM    SDMULT    SDMULT0    SDMULT1    SDN    SDN0
SDN1    SDNACT1    SDNDIS    SDNEXT    SDNOS    SDNOS1A    SDOQMP0    SDOQMP1
SDPFSS    SDPMUT1    SDPMUT2    SDPURG1    SDROUT    SDROUT0    SDROUT1    SDROUT2
SDRRISRU    SDRRUTL    SDSCEDT    SDSCRP    SDSTAT    SDUNC    SDUTL1    SDUTL2
SDVSIT0    SDWARD    SDWLD    SDWLRP2    ^SCE    ^SCTM(404.52    ^SDAM(44.3    AVAILABILITY
DIAGNOSIS    SCAPMC26    SCAPMC27    SCAPMC28    SCAPMC9    SCCVEAE3    SCCVEAP    SCCVEAP1
SCCVEAP2    SCCVEAP3    SCCVEDI1    SCCVLOG1    SCDXHLDR    SCDXMSG2    SCDXUAPI    SCDXUTL
SCENIA0    SCENIA2    SCMCMU1    SCMCMU11    SCMCMU4    SCMCQK1    SCMCQK2    SCMCTSK2
SCMCTSK3    SCMCTSK6    SCMCYPC    SCMSP    SCMSVDG1    SCRPBK1    SCRPBK4    SCRPW1
SCRPW24    SCRPW27    SCRPW28    SCRPW3    SCRPW301    SCRPW6    SCRPW7    SCRPW70
SCRPW71    SCRPW72    SCRPW73    SCRPW76    SCRPW77    SCRPW78    SCRPW8    SCRPW9
SD44AUDI    SD53167P    SD5357PT    SD5371PT    SD53P317    SDAL    SDAM1    SDAM2
SDAM3    SDAMA200    SDAMA203    SDAMA300    SDAMA302    SDAMA303    SDAMA304    SDAMA305
SDAMA307    SDAMA308    SDAMBMR    SDAMBMR1    SDAMBMR3    SDAMC    SDAMEP    SDAMEP1
SDAMEX    SDAMN    SDAMOL1    SDAMOW1    SDAMOWB    SDAMU    SDAMWI    SDAMWI1
SDASO    SDBT1    SDBT4    SDC0    SDC2    SDC3    SDC4    SDCD
SDCED    SDCED1    SDCED2    SDCI    SDCIAL    SDCLAS0    SDCLAS1    SDCLK
SDCNP0    SDCNP1    SDCNP2    SDCNSLT    SDCO    SDCP    SDCWL    SDDPA
SDEC01A    SDEC01B    SDEC07A    SDEC12    SDEC25A    SDEC25B    SDEC31    SDEC32
SDEC37    SDEC38    SDEC50    SDEC56    SDEC57    SDEC57A    SDEC658    SDECAR2
SDECAR3    SDECCAP    SDECELG    SDECEPT    SDECINI1    SDECLOC    SDECRMG    SDECSTP
SDECUT1A    SDECUTL    SDECXML    SDL1    SDLT    SDM0    SDM1    SDM1A
SDM2    SDM2A    SDM3    SDMEAN    SDMHAD    SDMHAP    SDMM1    SDNACT
SDNOS0    SDNP    SDOEOE    SDOQMP    SDOQMP2    SDOQMPR    SDPBP    SDPCE2
SDPFSS2    SDPHARM1    SDPPADD1    SDPPAPP1    SDPPENR1    SDREACT    SDRFC    SDRPA05
SDRPA07    SDRPA08    SDRRPXC    SDRRUTL1    SDSCCHK    SDSCE    SDSCUTL    SDST
SDUTL    SDVSIT    SDWLBACC    SDWLPE    SDWLRPT1    SDWLTR    SDWU    ^SDEC(409.85
SDYCENR    TEAM POSITIONS    ^SC    ^SD(403.5    ^SD(409.77    ^SDEC(409.86    
Order Entry Results Reporting 91 OCXOZ02    OCXOZ03    OCXOZ05    OCXOZ07    OCXOZ0B    OCXOZ0E    OCXOZ0F    OR3C100
ORAMSET    ORAMTTR    ORAMX    ORB31    ORB3FN    ORB3USER    ORCACT0    ORCDLR1
ORCDRA1    ORCDSD    ORCDVBEC    ORCHART    ORCMENU1    ORCSAVE2    ORCSEND1    ORCSEND3
ORCSIGN    ORDV06B    OREVNT    OREVNT1    ORIMO    ORKUTL    ORLA1    ORLP01
ORLPSR    ORM    ORMBLDSD    ORMBLDVB    ORMEVNT    ORMEVNT1    ORMHLREC    ORPR03
ORPRPM1    ORPRS05    ORPRS06    ORPRS08    ORPRS12    ORQ11    ORQ2    ORQOAUIB
ORQPT    ORQPT1    ORQPTQ2    ORQPTQ5    ORQQPL1    ORQQPL3    ORQQVI1    ORQQVI2
ORRHCQ    ORS100    ORSRCHOR    ORTSKLPS    ORU1    ORUDPA    ORUHDR    ORUTL
ORUTL1    ORWCV    ORWDFH    ORWDPS2    ORWDPS32    ORWDRA32    ORWDSD1    ORWDX1
ORWDXA    ORWDXM1    ORWDXVB    ORWDXVB1    ORWDXVB2    ORWLR1    ORWLR3    ORWORR
ORWPCE    ORWPCE1    ORWPCE3    ORWPS    ORWPT    ORWPT16    ORWU    ORWU16
^ORD(100.22    ORWTPT    ORWU1    
Radiology Nuclear Medicine 61 RA CLINIC BY PRINT DATE    RA EXAM ROOM LIST    RA IMAGE LOC LIST    RAACIPST    RABUL    RACDR    RACTRG2    RADEM1
RADLQ1    RADLY    RADLY1    RAEDCN    RAEDCN1    RAESR    RAHLQ1    RAHLR
RAHLRPT    RALIST    RAO7NEW    RAO7PC1    RAO7PC1A    RAO7RON    RAORD1    RAORD1A
RAORD2    RAORD4    RAORD5    RAORD7A    RAORD8    RAORDP    RAORDR    RAORDS
RAORDU    RAORDU1    RAORR1    RAPERR1    RAPRINT1    RAPROD    RAPROS    RAPSET
RAPSET1    RAPTLU    RAREG    RAREG2    RAREG3    RARTFLDS    RARTST2    RASTAT
RASTED    RASTEXT    RASTRPT2    RASYS1    RAUTL0    RAUTL1    RAUTL12    RAUTL13
RAUTL18    RAUTL19    RAUTL6    RAUTL7    RAUTL7A    
Inpatient Medications 45 PSGAPP    PSGCAP0    PSGLOI    PSGMAR0    PSGMAR3    PSGMMAR0    PSGMMAR2    PSGMMAR4
PSGPER0    PSGPER2    PSGPR    PSGVBW    PSGVBWU    PSIVARH    PSIVCAL    PSIVHYPL
PSIVHYPR    PSIVLABL    PSIVLABR    PSIVORFB    PSIVORLB    PSJ5P315    PSJCLOR    PSJCLOR2
PSJCLOR3    PSJEEU    PSJGMRA    PSJHL2    PSJHL4A    PSJHL7    PSJHL9    PSJIBAG
PSJLMHED    PSJORRN    PSJORRN1    PSJORRO    PSJPAD50    PSJPADE    PSJPADSI    PSJPDAPP
PSJPDCL    PSJPDCLA    PSJPDCLU    PSJPDV0    PSJSV0    
PCE Patient Care Encounter 45 PXAIVSTV    PXBAPI1    PXBAPI2    PXBDPOV    PXBDPRV    PXBGSTP    PXBGVST    PXBPSTP
PXBUTL2    PXCA0    PXCAVST    PXCAVST1    PXCE    PXCEAE    PXCEE800    PXCEEXP
PXCEHLOC    PXCENEW    PXCEPAT    PXCEVSIT    PXEDIEL    PXICLN9B    PXKCO    PXKVST
PXPXRM    PXQGVST    PXRHS02    PXRRECSE    PXRRFDSE    PXRRLCSC    PXRRPAPI    PXRRPAPR
PXRRPCR    PXRRWLSE    PXVRESP    ^AUPNVSIT    PXRRPASA    PXRRPCE    PXRRWLS2    PXUTLVST
PXVRPC6    PXVUTIL    PXVXR    VSITCK1    VSITDEF    
Surgery 41 SRHLUO1    SRHLUO3    SRHLVUO1    SROANR    SRODATE    SROERR1    SROERR2    SROESPR1
SROESPR2    SRONOR2    SRONOR3    SRONOR4    SRONOR5    SRONOR7    SRONOR8    SRONP2
SRONRPT    SROOPRM    SROPACT    SROPCEU0    SRORESV    SRORHRS    SRORHRS0    SRORIN
SRORUT0    SRORUT1    SROSCH    SROTRPT0    SROUTL    SROUTL0    SROUTUP    SRSAVL
SRSBDEL    SRSCAN1    SRSCD    SRSCDS    SRSCDS1    SRSCDW    SRSCDW1    SRSCOR
SRSDISP    
Outpatient Pharmacy 39 1197    PSO ACTION PROFILE    PSO160DR    PSOARCCV    PSOARX    PSOCST11    PSOCSTD    PSOCSTM
PSODRDU1    PSOERX1B    PSOHCPRS    PSOHCSUM    PSOHLDS1    PSOHLNE2    PSOHLNEW    PSOHLSG1
PSOHLSG5    PSOLBL    PSOLBLN    PSOLLLI    PSOORDER    PSOORED1    PSOORFI1    PSOORFI3
PSOORFI6    PSOORNE1    PSOORNE2    PSOORNE3    PSOORNE4    PSOP288R    PSORELD1    PSORENW3
PSORXPR    PSORXVW    PSOSD0    PSOSDRAP    PSOTPCUL    PSOVDF3    PSOXX    
Automated Information Collection System 38 IBDF15A    IBDF18A    IBDF18B    IBDF18C    IBDF1B1    IBDF1B3    IBDF1B5    IBDFCG1
IBDFCNOF    IBDFDE0    IBDFDE1    IBDFDE6    IBDFDE7    IBDFFSMP    IBDFFT    IBDFU4
^IBD(359.3    IBDF14A    IBDF1B1A    IBDF1B1B    IBDF1BA    IBDF2F1    IBDF6    IBDFDE8
IBDFFRFT    IBDFFT1    IBDFFT3    IBDFFV1    IBDFN1    IBDFN3    IBDFOSG1    IBDFRPC3
IBDFSS    IBDFUTL1    IBDFUTL2    IBDFUTL4    IBDFUTL5    ^IBD(357.96    
Lab Service 38 EXCEPTED LOCATIONS    LR450PIR    LR7OF0    LR7OU0    LRAC14    LRACKL1    LRACM    LRAPED
LRARCPTS    LRARCR2    LRBLJL1    LRCAPES    LRCAPES1    LRCAPPH    LRCAPPH1    LRCAPPH2
LRCAPPHX    LRCAPR2    LRCAPTS    LRCE    LRDPA1    LREPI3    LRJSML4    LRJSMLA
LRJSMLA1    LRMISEZA    LRMITSPE    LRPHLIS1    LRRMM    LRRS12    LRUMDP    LRUMDS
LRUTT    LRUWLF    LRWLST1    ^LAB(64.6    LRWU    TEST    
Integrated Billing 35 IBAECO    IBAMTBU2    IBAMTS1    IBATLM2A    IBATLM3A    IBCCPT    IBCNEDE2    IBCNEDE4
IBCONS2    IBCOPV2    IBCSC4D    IBCSCH1    IBCU    IBCU71    IBCU74    IBEFUNC
IBEMTF2    IBEMTSCU    IBEPTC2    IBEPTC3    IBJDI11    IBJDIPR    IBJTBC    IBNCPDP2
IBOCNC1    IBOUNP1    IBOUNP2    IBOVOP1    IBRBUL    IBTOBI    IBTOECT    IBTRE20
IBTRED    IBTUBOU    PROCEDURES    
Text Integration Utility 32 GMRPNOR1    TIU144    TIUEN113    TIUEPN    TIULC1    TIULE    TIULV    TIUMED1
TIUP113    TIUPNCVX    TIUPREF    TIUPRPN1    TIUPRPN2    TIUPRPN4    TIUPRPN7    TIUPUTCN
TIUPUTCP    TIUPUTPF    TIUPUTPN    TIUPXAP1    TIUPXAP2    TIURD2    TIURD3    TIUSRVL
TIUSRVL1    TIUSRVLC    TIUSRVLO    TIUSRVLV    TIUSRVP    TIUSRVP1    TIUSRVR    TIUVSIT
Registration 24 DGRRLU3    ^DIC(42    DGAPI1    DGENRPD2    DGMTOFA    DGMTREQB    DGPAR    DGPMEVT
DGPMVBUR    DGPTFM    DGPTFM2    DGPTFM3    DGQPT    DGQPT1    DGQPTQ2    DGQPTQ5
DGRP14    DGRPD    DGYPSDE2    VADPT5    VAFCCOPT    VAFHCOPT    VAFHCPV    VAFHLPV1
Record Tracking 23 RT OVER BY DIV BY BOR    RT OVER BY DIV BY NAME    RT OVER BY DIV BY TD    RTDEL    RTDPA3    RTDPA31    RTNQ3    RTNQ41
RTP3    RTP6    RTPSET    RTPSET1    RTQ2    RTQ3    RTQ5    RTSM
RTSM4    RTSM5    RTSM6    RTUTL    ^RTV(195.9    RTSYS    RTUTL5    
Event Capture 19 ECBEN1B    ECBEN2U    ECBENF    ECBEP1B    ECBEP2A    ECED1    ECED2    ECED3
ECEDF    ECEFPAT    ECMUTL1    ECMXP1    ECMXP2    ECPCER    ECPCEU    ECSUM1
ECSUM2    ECUMRPC1    ECV5RPC    
Virtual Patient Record 17 VPRD    VPRDGMV    VPRDJ01    VPRDJ02    VPRDJ03    VPRDJ04    VPRDJ04A    VPRDJ05
VPRDJ09    VPRDMC    VPRDPSI    VPRDPSOR    VPRDPXIM    VPRDSDAM    VPRDVSIT    VPRSDA
VPRSDAP    
DSS Extracts 16 ECX3P120    ECX3P127    ECXEC    ECXFEKEY    ECXFELOC    ECXOPRX    ECXPIVDN    ECXQSR
ECXSCLD    ECXSCLD1    ECXSCRP    ECXSCX    ECXSCX1    ECXSCX3    ECXSCXN    ECXSCXN1
Enterprise Health Management Platform 16 HMPCRPC1    HMPD    HMPDJ00    HMPDJ02    HMPDJ04E    HMPDMC    HMPDSDAM    HMPDVSIT
HMPEF    HMPEF1    HMPLIST    HMPPATS    HMPROS8    HMPWB5    HMPWBSO    HMPXGSD
Medicine 15 MCAROC1    MCAROE1    MCAROEP    MCAROG    MCAROGM    MCAROH1    MCAROHB    MCAROK
MCAROP    MCAROT    MCBPFTP1    MCOETT1    MCPARC    MCPFTP    MCPFTP1    
Nursing Service 14 NURSCEP    ^NURSF(211.4    NURACHDC    NURQEDT0    NURQRPT0    NURQRPT1    NURQUTL    NURSAFLL
NURSAPE0    NURSAUTL    NURSUT1    NURSUT2    NURSUT3    OCCUPANCY/TRANSFERRED DATE    
Consult Request Tracking 13 GMRCIUTL    GMRCONS1    GMRCONS2    GMRCONS3    GMRCP5B    GMRCP5D    GMRCPOR    GMRCQCST
GMRCSLM    GMRCSLM2    GMRCSTL2    GMRCT    GMRCYP70    
Clinical Reminders 10 PXRMEXFI    PXRMGECV    PXRMINPL    PXRMLOCF    PXRMVITL    PXRMVSIT    PXRMXAP    PXRMXSL1
PXRMXSL2    PXRMXSU    
Occurrence Screen 10 QAOSPAD1    QAOSPCL0    QAOSPHDR    QAOSPRS0    QAOSPSM0    QAOSPSS0    QAOSPWT0    QAOSSFR0
QAOSSFR1    QAOUTL0    
Adverse Reaction Tracking 8 GMRACMR1    GMRACMR3    GMRACMR4    GMRAEAB    GMRAPL    GMRAPNA    GMRAPTB    GMRAVAB
Barcode Medication Administration 8 ALPBIND    ALPBINP    PSBML    PSBOMD    PSBOSF    PSBOST    PSBPXFL    PSBRPC
Dietetics 8 FHASE1A    FHASE2    FHMASE1A    FHOMIP    FHOMUTL    FHPRW    FHPST2    FHWOR8
General Medical Record - Vitals 8 GMRVED0    GMRVPCE1    GMVGGR1    GMVPXRM    GMVRPCHL    GMVRPCM    GMVUTL1    GMVVDEF1
Automated Medical Information Exchange 7 DVBAAPLK    DVBAB1B    DVBAB97    DVBAREN1    DVBCENQ2    DVBCMKL2    DVBCPRNT    
Health Summary 7 GMTS TASK LOCATIONS SORT    GMTSDA    GMTSPCD    GMTSPD    GMTSPL    GMTSUIX    GMTSULT4    
Mental Health 7 YS TEST SORT    YSCPAL    YSDGDEM0    YSGAF1    YSSR 10-2683 SORT    YSSR NURSE MGT SORT    YSSR WARD MGT SORT    
Clinical Procedures 6 MDCLIO1    MDHL7BH    MDPFTP1    MDRPCU    MDWOR    MDWORC    
Incomplete Records Tracking 6 DGJOPRT2    DGJOTP2    DGJTEE3    DGJTVW2    DGJTVW3    DGJXE    
Problem List 6 GMPLDISP    GMPLMGR    GMPLMGR1    GMPLPREF    GMPLUTL1    GMPLUTL2    
Imaging 5 MAGBRTE3    MAGDHLSV    MAGDQR04    MAGJUTL1    MAGQE3    
Incident Reporting 5 QANBENE0    QANQTOT    QANRPT1    QANUTL1    QANUTL2    
National Health Information Network 5 NHINV    NHINVIT    NHINVPSI    NHINVPSO    NHINVSIT    
Emergency Department Integration Software 4 EDPQDB    EDPQLE    EDPQLW    EDPQPP    
General Medical Record - IO 4 GMRYED0    GMRYRP5    GMRYUT4    GMRYUT9    
Mobile Scheduling Applications Suite 4 MBAAMDA1    MBAAMDA2    MBAAMDA4    MBAARPC1    
Pharmacy Data Management 4 PSSJEEU    PSSJSV0    PSSMRRDG    PSSP191A    
Accounts Receivable 3 RCXVDC4    RCXVDC5    RCXVUTIL    
Auto Replenishment Ward Stock 3 PSGWCCP    PSGWCPA1    PSGWEXR2    
Hospital Based Home Care 3 HBHCRP1A    ^HBHC(632    HBHCRP24    
VA Point of Service 3 VPSRPC10    VPSRPC4    VPSSEND    
VBECS 3 VBECHLOR    VBECLU3    VBECRPCD    
VistA Integration Adapter 3 VIABMS2    VIABRPC3    VIABRPC4    
Controlled Substances 2 PSDLBLB    PSDLBLP    
Patient Representative 2 QACI2D    QACSPRD2    
Quasar 2 ACKQAG06    ACKQTDS    
Social Work 2 SOWCPOI    SOWKQAM5    
Automated Lab Instruments 1 LA7DLOC    
CMOP 1 PSXBLD    
Care Management 1 ORRCEVT    
Clinical Case Registries 1 RORRP015    
Clinical Monitoring System 1 QAMC17    
Enrollment Application System 1 EASMTRP3    
IFCAP 1 PRCPRPC2    
Income Verification Match 1 IVMUFNC2    
Lexicon Utility 1 LEXSET5    
My HealtheVet 1 MHVUMRPC    
Oncology 1 ONCFUNC    
PAID 1 PRSNEE    
Toolkit 1 ^XTV(8989.51    
Womens Health 1 WVUTL6    

Accessed By FileMan Db Calls, Total: 375

Package Total Routines
Scheduling 128 SCDXUAPI    SCENIA2    SCMCENCT    SCMCMHE    SCMSP    SCMSP66    SCMSPX1    SCMSPX2
SCRPO    SCRPU1    SCRPW10    SCRPW17    SCRPW2    SCRPW60    SCRPW72    SCRPW81
SD5384NC    SD5384PT    SD53P491    SDAL0    SDAM3    SDAMCCKL    SDAMEP1    SDAMEX
SDAMO0    SDAMOCP1    SDAMODO    SDAMVSC    SDAMWI    SDAMWI1    SDAPP    SDB
SDBT    SDBT1    SDBT2    SDBT3    SDBT4    SDCLAS    SDCLK    SDEC01
SDEC01A    SDEC01B    SDEC04    SDEC07    SDEC08    SDEC12    SDEC32    SDEC37
SDEC38    SDEC45    SDEC48    SDEC50    SDEC51    SDEC51A    SDEC52    SDEC54A
SDEC56    SDEC57    SDEC658    SDECAPI4    SDECAR1    SDECCLN    SDECDEV    SDECEP
SDECHL7    SDECINI1    SDECINI2    SDECRMG1    SDECRPT1    SDECRT0    SDECRT1    SDECU
SDECUTL2    SDECV    SDECWL    SDECWL1    SDECWL3    SDM    SDM1A    SDM2A
SDM4    SDMHAD    SDMHAP    SDMM1    SDMULT    SDN    SDNACT    SDOQMP0
SDPBP    SDPFSS2    SDREACT    SDREV    SDROUT    SDRPA08    SDRR1    SDRR5
SDRRCLR    SDRRCLR2    SDRRCRR    SDRRCRR1    SDRRDEL    SDRRINQ    SDRRINQ1    SDRROR
SDRRPXC    SDRRRECL    SDRRRECP    SDRRREP    SDRRSEG3    SDRRUTL    SDRRUTL1    SDSCSSD
SDST    SDWL120    SDWLBACC    SDWLCU1    SDWLCU5    SDWLCU6    SDWLD    SDWLE2
SDWLE7    SDWLI    SDWLPE    SDWLPL    SDWLQSC    SDWLQSC1    SDWLREB    SDWLRP2
Lab Service 20 LR138PO    LR7OFAO    LR7OV5    LRACKL    LRARC1A    LRARCR1A    LRCAPBV    LRCAPES
LRCAPPH    LRCAPPH2    LRCAPR1A    LRJSML4    LRLABLD0    LRMITSPE    LRSORA1    LRSORC
LRSORD    LRUC    LRVRPOC    LRVRPOCU    
General Medical Record - Vitals 15 GMRVBP1    GMRVDS1    GMRVGR1    GMRVLBP2    GMRVLPO2    GMRVLWT3    GMRVPCE1    GMRVSC0
GMRVUT2    GMRVVS2    GMRVWT1    GMVDCVAL    GMVDS1    GMVHS    GMVUTL1    
Inpatient Medications 15 PSGCAP    PSGL    PSGMAR    PSGMMAR    PSGPER1    PSGPR    PSGVBW    PSJBCMA6
PSJCLOR    PSJEXP    PSJIMO1    PSJO1    PSJPAD50    PSJPADE    PSJPADSI    
DSS Extracts 13 ECX357PT    ECXDVSN1    ECXPHAA    ECXRAD    ECXSCLD    ECXSCLD1    ECXSCRP    ECXSCX3
ECXSCXN    ECXSURG    ECXUCBOC    ECXUTL5    ECXUTL6    
Event Capture 12 ECEFPAT    ECRDSSEC    ECRECSIC    ECSCPT1    ECSCRN    ECUERPC    ECUERPC1    ECUMRPC
ECUMRPC1    ECUTL1    ECUTL3    ECV3RPC    
Outpatient Pharmacy 12 PSO160DR    PSOCST11    PSODEMSB    PSOERXD2    PSOLLL5    PSONVAR1    PSONVAVW    PSOORFI3
PSOORFI6    PSORWRAP    PSOSD    PSOSDRAP    
Radiology Nuclear Medicine 11 RAHLRU    RAMAG02A    RAMAG03A    RAORD1    RAORD8    RAPCE2    RAPERR1    RARTST1
RARTST2    RARTST2A    RAUTL6    
Enterprise Health Management Platform 10 HMPD    HMPDJ01    HMPDJ02    HMPDJ03    HMPDJ04    HMPDJ04A    HMPDJ05    HMPDJ09
HMPDSDAM    HMPDVSIT    
Quasar 10 ACKQAS    ACKQASU    ACKQASU1    ACKQIPST    ACKQPCE2    ACKQR1    ACKQR2    ACKQR3
ACKQR5    ACKQUTL2    
Clinical Procedures 8 MDCEVN    MDCPHL7A    MDHL7BH    MDPCE2    MDPS2    MDRPCOT1    MDRPCOW    MDWSETUP
Integrated Billing 8 IBCC1    IBEMTSCU    IBOHLS1    IBTRH1A    IBTRH1B    IBTRH5    IBTRH7    IBTUBO2
Clinical Case Registries 7 RORHL09    RORHLUT1    RORRP015    RORUTL05    RORUTL18    RORXU002    RORXU006    
Imaging 6 MAGDHLSV    MAGDHOW4    MAGDHOWS    MAGDRPCA    MAGDTRDX    MAGVIM10    
Mobile Scheduling Applications Suite 6 MBAAMDA1    MBAAMDA4    MBAAMRP1    MBAARPC1    MBAARPC3    MBAARPCL    
Automated Lab Instruments 5 LA7VHLU2    LA7VHLU4    LA7VORC    LA7VORU    LA7VORUB    
Consult Request Tracking 5 GMRCCD    GMRCPSL2    GMRCPSL3    GMRCPSL4    GMRCYP70    
My HealtheVet 5 MHV1P11    MHV1P22    MHV1P5    MHVUMRPC    MHVXCLN    
Order Entry Results Reporting 5 ORAMX    ORDEA    ORMBLDSD    ORWPCE2    ORY429    
Problem List 5 GMPLBLD3    GMPLMGR1    GMPLNTFT    GMPLNTRT    GMPLX1    
Registration 5 DG53478I    DGENA2    DGENACL2    DGMTUTL    VAUTOMA    
Virtual Patient Record 5 VPRD    VPRDJ02    VPRDJ04    VPRDSDAM    VPRDVSIT    
Automated Information Collection System 4 IBDF1B    IBDFFT    IBDFUTL    IBDFUTL4    
Barcode Medication Administration 4 PSBMMRB    PSBO    PSBOHDR    PSBPOIV    
Methicillin Resistant Staph Aurerus Initiative Reports 4 MMRSCDI    MMRSCDI2    MMRSCRE2    MMRSCRE3    
Nursing Service 4 NURSAFLL    NURSALED    NURSUT3    NURSUT5    
PAID 4 PRSNUT01    PRSNUT02    PRSNUT03    PRSNUT04    
Surgery 4 SROESX    SROESXA    SROESXP    SROUTL    
Text Integration Utility 4 TIU144    TIUHL7P2    TIUP146P    TIUTIUS    
Clinical Reminders 3 PXRMGECO    PXRMVSIT    PXRMXSU    
Record Tracking 3 RTQ3    RTRAD    RTSM    
Enrollment Application System 2 EASMTRP1    EASMTRP3    
General Medical Record - IO 2 GMRYFLW2    GMRYRP3    
Health Summary 2 GMTSCNB    GMTSPL    
Medicine 2 MCARP    MCRPEC    
Mental Health 2 YSGAF1    YTQHL7    
National Health Information Network 2 NHINVAPT    NHINVSIT    
PCE Patient Care Encounter 2 PXRRLCSC    PXRRPCE    
VA Point of Service 2 VPSRPC10    VPSVTL01    
VistA Integration Adapter 2 VIABRPC    VIABRPC4    
Adverse Reaction Tracking 1 GMRACMR1    
Automated Medical Information Exchange 1 DVBCULAP    
Clinical Information Resource Network 1 RGHOUT    
Controlled Substances 1 PSDDSOR1    
Functional Independence 1 RMIMRP    
Pharmacy Data Management 1 PSSJXR28    
Womens Health 1 WVLRLINK    

Pointed To By FileMan Files, Total: 172

Package Total FileMan Files
Scheduling 18 HOSPITAL LOCATION(#44)[4191620092010]    OUTPATIENT ENCOUNTER(#409.68)[.04]    TEAM AUTOLINK(#404.56)[.02]    TEAM POSITION(#404.57)[.09#404.575(.01)]    RECALL REMINDERS(#403.5)[4.5]    RECALL REMINDERS LETTERS(#403.52)[.01]    RECALL REMINDERS REMOVED(#403.56)[4.5102]    SCHEDULING PARAMETER(#404.91)[902]    SCHEDULING REPORT QUERY TEMPLATE(#404.95)[40#404.9503(.01)]    APPOINTMENT PFSS ACCOUNT REFERENCE(#409.55)[.03]    ACRP TRANSMISSION HISTORY(#409.77)[.04]    SDEC RESOURCE(#409.831)[.012.04#409.8312001(.01)]
SDEC APPT REQUEST(#409.85)[813.2#409.8545(2)]
SDEC CONTACT(#409.86)[1]    SCHEDULING VISITS(#409.5)[#409.51(3)]    SD WAIT LIST(#409.3)[8.513.2#409.345(3)]
SD WL CLINIC LOCATION(#409.32)[.01]    PATIENT APPOINTMENT INFO LOG(#409.6)[#409.69(9)]    
DSS Extracts 17 ADMISSION EXTRACT(#727.802)[27]    CLINIC NOSHOW EXTRACT(#727.804)[52]    PHYSICAL MOVEMENT EXTRACT(#727.808)[1420]    UNIT DOSE LOCAL EXTRACT(#727.809)[11]    SURGERY EXTRACT(#727.811)[82]    RADIOLOGY EXTRACT(#727.814)[12]    EVENT CAPTURE LOCAL EXTRACT(#727.815)[120128]    CLINIC I EXTRACT(#727.816)[18]    IV DETAIL EXTRACT(#727.819)[11]    ADMISSION SETUP EXTRACT(#727.82)[27]    PHYSICAL MOVEMENT SETUP EXTRACT(#727.821)[1420]    TREATING SPECIALTY CHANGE SETUP EXTRACT(#727.822)[14]    QUASAR EXTRACT(#727.825)[120128]    CLINIC EXTRACT(#727.827)[11130]    BCMA EXTRACT(#727.833)[15]    IV EXTRACT DATA(#728.113)[13]    CLINICS AND STOP CODES(#728.44)[.01]    
Lab Service 10 LAB REPORTS(#64.5)[#64.57(.01)]    INTERIM REPORTS(#64.6)[.01]    LABORATORY SITE(#69.9)[.8#69.9004(.01)#69.99(.01)]
LAB DATA(#63)[#63.04(.111)#63.05(.111)]    HOWDY SITE FILE(#69.86)[#69.8616(.01)]    WKLD LOG FILE(#64.03)[14]    WKLD DATA(#64.1)[#64.1111(20)]    ACCESSION(#68)[.8#68.02(94)]    LAB ORDER ENTRY(#69)[#69.01(8)#69.01(23)]    COLLECTION LIST(#69.1)[#69.11(11)]    
Medicine 9 ECHO(#691)[40]    CARDIAC CATHETERIZATION(#691.1)[5]    ELECTROCARDIOGRAM (EKG)(#691.5)[18]    HOLTER(#691.6)[17]    EXERCISE TOLERANCE TEST(#691.7)[69]    ELECTROPHYSIOLOGY (EP)(#691.8)[18]    HEMATOLOGY(#694)[3]    ENDOSCOPY/CONSULT(#699)[89]    PULMONARY FUNCTION TESTS(#700)[9]    
Order Entry Results Reporting 8 ORDER(#100)[6]    OE/RR LIST(#100.21)[#100.213(.01)]    OE/RR PT SEL COMBO(#100.24)[#100.241(.01)]    QUICK ORDER AUDIT(#100.95)[6]    ORAM FLOWSHEET(#103)[101]    OE/RR RELEASE EVENTS(#100.5)[9]    OE/RR AUTO-DC RULES(#100.6)[#100.62(2)#100.62(4)]    ORDER PARAMETERS(#100.99)[#100.99011(.01)#100.9925(.01)]    
Outpatient Pharmacy 8 ADMINISTRATION SCHEDULE(#51.1)[#51.17(.01)]    PENDING OUTPATIENT ORDERS(#52.41)[1.1]    ERX HOLDING QUEUE(#52.49)[20.6]    IV MEDICATION ORDERS DC'D(#52.75)[7]    OUTPATIENT SITE(#59)[101007]    OUTPATIENT CLINIC SORT GROUP(#59.8)[#59.81(.01)]    DRUG COST(#50.9)[#50.9008(.01)]    PRESCRIPTION(#52)[5]    
Imaging 7 IMAGE(#2005)[101]    IMAGE AUDIT(#2005.1)[101]    ACQUISITION DEVICE(#2006.04)[2]    CLINICAL SPECIALTY DICOM & HL7(#2006.5831)[#2006.58311(.01)]    OUTSIDE IMAGING LOCATION(#2006.5759)[3]    DICOM GATEWAY PARAMETER(#2006.563)[117]    DICOM RADIOLOGY PROCEDURES(#2006.5758)[8]    
Integrated Billing 6 BILL/CLAIMS(#399)[#399.0304(6)]    PFSS ACCOUNT(#375)[1.03]    PFSS CHARGE CACHE(#373)[6.16]    IB SITE PARAMETERS(#350.9)[#350.963(.01)]    NON-BILLABLE CLINICS(#352.4)[.01]    HCS REVIEW TRANSMISSION(#356.22)[.06]    
Auto Replenishment Ward Stock 5 PADE INVENTORY SYSTEM(#58.601)[#58.6014(.01)]    PADE DISPENSING DEVICE(#58.63)[#58.638(.01)]    PADE SYSTEM SETUP(#58.7)[#58.7413(.01)#58.7481(.01)#58.749(.01)]
PADE OUTBOUND MESSAGES(#58.72)[8]    PHARMACY AOU STOCK(#58.1)[7#58.14(.01)]    
Registration 5 MAS PARAMETERS(#43)[213#43.04(.01)]    PTF(#45)[#45.06(.05)]    PRE-REGISTRATION CALL LIST(#41.42)[5]    WARD LOCATION(#42)[44]    PATIENT(#2)[#2.001(.01)#2.98(.01)#2.98(18)]
Text Integration Utility 5 TIU DOCUMENT(#8925)[12051211]    TIU AUDIT TRAIL(#8925.5)[1.071.08]    TIU TEXT EVENTS(#8925.71)[#8925.715(.01)]    TIU PRINT PARAMETERS(#8925.93)[.01]    TIU PERSONAL PREFERENCES(#8926)[.02#8926.01(.02)]    
Automated Information Collection System 4 FORM DEFINITION(#357.95)[#357.9501(.01)]    ENCOUNTER FORM TRACKING(#357.96)[.1]    PRINT MANAGER CLINIC GROUPS(#357.99)[#357.9901(.01)]    PRINT MANAGER CLINIC SETUP(#409.95)[.01]    
Inpatient Medications 4 ADMINISTRATION SHIFT(#51.15)[#51.153(.01)]    NON-VERIFIED ORDERS(#53.1)[113]    CLINIC DEFINITION(#53.46)[.01]    CLINIC GROUP(#57.8)[#57.81(.01)]    
PCE Patient Care Encounter 4 V IMMUNIZATION DELETED(#9000080.11)[1215]    V IMMUNIZATION(#9000010.11)[1215]    VISIT(#9000010)[.22]    PCE PARAMETERS(#815)[201#815.0401(.01)#815.0801(.01)]
Radiology Nuclear Medicine 4 IMAGING LOCATIONS(#79.1)[.01]    REPORT DISTRIBUTION(#74.4)[8]    RAD/NUC MED PATIENT(#70)[#70.03(8)#70.03(22)]    RAD/NUC MED ORDERS(#75.1)[22]    
Surgery 4 SURGERY(#130)[.021119]    SURGERY SITE PARAMETERS(#133)[42]    LOCAL SURGICAL SPECIALTY(#137.45)[2]    OPERATING ROOM(#131.7)[.01]    
Consult Request Tracking 3 REQUEST/CONSULTATION(#123)[.042]    GMRC CONSULT MAPPING(#123.033)[#123.0335(.01)]    REQUEST SERVICES(#123.5)[#123.54(.01)#123.56(.01)]    
Hospital Based Home Care 3 HBHC CLINIC(#631.6)[.01]    HBHC VISIT(#632)[2]    HBHC VISIT ERROR(S)(#634.2)[6]    
Nursing Service 3 NURQ QI SUMMARY(#217)[#217.04(.01)]    NURS LOCATION(#211.4)[.01]    NURS POSITION CONTROL(#211.8)[.01]    
Quasar 3 A&SP CLINIC VISIT(#509850.6)[2.6]    A&SP SITE PARAMETERS(#509850.8)[#509850.81(.01)#509850.831(.01)]    AUDIOMETRIC EXAM DATA(#509850.9)[.04]    
VA Point of Service 3 VPS CONFIG HISTORY(#853)[.02]    VPS MRAR PDO(#853.5)[#853.51(.04)]    VPS APPOINTMENTS QUEUE(#853.9)[#853.91(.01)]    
Automated Lab Instruments 2 FOREIGN INTERFACE(#62.487)[#62.4871(.01)]    LAB SHIPPING CONFIGURATION(#62.9)[#62.9003(.01)]    
Barcode Medication Administration 2 BCMA MISSING DOSE REQUEST(#53.68)[1]    BCMA REPORT REQUEST(#53.69)[5]    
Clinical Procedures 2 OBS(#704.117)[.04]    CP DEFINITION(#702.01)[.05]    
Clinical Reminders 2 REMINDER LOCATION LIST(#810.9)[#810.944(.01)]    REMINDER REPORT TEMPLATE(#810.1)[#810.11(.01)]    
Dietetics 2 NUTRITION LOCATION(#119.6)[102#119.64(.01)]    DIETETIC ENCOUNTERS(#115.7)[4#115.701(1)]    
Emergency Department Integration Software 2 ED LOG(#230)[.14]    ED LOG HISTORY(#230.1)[.14]    
Event Capture 2 EVENT CAPTURE PATIENT(#721)[26]    EC EVENT CODE SCREENS(#720.3)[55]    
Mental Health 2 SECLUSION/RESTRAINT(#615.2)[.04]    MH ADMINISTRATIONS(#601.84)[13]    
Problem List 2 PROBLEM(#9000011)[1.08]    PROBLEM SELECTION LIST(#125)[.03]    
Prosthetics 2 PROSTHETICS SITE PARAMETERS(#669.9)[52#669.922(.01)]    PROSTHETIC APPOINTMENT WORKSHEET(#663.4)[8]    
Womens Health 2 WV LAB TESTS(#790.08)[.11]    WV PROCEDURE(#790.1)[.11]    
Automated Medical Information Exchange 1 AMIE SITE PARAMETER(#396.1)[#396.115(.01)]    
Enterprise Health Management Platform 1 HMP ROSTER(#800001.2)[#800001.21(.02)]    
General Medical Record - IO 1 GMRY PATIENT I/O FILE(#126)[#126.01(7)#126.02(6)#126.03(7)#126.313(4)#126.316(3)]    
General Medical Record - Vitals 1 GMRV VITAL MEASUREMENT(#120.5)[.05]    
Health Summary 1 HEALTH SUMMARY TYPE(#142)[#142.2(.01)]    
Incident Reporting 1 QA PATIENT INCIDENT REVIEW(#742)[.06]    
Incomplete Records Tracking 1 INCOMPLETE RECORDS(#393)[.05]    
Kernel 1 INSTITUTION(#4)[#4.03(.02)]    
Occurrence Screen 1 QA OCCURRENCE SCREEN(#741)[4#741.026(.01)]    
Patient Assessment Documentation 1 NUPA CARE PLANS(#1927.4)[19]    
Patient Representative 1 CONSUMER CONTACT(#745.1)[14]    
Pharmacy Data Management 1 PHARMACY PATIENT(#55)[#55.01(136)#55.05(13)#55.06(130)]
Quality Assurance Integration 1 QUALITY ASSURANCE SITE PARAMETERS(#740)[#740.01(.01)]    
Record Tracking 1 BORROWERS/FILE AREAS(#195.9)[.012]    
Shift Handoff Tool 1 CRHD HANDOFF PARAMETERS(#183)[.01]    
Social Work 1 SOCIAL WORK SITE PARAMETERS(#650.1)[#650.119(.01)]    
Toolkit 1 PARAMETERS(#8989.5)[.01]    

Pointer To FileMan Files, Total: 22

Package Total FileMan Files
Scheduling 8 CLINIC STOP(#40.7)[88.125032503.1]    LOCATION TYPE(#40.9)[2.1#44.101(.01)]    HOSPITAL LOCATION(#44)[4191620092010]    TEAM(#404.51)[#44.40457(.02)]    TEAM POSITION(#404.57)[#44.40457(.01)]    APPOINTMENT TYPE(#409.1)[2507]    CLINIC GROUP(#409.67)[31]    LETTER(#407.5)[2508250925102511]    
Kernel 5 DEVICE(#3.5)[22901]    INSTITUTION(#4)[3]    AGENCY(#4.11)[23]    PACKAGE(#9.4)[50.02]    NEW PERSON(#200)[16#44.003(7)#44.003(302)#44.003(304)#44.04(.01)#44.1(.01)]    
Registration 5 MEDICAL CENTER DIVISION(#40.8)[3.5]    WARD LOCATION(#42)[42]    FACILITY TREATING SPECIALTY(#45.7)[9.5]    ELIGIBILITY CODE(#8)[#44.003(30)]    PATIENT(#2)[#44.003(.01)#44.007(.01)]    
Consult Request Tracking 1 REQUEST/CONSULTATION(#123)[#44.003(688)]    
DRG Grouper 1 ICD DIAGNOSIS(#80)[#44.11(.01)]    
Outpatient Pharmacy 1 OUTPATIENT SITE(#59)[22900]    
Record Tracking 1 REQUESTED RECORDS(#190.1)[#44.003(200)]    

Fields, Total: 95

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2)!'(X'?1P.E)!(X'?.ANP) X
  • LAST EDITED:  JUL 13, 2015
  • HELP-PROMPT:  Answer must be 2-30 characters in length.
  • DESCRIPTION:  
    Name given by user to any ward, clinic, fileroom, operating room or other location within a VA facility.
  • AUDIT:  YES, ALWAYS
  • PRE-LOOKUP:  S:X?1"%".N1"$" X=$TR(X,"%$","`")
  • DELETE TEST:  .01,0)= I $P(^SC(D0,0),"^",3)["C" W !,*7,"No deletion of clinics allowed - you must inactivate them!!!"
    1900,0)= I $O(^SC(DA,"S",DT))'="" W !?10,*7,"FUTURE APP'TS IN CLINIC!"
  • NOTES:  TRIGGERED by the NAME field of the WARD LOCATION File
  • CROSS-REFERENCE:  44^B
    1)= S ^SC("B",$E(X,1,30),DA)=""
    2)= K ^SC("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  ^^TRIGGER^42^.01
    1)= X ^DD(44,.01,1,2,1.3) I X S X=DIV X ^DD(44,.01,1,2,89.2) S X=$P(Y(101),U,1),X=X S X=X S D0=I(0,0) S DIU=X K Y S X=DIV S X=DIV X ^DD(44,.01,1,2,1.4)
    1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$S($D(^SC(D0,42)):^(42),1:"") S X=Y(0)'=$S('$D(^DIC(42,+$P(Y(1),U,1),0)):"",1:$P(^(0),U,1))
    1.4)= S DIH=$S($D(^DIC(42,DIV(0),0)):^(0),1:""),DIV=X I $D(^(0)) S %=$P(DIH,U,2,999),DIU=$P(DIH,U,1),^(0)=DIV_$S(%]"":U_%,1:""),DIH=42,DIG=.01 D ^DICR:$O(^DD(DIH,DIG,1,0))'=""
    2)= Q
    89.2)= S I(0,0)=$S($D(D0):D0,1:""),Y(1)=$S($D(^SC(D0,42)):^(42),1:""),D0=$P(Y(1),U,1) S:'$D(^DIC(42,+D0,0)) D0=-1 S DIV(0)=D0 S Y(101)=$S($D(^DIC(42,D0,0)):^(0),1:"")
    CREATE CONDITION)= NAME'=WARD LOCATION FILE POINTER
    CREATE VALUE)= NAME
    DELETE VALUE)= NO EFFECT
    FIELD)= WARD LOCATION FILE POINTER:NAME
    This TRIGGER updates the WARD LOCATION FILE POINTER field with a matching WARD LOCATION when the name is changed for this HOSPITAL LOCATION. If there is not a matching WARD LOCATION with the new name, a new WARD LOCATION
    is added and that new entry is pointed to by the WARD LOCATION FILE POINTER field.
  • CROSS-REFERENCE:  44^ATEAM^MUMPS
    1)= Q
    2)= Q
    The 'TEAM' cross reference of this file is created & modified through changes to the ASSOCIATED CLINIC (#.09) Field of the TEAM POSITION (#404.57) File and the NAME (#.01) Field of the TEAM (#404.51) File.  This results in
    a whole-file cross-reference with which a clinic can be looked-up for a team that has a team position with an associated clinic.  The 'ATEAM' cross-reference does not do anything - it is here for documentation purposes.
  • CROSS-REFERENCE:  44^AH^MUMPS
    1)= D N44S^SDEC03(DA,$E(X,1,30))
    2)= Q
    This cross reference maintains the name of the associated clinic resource in the SDEC RESOURCE file.
  • CROSS-REFERENCE:  44^AD^MUMPS
    1)= Q
    2)= S RTPL=X,X="RTP6" X ^%ZOSF("TEST") S X=RTPL K RTPL I $T D ^RTP6
  • CROSS-REFERENCE:  ^^TRIGGER^403.12^.01
    1)= X ^DD(44,.01,1,12,1.3) I X S X=DIV X ^DD(44,.01,1,12,89.2) S X=$P(Y(101),U,1) S D0=I(0,0) S DIU=X K Y S X=DIV S X=DIV X ^DD(44,.01,1,12,1.4)
    1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$S($D(^SC(D0,0)):^(0),1:"") S X=Y(0)'=$S('$D(^SCRS(403.12,+$P(Y(1),U,29),0)):"",1:$P(^(0),U,1))
    1.4)= S DIH=$S($D(^SCRS(403.12,DIV(0),0)):^(0),1:""),DIV=X I $D(^(0)) S $P(^(0),U,1)=DIV,DIH=403.12,DIG=.01 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    89.2)= S I(0,0)=$S($D(D0):D0,1:""),Y(1)=$S($D(^SC(D0,0)):^(0),1:""),D0=$P(Y(1),U,29) S:'$D(^SCRS(403.12,+D0,0)) D0=-1 S DIV(0)=D0 S Y(101)=$S($D(^SCRS(403.12,D0,0)):^(0),1:"")
    CREATE CONDITION)= NAME'=CLINIC SERVICES RESOURCE
    CREATE VALUE)= NAME
    DELETE VALUE)= NO EFFECT
    FIELD)= CLINIC SERVICES RESOURCE:NAME
    This trigger cross-reference is used to update the Name field (#.01) of the Clinic Services Resource file (#403.12).
  • RECORD INDEXES:  AG (#1353)
1 ABBREVIATION 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>7!($L(X)<1) X
  • LAST EDITED:  MAR 13, 2017
  • HELP-PROMPT:  ANSWER MUST BE 1-7 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Abbreviation given by user to any ward, clinic, fileroom, operating room or other location associated with the NAME.
  • CROSS-REFERENCE:  44^C
    1)= S ^SC("C",$E(X,1,30),DA)=""
    2)= K ^SC("C",$E(X,1,30),DA)
  • CROSS-REFERENCE:  44^AF^MUMPS
    1)= D A44S^SDEC03(DA,$E(X,1,7))
    2)= Q
    This cross reference maintains the abbreviation of the associated clinic resource in the ABBREVIATION field (#.011) of the SDEC RESOURCE file (#409.831).
2 TYPE 0;3 SET
************************REQUIRED FIELD************************
  • 'C' FOR CLINIC;
  • 'M' FOR MODULE;
  • 'W' FOR WARD;
  • 'Z' FOR OTHER LOCATION;
  • 'N' FOR NON-CLINIC STOP;
  • 'F' FOR FILE AREA;
  • 'I' FOR IMAGING;
  • 'OR' FOR OPERATING ROOM;

  • INPUT TRANSFORM:  K:'$D(^DIC(40.9,"C",X)) X I $D(X) S SDX=$O(^DIC(40.9,"C",X,0)) K:SDX'>0 X K SDX
  • LAST EDITED:  AUG 18, 2015
  • DESCRIPTION:  
    Type of location assigned to entries into this file, i.e. Ward, Clinic, Fileroom, Operating Room, Other.
  • AUDIT:  YES, ALWAYS
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  ^^TRIGGER^44^2.1
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^SC(D0,0)):^(0),1:"") S X=$P(Y(1),U,22),X=X S DIU=X K Y X ^DD(44,2,1,1,1.1) X ^DD(44,2,1,1,1.4)
    1.1)= S X=DIV S SDX=$O(^DIC(40.9,"C",X,0)) S:SDX'>0 SDX=0 S X=$S('SDX:"",$D(^DIC(40.9,+SDX,0)):+SDX,1:"") K SDX
    1.4)= S DIH=$S($D(^SC(DIV(0),0)):^(0),1:""),DIV=X X "F %=0:0 Q:$L($P(DIH,U,21,99))  S DIH=DIH_U" S %=$P(DIH,U,23,999),DIU=$P(DIH,U,22),^(0)=$P(DIH,U,1,21)_U_DIV_$S(%]"":U_%,1:""),DIH=44,DIG=2.1 D ^DICR:$O(^DD(DIH,DIG,1,0))
    '=""
    2)= Q
    CREATE VALUE)= S SDX=$O(^DIC(40.9,"C",X,0)) S:SDX'>0 SDX=0 S X=$S('SDX:"",$D(^DIC(40.9,+SDX,0)):+SDX,1:"") K SDX
    DELETE VALUE)= NO EFFECT
    FIELD)= TYPE E
    This TRIGGER updates the TYPE EXTENSION field 2.1 with an entry from the LOCATION TYPE file that has the same name.  This update to the TYPE EXTENSION field happens when the TYPE field 2 is defined or modified.
  • RECORD INDEXES:  AG (#1353)
2.1 TYPE EXTENSION 0;22 POINTER TO LOCATION TYPE FILE (#40.9)
************************REQUIRED FIELD************************
LOCATION TYPE(#40.9)

  • INPUT TRANSFORM:  I $P(^SC(DA,0),"^",3)'["Z",$D(^DIC(40.9,+X,0)),$P(^(0),"^",2)]"",$P(^SC(DA,0),"^",3)'=$P(^DIC(40.9,+X,0),"^",2) K X
  • LAST EDITED:  JUL 31, 1986
  • DESCRIPTION:  
    Type extension of a location assigned to entries into this file to insure user is not allowed to use a previously designated Ward Location as a Clinic Location for example.
  • EXECUTABLE HELP:  I $P(^SC(DA,0),"^",3)'["Z" S DIC("S")="I $P(^DIC(40.9,Y,0),""^"",2)=$P(^SC(DA,0),""^"",3)"
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
    TRIGGERED by the TYPE field of the HOSPITAL LOCATION File
  • CROSS-REFERENCE:  44^AC^MUMPS
    1)= I $D(^DIC(40.9,+X,0)),$P(^(0),"^",2)]"" S ^SC("AC",$P(^(0),"^",2),DA)=""
    2)= I $D(^DIC(40.9,+X,0)),$P(^(0),"^",2)]"" K ^SC("AC",$P(^(0),"^",2),DA)
3 INSTITUTION 0;4 POINTER TO INSTITUTION FILE (#4) INSTITUTION(#4)

  • LAST EDITED:  SEP 30, 2013
  • DESCRIPTION:  
    Institution name assigned to each entry in this file to identify where the specific location is.
  • AUDIT:  YES, ALWAYS
3.5 DIVISION 0;15 POINTER TO MEDICAL CENTER DIVISION FILE (#40.8) MEDICAL CENTER DIVISION(#40.8)

  • LAST EDITED:  SEP 30, 2013
  • DESCRIPTION:  
    Division name assigned to each entry in this file to identify wehre the specific location is.  There can be multiple divisions assigned to an Institution, but only one division per location.
  • AUDIT:  YES, ALWAYS
4 MODULE 0;5 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 9
  • DESCRIPTION:  
    Module or name of hospital location.
5 DEFAULT DEVICE 99;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<2) X
  • HELP-PROMPT:  ANSWER MUST BE 2-3 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Default device to which information should print for a specific location.  This field is not currently being utilized.
6 DISPOSITION ACTION 0;10 SET
  • '0' FOR NONE;
  • '1' FOR APPOINTMENT REC REQ;
  • '2' FOR SCHEDULING;

  • DESCRIPTION:  
    A disposition action associated with specific location, i.e.  '0'= none; '1'=appointment record request; '2'=scheduling.
7 VISIT LOCATION 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>4!($L(X)<1) X
  • HELP-PROMPT:  ANSWER MUST BE 1-4 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Location of visit for specified entry.
8 STOP CODE NUMBER 0;7 POINTER TO CLINIC STOP FILE (#40.7)
************************REQUIRED FIELD************************
CLINIC STOP(#40.7)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)'=900&$S('$P(^(0),U,3):1,$P(^(0),U,3)>DT:1,1:0),""PE""[$P(^(0),U,6),$S('$P(^(0),U,7):1,$P(^(0),U,7)'>DT:1,1:0)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 11, 2010
  • DESCRIPTION:  
    Three digit stop code number assigned to specific location.  Each stop code number represents a type of care or Service/treating specialty (clinics only).
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)'=900&$S('$P(^(0),U,3):1,$P(^(0),U,3)>DT:1,1:0),""PE""[$P(^(0),U,6),$S('$P(^(0),U,7):1,$P(^(0),U,7)'>DT:1,1:0)"
  • EXPLANATION:  Inactive stop codes are invalid. Stop code 900 can not be used for a clinic. Stop code must have a restriction type of "Primary" or "Either" and not have a future restriction date.
  • AUDIT:  YES, ALWAYS
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • FIELD INDEX:  AST (#458) REGULAR IR SORTING ONLY
    Short Descr:  Index stop codes
    Description:  This index can be used to find all hospital locations in a stop code.
    Set Logic:  S ^SC("AST",X,DA)=""
    Kill Logic:  K ^SC("AST",X,DA)
    Whole Kill:  K ^SC("AST")
    X(1):  STOP CODE NUMBER  (44,8)  (Subscr 1)  (forwards)
8.1 PRV. YEAR STOP CODE OC;1 POINTER TO CLINIC STOP FILE (#40.7) CLINIC STOP(#40.7)

  • INPUT TRANSFORM:  K:X X
  • LAST EDITED:  AUG 01, 1988
  • HELP-PROMPT:  PREVIOUS YEAR STOP CODE
  • DESCRIPTION:  
    Previous year's three digit stop code number that was assigned to specific location (clinics only).
    WRITE AUTHORITY:  ^
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
9 SERVICE 0;8 SET
************************REQUIRED FIELD************************
  • 'M' FOR MEDICINE;
  • 'S' FOR SURGERY;
  • 'P' FOR PSYCHIATRY;
  • 'R' FOR REHAB MEDICINE;
  • 'N' FOR NEUROLOGY;
  • '0' FOR NONE;

  • LAST EDITED:  DEC 22, 1983
  • DESCRIPTION:  
    Service assigned to specific location, i.e. Medicine, Surgery, Psychiatry, etc.
9.5 TREATING SPECIALTY 0;20 POINTER TO FACILITY TREATING SPECIALTY FILE (#45.7)
************************REQUIRED FIELD************************
FACILITY TREATING SPECIALTY(#45.7)

  • LAST EDITED:  FEB 28, 1986
  • DESCRIPTION:  
    Treating specialty assigned a specific location, i.e. neurosurgery, alcohol/drug rehabilitation, dermatology (specialties within Services usually).
10 PHYSICAL LOCATION 0;11 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<1) X
  • LAST EDITED:  NOV 08, 1983
  • HELP-PROMPT:  ANSWER MUST BE 1-25 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Physical location of a specific ward or clinic, etc., i.e.  3rd floor,  Wing A.
11 *OKC A .901;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<1) X
  • LAST EDITED:  FEB 08, 1984
  • HELP-PROMPT:  ANSWER MUST BE 1-3 CHARACTERS IN LENGTH
12 *OKC B .901;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<1) X
  • HELP-PROMPT:  ANSWER MUST BE 1-3 CHARACTERS IN LENGTH
13 SYNONYM .01;0 Multiple #44.01 44.01

  • DESCRIPTION:  
    Synonym or shortened name associated with a specific location.
14 SPECIAL AMIS STOP 0;12 SET
  • '10' FOR MENTAL HYGEINE;
  • '11' FOR DAY TREATMENT;
  • '12' FOR DAY HOSPITAL;
  • '13' FOR DRUG DEPENDANCE;
  • '14' FOR ALCOHOL TREATMENT;
  • '15' FOR EMERGENCY UNIT;
  • '16' FOR EMPLOYEE HEALTH;

  • DESCRIPTION:  
    Special AMIS stop associated with a specific location based on the Service assigned.
15 CATEGORY OF VISIT 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<1) X
  • HELP-PROMPT:  ANSWER MUST BE 1-3 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Category of visit associated with a specific location.
16 DEFAULT PROVIDER 0;13 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $$SCREEN^SDUTL2(Y,DT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  OCT 29, 1996
  • DESCRIPTION:  
    Default provider or physician that is assigned to specific clinic.
  • SCREEN:  S DIC("S")="I $$SCREEN^SDUTL2(Y,DT)"
  • EXPLANATION:  Provider must be active and have an active entry in the NEW PERSON file for PERSON CLASS.
  • EXECUTABLE HELP:  D HELP^SDUTL2(DT)
19 PROHIBITED TERMINAL 9;0 Multiple #44.02 44.02

  • DESCRIPTION:  
    Terminals that cannot be utilized from specific location.
23 AGENCY 0;23 POINTER TO AGENCY FILE (#4.11) AGENCY(#4.11)

  • LAST EDITED:  JAN 04, 1990
  • DESCRIPTION:  
    Agency associated with specific location, i.e. Veterans Affairs, Department of Defense, etc.
24 ASK FOR CHECK IN/OUT TIME 0;24 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAR 11, 1993
  • DESCRIPTION:  When checking in/out a patient for an appointment, should the user be prompted for date and time?
    If this field is set to 'YES', the user will be prompted for the date and time.  The current date and time will be the default.
    If this field is set to 'NO' or is not entered, the user will not be prompted and the current date and time will automatically be entered.
    If an appointment is scheduled retroactively then the system will use the date and time of the appointment as the check in/out time.  This date/time will either be entered automatically or used as a default, depending upon
    how this parameter is set.
29 *CLINIC SERVICES RESOURCE 0;29 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  AUG 25, 2014
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • DESCRIPTION:  
    This field is used to associate the clinic with a Clinic Services Resource.
  • TECHNICAL DESCR:  
    This field is no longer used. It was a pointer to the CLINIC SERVICES RESOURCE File (#403.12) which no longer exists.
    UNEDITABLE
30 WORKLOAD VALIDATION AT CHK OUT 0;30 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JUL 15, 1997
  • DESCRIPTION:  Yes or 1 will result in a validation being performed on each checked out encounter for this clinic. No or zero will stop the validation of the encounters as they are checked out for this clinic. This validation is to
    help ensure that the workload data is acceptable to the Austin National Patient Care Database.
31 CLINIC GROUP (REPORTS) 0;31 POINTER TO CLINIC GROUP FILE (#409.67) CLINIC GROUP(#409.67)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^SD(409.67,Y,1,""B"",1))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  DEC 21, 1997
  • HELP-PROMPT:  Specify the CLINIC GROUP that will be used to group clinic reports.
  • SCREEN:  S DIC("S")="I $D(^SD(409.67,Y,1,""B"",1))"
  • EXPLANATION:  Allows only the selection of CLINIC GROUP records that have a TYPE of 'REPORT'.
  • CROSS-REFERENCE:  44^ASCRPW
    1)= S ^SC("ASCRPW",$E(X,1,30),DA)=""
    2)= K ^SC("ASCRPW",$E(X,1,30),DA)
42 WARD LOCATION FILE POINTER 42;1 POINTER TO WARD LOCATION FILE (#42) WARD LOCATION(#42)

  • INPUT TRANSFORM:  I $D(^DIC(42,+X,44)),+^(44),+^(44)'=DA W !?20,"This Ward location points to ",$P(^SC(+^DIC(42,+X,44),0),"^",1) K X
  • LAST EDITED:  JAN 29, 1986
  • DESCRIPTION:  
    If location is a ward, this is the file pointer to the Ward Location File, File 42 in which this location is also stored.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
    TRIGGERED by the HOSPITAL LOCATION FILE POINTER field of the WARD LOCATION File
  • CROSS-REFERENCE:  ^^TRIGGER^42^44
    1)= X ^DD(44,42,1,1,1.3) I X S X=DIV S I(0,0)=$S($D(D0):D0,1:""),D0=DIV S:'$D(^DIC(42,+D0,0)) D0=-1 S DIV(0)=D0 S Y(101)=$S($D(^DIC(42,D0,44)):^(44),1:"") S X=$P(Y(101),U,1),X=X S X=X S D0=I(0,0) S DIU=X K Y X ^DD(44,42,1,
    1,1.1) X ^DD(44,42,1,1,1.4)
    1.1)= S X=DIV S X=$S('$D(D0):"",D0<0:"",1:D0)
    1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X X ^DD(44,42,1,1,69.2) S X=X S Y=X,X=Y(1),X=X S X=X'=Y S D0=I(0,0)
    1.4)= S DIH=$S($D(^DIC(42,DIV(0),44)):^(44),1:""),DIV=X I $D(^(0)) S %=$P(DIH,U,2,999),DIU=$P(DIH,U,1),^(44)=DIV_$S(%]"":U_%,1:""),DIH=42,DIG=44 D ^DICR:$N(^DD(DIH,DIG,1,0))>0
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S I(0,0)=$S($D(D0):D0,1:""),D0=DIV S:'$D(^DIC(42,+D0,0)) D0=-1 S DIV(0)=D0 S Y(101)=$S($D(^DIC(42,D0,44)):^(44),1:"") S X=$P(Y(101),U,1),X=X S X=X S D0=I(0,0) S DIU=X K Y S X="" X ^DD(44,4
    2,1,1,2.4)
    2.4)= S DIH=$S($D(^DIC(42,DIV(0),44)):^(44),1:""),DIV=X I $D(^(0)) S %=$P(DIH,U,2,999),DIU=$P(DIH,U,1),^(44)=DIV_$S(%]"":U_%,1:""),DIH=42,DIG=44 D ^DICR:$N(^DD(DIH,DIG,1,0))>0
    69.2)= S I(0,0)=$S($D(D0):D0,1:"") S X=$S('$D(D0):"",D0<0:"",1:D0),Y(1)=X,D0=Y(0) S:'$D(^DIC(42,+D0,0)) D0=-1 S Y(101)=$S($D(^DIC(42,D0,44)):^(44),1:"") S X=$P(Y(101),U,1)
    CREATE CONDITION)= NUMBER'=INTERNAL(WARD LOCATION FILE POINTER:HOSPITAL LOCATION FILE POINTER)
    CREATE VALUE)= NUMBER
    DELETE VALUE)= @
    FIELD)= WARD LOCATION FILE POINTER:HOSPITAL LOCATION FILE POINTER
50.01 OCCASION OF SERVICE CLINIC? OOS;1 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  OCT 09, 1996
  • HELP-PROMPT:  Do not edit...this is controlled by a scheduling API call.
  • DESCRIPTION:  This field is non-editable. It is created automatically by a scheduling API and must NOT be edited by the site. It designates clinic locations added by ancillary packages for occasions of service. These clinics can not
    be edited through Scheduling options.  They can only be altered using the API.
    WRITE AUTHORITY:  ^
  • CROSS-REFERENCE:  44^AOOS
    1)= S ^SC("AOOS",$E(X,1,30),DA)=""
    2)= K ^SC("AOOS",$E(X,1,30),DA)
    3)= This cross-reference stores only occasion of service clinics
    This cross-reference will show those clinics which are flagged as occasions of service.  These clinics are not editable through scheduling software.  They are created with APIs contained the routine SCDXUAPI.
50.02 OOS CALLING PACKAGE OOS;2 POINTER TO PACKAGE FILE (#9.4) PACKAGE(#9.4)

  • LAST EDITED:  OCT 16, 1996
  • HELP-PROMPT:  This is the package which created this occasion of service location
  • DESCRIPTION:  
    This field stores the package which created the occasion of service location.  This field should NOT be altered by the site.  It is uneditable through FileMan.
    WRITE AUTHORITY:  ^
60 PATIENT FRIENDLY NAME PA;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<3) X
  • LAST EDITED:  FEB 11, 2015
  • HELP-PROMPT:  Enter a clinic description (3-80 chars) that's meaningful to patients.
  • DESCRIPTION:  
    Populate this field with a description of the clinic that will be meaningful to patients. Do not enter any sensitive patient information in this field such as HIV CLINIC as an example.
61 DIRECT PATIENT SCHEDULING? PA;2 SET
************************REQUIRED FIELD************************
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  FEB 11, 2016
  • HELP-PROMPT:  Enter 'Yes' if patients can self-schedule into this clinic.
  • DESCRIPTION:  
    This field will determine if patients can self-schedule into this clinic. A "Yes" in this field will enable patients to directly schedule appointments into this clinic.
  • AUDIT:  YES, ALWAYS
62 DISPLAY CLIN APPT TO PATIENTS? PA;3 SET
************************REQUIRED FIELD************************
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  FEB 11, 2016
  • HELP-PROMPT:  Enter 'Yes' if clinic appointment will be displayed to patients.
  • DESCRIPTION:  This field will determine if the clinic appointment information will be displayed to patients. A "Yes" in this field will enable patients to see their appointments in this clinic. If DIRECT PATIENT SCHEDULING? (#61) is set
    to YES, this field defaults to YES and is not editable.
  • AUDIT:  YES, ALWAYS
99 TELEPHONE 99;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>13!($L(X)<3) X
  • LAST EDITED:  MAR 22, 1984
  • HELP-PROMPT:  ANSWER MUST BE 3-13 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Telephone number for specific location.
99.1 TELEPHONE EXTENSION 99.1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>26!($L(X)<1) X
  • LAST EDITED:  SEP 08, 2014
  • HELP-PROMPT:  Answer must be 1-26 characters in length.
  • DESCRIPTION:  
    Clinic telephone extension number where patients can call directly.
101 ASSOCIATED LOCATION TYPES LOC;0 POINTER Multiple #44.101 44.101
1900 APPOINTMENT S;0 DATE Multiple #44.001 44.001

  • DESCRIPTION:  
    Appointment multiple stores all data related to outpatient visits including basic demographic data on a patient, appointment data, lab, x-ray and EKG appointment dates/times.
    WRITE AUTHORITY:  ^
1901 CANCEL DATE/TIME BEGIN SDCAN;0 DATE Multiple #44.05 44.05

  • DESCRIPTION:  
    Cancellation date/time beginning for a clinic.
1906 CHART CHECK C;0 DATE Multiple #44.006 44.006

  • DESCRIPTION:  
    Does user want the chart checked for availability for this clinic.
1910 SPECIAL INSTRUCTIONS SI;0 Multiple #44.03 44.03

  • DESCRIPTION:  
    Special instructions (free text) entered by clerk at time of making the appointment.
1912 LENGTH OF APP'T SL;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>240)!(X<10)!(X?.E1"."1N.N)!($S('(X#10):0,'(X#15):0,1:1)) X I $D(X) S SDLA=X I $D(^SC(DA,"SL")),+$P(^("SL"),U,6) S SDZ0=$P(^("SL"),U,6),SDZ1=60\SDZ0 I X#SDZ1 D LAPPT^SDUTL
  • LAST EDITED:  FEB 19, 1986
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 10 AND 240 -- MUST BE A MULTIPLE OF 10 OR 15
  • DESCRIPTION:  
    Length of appointment designated for clinic.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
1913 VARIABLE APP'NTMENT LENGTH SL;2 SET
  • 'V' FOR YES, VARIABLE LENGTH;

  • DESCRIPTION:  
    Does the clinic have variable appointment lengths?  Can, if length of appointment is 10 minutes, user make longer appointments in increments of 10 at time of making appointment?
1914 HOUR CLINIC DISPLAY BEGINS SL;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>16)!(X<0)!(X?.E1"."1N.N) X
  • HELP-PROMPT:  (0-16), IF OTHER THAN 8AM
  • DESCRIPTION:  
    The hour clinic will begin displaying availability (i.e. 8AM).
1915 HOLD SC SLOTS UNTIL # OF DAYS SL;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>365)!(X<1)!(X?.E1"."1N.N) X
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 365
  • DESCRIPTION:  
    Should service connected slots be held open for a set number of days?  Service connected veterans have priority over NSC veterans when scheduling appointments.
1916 PRINCIPAL CLINIC SL;5 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),""^"",3)=""C"",'$G(^(""OOS""))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  DEC 03, 1996
  • DESCRIPTION:  
    Principal clinic or main clinic assigned to a specific location.
  • SCREEN:  S DIC("S")="I $P(^(0),""^"",3)=""C"",'$G(^(""OOS""))"
  • EXPLANATION:  PRINCIPAL CLINIC MUST BE A CLINIC
  • EXECUTABLE HELP:  W !,"IF ENROLLMENT IN THIS CLINIC IS EQUIVALENT TO ENROLLMENT IN A LARGER ONE,",!,"ENTER THAT LARGER CLINIC'S NAME",!
1917 DISPLAY INCREMENTS PER HOUR SL;6 SET
************************REQUIRED FIELD************************
  • '1' FOR 60-MIN ;
  • '2' FOR 30-MIN ;
  • '4' FOR 15-MIN ;
  • '3' FOR 20-MIN ;
  • '6' FOR 10-MIN ;

  • INPUT TRANSFORM:  S ZSI=$S(X=1!(X=2)!(X=3)!(X=4)!(X=6):60/X,1:0),SDLA=$S('$D(^SC(DA,"SL")):0,1:+^("SL")) K:('SDLA)!('ZSI) SDLA,ZSI,X Q:'$D(X) I SDLA#ZSI>0 X ^DD(44,1917,9.2) Q
    9.2 = I SDLA#ZSI>0 W !,"INCREMENTS PER HOUR INCONSISTENT WITH ",SDLA,"-MINUTE APPOINTMENT LENGTH" K X,ZSI,SDLA Q
  • LAST EDITED:  MAY 24, 1989
  • HELP-PROMPT:  THIS FIELD ***SHOULD NOT BE EDITED*** ONCE AVAILABILITY HAS BEEN CREATED!!
  • DESCRIPTION:  This field SHOULD NOT BE EDITED when patterns have been established using another increment per hour. Editing this field will cause existing patterns to be erroneous and scheduling conflicts may also occur if the
    increments are changed.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
1918 OVERBOOKS/DAY MAXIMUM SL;7 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  JAN 29, 1989
  • HELP-PROMPT:  ENTER THE NUMBER OF ALLOWABLE OVERBOOKS PER DAY. IF OVERBOOKS ARE NOT ALLOWED, ENTER ZERO.
  • DESCRIPTION:  
    Number of allowable overbooks per day.  If overbooks are not allowed, the number should be set to zero.
1918.5 SCHEDULE ON HOLIDAYS? SL;8 SET
  • 'Y' FOR YES;

  • LAST EDITED:  MAR 17, 1986
  • HELP-PROMPT:  RESPOND YES IF SCHEDULING IS ALLOWED FOR THIS CLINIC ON ALL HOLIDAYS
  • DESCRIPTION:  
    Should the user be able to schedule appointments on holiday's for specific location?
1919 COPIES 0;14 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>20)!(X<1)!(X?.E1"."1N.N) X
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 20
  • DESCRIPTION:  
    How many copies of appointment lists should be generated for this clinic?
1920 AVAILABILITY T;0 DATE Multiple #44.002 44.002

  • DESCRIPTION:  
    Multiple that stores clinic availability information.
1920.9 AVAILABILITY FLAG STT;1 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • DESCRIPTION:  
    Date/time set up for clinic availability.
1921 PATTERN ST;0 DATE Multiple #44.005 44.005

  • DESCRIPTION:  
    Pattern for clinic availability information.
    WRITE AUTHORITY:  ^
1921.5 SPECIAL PATTERN OST;0 DATE Multiple #44.0002 44.0002

  • DESCRIPTION:  
    Special pattern information (storage of previous clinic patterns and current one).
    WRITE AUTHORITY:  ^
1922 SUNDAY TEMPLATE T0;0 Multiple #44.06 44.06

  • DESCRIPTION:  
    This field contains the patterns and limit dates applicable to scheduling appointments on Sundays.  These fields are overridden by patterns entered for a specific (Sunday) date and stored on the "OST" nodes.
  • DELETE TEST:  .01,0)= I '$D(SDSCHED) W !,"ZZZ",!,*7,"You cannot delete this field using fileman!!!"
    WRITE AUTHORITY:  ^
1923 MONDAY TEMPLATE T1;0 Multiple #44.07 44.07

  • DESCRIPTION:  
    This field contains the patterns and limit dates applicable to scheduling appointments on Mondays.  These fields are overridden by patterns entered for a specific (Monday) date and stored on the "OST" nodes.
  • DELETE TEST:  .01,0)= I '$D(SDSCHED) W !,*7,"You cannot delete this field using fileman!!!"
    WRITE AUTHORITY:  ^
1924 TUESDAY TEMPLATE T2;0 Multiple #44.08 44.08

  • DESCRIPTION:  
    This field contains the patterns and limit dates applicable to scheduling appointments on Tuesdays.  These fields are overridden by patterns entered for a specific (Tuesday) date and stored on the "OST" nodes.
  • DELETE TEST:  .01,0)= I '$D(SDSCHED) W !,*7,"You cannot delete this field using fileman!!!"
    WRITE AUTHORITY:  ^
1925 WEDNESDAY TEMPLATE T3;0 Multiple #44.09 44.09

  • DESCRIPTION:  
    This field contains the patterns and limit dates applicable to scheduling appointments on Wednesdays.  These fields are overridden by patterns entered for a specific (Wednesday) date and stored on the "OST" nodes.
  • DELETE TEST:  .01,0)= I '$D(SDSCHED) W !,*7,"You cannot delete this field using fileman!!!"
    WRITE AUTHORITY:  ^
1926 THURSDAY TEMPLATE T4;0 Multiple #44.008 44.008

  • DESCRIPTION:  
    This field contains the patterns and limit dates applicable to scheduling appointments on Thursdays.  These fields are overridden by patterns entered for a specific (Thursday) date and stored on the "OST" nodes.
  • DELETE TEST:  .01,0)= I '$D(SDSCHED) W !,*7,"You cannot delete this field using fileman!!!"
    WRITE AUTHORITY:  ^
1927 FRIDAY TEMPLATE T5;0 Multiple #44.009 44.009

  • DESCRIPTION:  
    This field contains the patterns and limit dates applicable to scheduling appointments on Fridays.  These fields are overridden by patterns entered for a specific (Friday) date and stored on the "OST" nodes.
  • DELETE TEST:  .01,0)= I '$D(SDSCHED) W !,*7,"You cannot delete this field using fileman!!!"
    WRITE AUTHORITY:  ^
1928 SATURDAY TEMPLATE T6;0 Multiple #44.0001 44.0001

  • DESCRIPTION:  
    This field contains the patterns and limit dates applicable to scheduling appointments on Saturdays.  These fields are overridden by patterns entered for a specific (Saturday) date and stored on the "OST" nodes.
  • DELETE TEST:  .01,0)= I '$D(SDSCHED) W !,*7,"You cannot delete this field using fileman!!!"
    WRITE AUTHORITY:  ^
2000 REQUIRE X-RAY FILMS? RAD;1 SET
  • 'Y' FOR YES;

  • LAST EDITED:  SEP 16, 1983
  • DESCRIPTION:  
    Will x-ray films be required for patients scheduled in this clinic?
2000.5 REQUIRE ACTION PROFILES? PS;1 SET
************************REQUIRED FIELD************************
  • '0' FOR YES;
  • '1' FOR NO;

  • LAST EDITED:  JUL 22, 1986
  • DESCRIPTION:  
    Will pharmacy action profiles be required for patients scheduled in this clinic?
2001 ALLOWABLE CONSECUTIVE NO-SHOWS SDP;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 16, 1983
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 0 AND 999
  • DESCRIPTION:  
    This is the number of times in a row that a patient can be a no-show in a clinic before he/she is flagged for possible discharge from the clinic.
2002 MAX # DAYS FOR FUTURE BOOKING SDP;2 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<11)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 16, 1983
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 11 AND 999
  • DESCRIPTION:  
    Maximum number of days that can be available when clerk searching for open clinic slots in the future.
2003 START TIME FOR AUTO REBOOK SDP;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>16)!(X<0)!(X?.E1"."1N.N) X I $D(X),$D(^SC(DA,"SL")) I X<$S('$P(^("SL"),"^",3):8,1:$P(^("SL"),"^",3)) W !,*7,"MUST NOT BE EARLIER THAN CLINIC START TIME" K X
  • LAST EDITED:  OCT 08, 1986
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 0 AND 16, ONLY IF REBOOKING IS NOT TO BEGIN AT EARLIEST TIME
  • DESCRIPTION:  Start time (hour of day) that should be searched for when user auto rebooking an appointment. For example, if the clinic regularly starts at 8am, user may wish to set this parameter to 9am so that the next available slot
    at 9am or later will be stuffed with new appointment.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
2004 COLLATERAL VISITS? (Y OR N) 0;16 SET
************************REQUIRED FIELD************************
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  FEB 28, 1984
  • DESCRIPTION:  
    Are collateral visits allowed to this clinic? Yes or No
2005 MAX # DAYS FOR AUTO-REBOOK SDP;4 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>365)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 07, 1984
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 365
  • DESCRIPTION:  Maximum number of days the system can be set to search up to when auto rebooking appointments. For instance, if an appointment to this clinic is cancelled and the latest time that should be allowed for rescheduling is a
    period of two weeks (set parameter), then auto rebook function will quit after searching a two week period in future for available slots.
2006 *RECORD TRACKING COMMUNICATION R;1 SET
  • 'M' FOR MESSAGE;
  • 'N' FOR NOTICE;

  • LAST EDITED:  JUN 11, 1984
2007 *COMMUNICATION FORMAT R;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  SEP 18, 2014
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • TECHNICAL DESCR:  
    This field is no longer used. It was a pointer to File (#44.8) which no longer exists.
2008 *RECORD REQUEST DEVICE R;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<2) X
  • LAST EDITED:  JUN 11, 1984
  • HELP-PROMPT:  ANSWER MUST BE 2-20 CHARACTERS IN LENGTH
2009 *RT AT HOME RETREIVER R;4 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • LAST EDITED:  JUN 11, 1984
2010 *RT NOT AT HOME RETREIVER R;5 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • LAST EDITED:  JUN 11, 1984
2011 *RECORD REQUEST PRIORITY DT;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUN 11, 1984
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 1 AND 99
2012 *RECORD APPOINTMENT STATUS DT;2 SET
  • '1' FOR ASK APPOINTMENT DATE;
  • '0' FOR DON'T ASK APPOINTMENT DATE;

  • LAST EDITED:  JUN 11, 1984
2500 PROHIBIT ACCESS TO CLINIC? SDPROT;1 SET
  • 'Y' FOR YES;

  • LAST EDITED:  JUN 12, 1984
  • DESCRIPTION:  
    Should only privileged users have access to book to this clinic?
2501 PRIVILEGED USER SDPRIV;0 POINTER Multiple #44.04 44.04

  • DESCRIPTION:  Privileged users set up to have access to book to clinic. Once one privileged user is entered into this multiple, no other user will have access to book to the clinic. Each individual who should have access to clinic
    must be entered one at a time.
2502 NON-COUNT CLINIC? (Y OR N) 0;17 SET
************************REQUIRED FIELD************************
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  MAR 11, 2010
  • HELP-PROMPT:  If appointments to this clinic should not impact MAS AMIS statistics, answer 'Y'.
  • DESCRIPTION:  
    Is this clinic to be a non-count clinic for workload purposes? OR Are visits to this clinic to be included in workload statistics?
  • AUDIT:  YES, ALWAYS
  • CROSS-REFERENCE:  ^^TRIGGER^44^2502.5
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^SC(D0,0)):^(0),1:"") S X=$P(Y(1),U,21),X=X S DIU=X K Y S X="" X ^DD(44,2502,1,1,1.4)
    1.4)= S DIH=$S($D(^SC(DIV(0),0)):^(0),1:""),DIV=X X "F %=0:0 Q:$L($P(DIH,U,20,99))  S DIH=DIH_U" S %=$P(DIH,U,22,999),DIU=$P(DIH,U,21),^(0)=$P(DIH,U,1,20)_U_DIV_$S(%]"":U_%,1:""),DIH=44,DIG=2502.5 D ^DICR:$N(^DD(DIH,DIG,1,
    0))>0
    2)= Q
    CREATE VALUE)= @
    DELETE VALUE)= NO EFFECT
    FIELD)= INCL
2502.5 INCLUDE ON FILE ROOM LISTS? 0;21 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  OCT 01, 1986
  • DESCRIPTION:  
    This field should contain a Yes if this is a non-count clinic that should be included on the file room lists.
  • NOTES:  TRIGGERED by the NON-COUNT CLINIC? (Y OR N) field of the HOSPITAL LOCATION File
2503 CREDIT STOP CODE 0;18 POINTER TO CLINIC STOP FILE (#40.7) CLINIC STOP(#40.7)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)'=900&$S('$P(^(0),U,3):1,$P(^(0),U,3)>DT:1,1:0),""SE""[$P(^(0),U,6),$S('$P(^(0),U,7):1,$P(^(0),U,7)'>DT:1,1:0)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAR 11, 2010
  • HELP-PROMPT:  Enter the Stop Code which should be credited for an appointment to this clinic (only if Code different than the one assigned to this clinic).
  • DESCRIPTION:  
    Appointments to this clinic will receive this stop code credit in addition to the 'normal' stop code credit if a stop code different from the 'normal' stop code for this clinic is entered here.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)'=900&$S('$P(^(0),U,3):1,$P(^(0),U,3)>DT:1,1:0),""SE""[$P(^(0),U,6),$S('$P(^(0),U,7):1,$P(^(0),U,7)'>DT:1,1:0)"
  • EXPLANATION:  Inactive stop codes are invalid. Stop code 900 can not be used for a clinic. Stop code must have a restriction type of "Secondary" or "Either" and not have a future restriction date.
  • AUDIT:  YES, ALWAYS
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • FIELD INDEX:  ACST (#457) REGULAR IR SORTING ONLY
    Short Descr:  Index credit stop codes
    Description:  This index can be used to find all hospital locations in a credit stop code.
    Set Logic:  S ^SC("ACST",X,DA)=""
    Kill Logic:  K ^SC("ACST",X,DA)
    Whole Kill:  K ^SC("ACST")
    X(1):  CREDIT STOP CODE  (44,2503)  (Subscr 1)  (forwards)
2503.1 PRV. YEAR CREDIT STOP CODE OC;2 POINTER TO CLINIC STOP FILE (#40.7) CLINIC STOP(#40.7)

  • INPUT TRANSFORM:  K:X X
  • LAST EDITED:  AUG 01, 1988
  • DESCRIPTION:  
    Previous year's credit stop code assigned to clinic.
    WRITE AUTHORITY:  ^
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
2504 CLINIC MEETS AT THIS FACILITY? 0;19 SET
************************REQUIRED FIELD************************
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  SEP 19, 1984
  • DESCRIPTION:  
    Does clinic meet at designated facility?
2505 INACTIVATE DATE I;1 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 11, 2010
  • HELP-PROMPT:  This date will be the date from which this clinic is considered inactive
  • DESCRIPTION:  
    Date clinic was inactivated.
  • AUDIT:  YES, ALWAYS
2506 REACTIVATE DATE I;2 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 11, 2010
  • HELP-PROMPT:  This date will be the date from which this clinic is considered active again. It must have been previously inactivated.
  • DESCRIPTION:  
    Date clinic was reactivated.
  • AUDIT:  YES, ALWAYS
2507 DEFAULT APPOINTMENT TYPE AT;1 POINTER TO APPOINTMENT TYPE FILE (#409.1) APPOINTMENT TYPE(#409.1)

  • INPUT TRANSFORM:  S DIC("S")="I '$P(^(0),U,3)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  APR 05, 1988
  • DESCRIPTION:  
    The default or usual appointment type to be associated with this clinic.
  • SCREEN:  S DIC("S")="I '$P(^(0),U,3)"
  • EXPLANATION:  Choose from active appointment types.
2508 NO SHOW LETTER LTR;1 POINTER TO LETTER FILE (#407.5) LETTER(#407.5)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),""^"",2)=""N""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 27, 1990
  • DESCRIPTION:  
    Enter the no-show letter to be associated with this clinic, so if patient does not show for appointment, this specific no-show letter will print as opposed to the generic no-show letter.
  • SCREEN:  S DIC("S")="I $P(^(0),""^"",2)=""N"""
  • EXPLANATION:  LETTER MUST BE NO-SHOW TYPE
  • CROSS-REFERENCE:  44^ALTN
    1)= S ^SC("ALTN",$E(X,1,30),DA)=""
    2)= K ^SC("ALTN",$E(X,1,30),DA)
2509 PRE-APPOINTMENT LETTER LTR;2 POINTER TO LETTER FILE (#407.5) LETTER(#407.5)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),""^"",2)=""P""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 27, 1990
  • DESCRIPTION:  
    Enter the pre-appointment letter to be associated with this clinic, so if letters are generated, this specific pre-appointment letter will print as opposed to the generic pre-appointment letter.
  • SCREEN:  S DIC("S")="I $P(^(0),""^"",2)=""P"""
  • EXPLANATION:  LETTER MUST BE PRE-APPOINTMENT TYPE
  • CROSS-REFERENCE:  44^ALTP
    1)= S ^SC("ALTP",$E(X,1,30),DA)=""
    2)= K ^SC("ALTP",$E(X,1,30),DA)
2510 CLINIC CANCELLATION LETTER LTR;3 POINTER TO LETTER FILE (#407.5) LETTER(#407.5)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),""^"",2)=""C""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 27, 1990
  • DESCRIPTION:  
    Enter the clinic cancellation letter to be associated with this clinic, so if clinic is cancelled, this letter will print as opposed to generic clinic cancellation letter.
  • SCREEN:  S DIC("S")="I $P(^(0),""^"",2)=""C"""
  • EXPLANATION:  LETTER MUST BE CLINIC CANCELLATION TYPE
  • CROSS-REFERENCE:  44^ALTC
    1)= S ^SC("ALTC",$E(X,1,30),DA)=""
    2)= K ^SC("ALTC",$E(X,1,30),DA)
2511 APPT. CANCELLATION LETTER LTR;4 POINTER TO LETTER FILE (#407.5) LETTER(#407.5)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),""^"",2)=""A""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 27, 1990
  • DESCRIPTION:  
    Enter appointment cancellation letter to be associated with this clinic, so if veteran cancels appointment, this letter will print as opposed to generic appointment cancellation letter.
  • SCREEN:  S DIC("S")="I $P(^(0),""^"",2)=""A"""
  • EXPLANATION:  LETTER MUST BE PATIENT CANCELLATION TYPE
  • CROSS-REFERENCE:  44^ALTA
    1)= S ^SC("ALTA",$E(X,1,30),DA)=""
    2)= K ^SC("ALTA",$E(X,1,30),DA)
2600 PROVIDER PR;0 POINTER Multiple #44.1 44.1

  • DESCRIPTION:  Enter in this field the providers associated with this clinic. These providers will then be displayed when updating the provider through Appointment Management or Check Out to assist the user in entering the correct
    provider.
2700 DIAGNOSIS DX;0 POINTER Multiple #44.11 44.11

  • DESCRIPTION:  
    These are the diagnoses associated with this clinic.  These diagnoses will be displayed when updating the diagnosis through Appointment Management or Check Out to assist the user in entering the correct diagnosis.
2800 TEAM POSITIONS PCMM;0 POINTER Multiple #44.40457 44.40457

  • DESCRIPTION:  
    This contains one or more team positions that have this clinic as an 'ASSOCIATE CLINIC' - defined in the TEAM POSITION (#404.57) File.
  • SCREEN:  S DIC("S")="I $D(^SC(Y))#2"
  • EXPLANATION:  This ensures that only clinics that are 'associated
2801 DEFAULT TO PC PRACTITIONER? PC;1 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  MAR 29, 1996
  • HELP-PROMPT:  Should PC Practitioner be default if no default provider?
  • DESCRIPTION:  
    This only is relevant if there is no default provider.  If so, if there is a current primary care practitioner for the patient - it will be provided as the default provider.
2802 ADMINISTER INPATIENT MEDS? 0;25 SET
  • '1' FOR YES;

  • LAST EDITED:  APR 24, 2003
  • HELP-PROMPT:  Respond YES only if the clinic is authorized to dispense inpatient medications to outpatients.
  • DESCRIPTION:  
    This field should contain a YES only if the clinic location is authorized to dispense inpatient medications to outpatients.
  • CROSS-REFERENCE:  44^AE
    1)= S ^SC("AE",$E(X,1,30),DA)=""
    2)= K ^SC("AE",$E(X,1,30),DA)
22900 AUTOFINISH RX SITE AFRXSITE;1 POINTER TO OUTPATIENT SITE FILE (#59) OUTPATIENT SITE(#59)

  • LAST EDITED:  MAY 02, 2007
  • HELP-PROMPT:  Enter outpatient site this location is associated with.
  • DESCRIPTION:  
    This field is a pointer to File#59, Outpatient Site, that this hospital location is associated with.  If this field is not set autofinishing of Rx's for this hospital location will not take place.
22901 AUTOFINISH CLINIC PRINTER AFRXCLINPRNT;1 POINTER TO DEVICE FILE (#3.5) DEVICE(#3.5)

  • LAST EDITED:  MAY 02, 2007
  • HELP-PROMPT:  Enter printer where autofinished Rx's for this clinic will be printed.
  • DESCRIPTION:  
    Printer where autofinished Rx's will print for a particular clinic.

Found Entries, Total: 2

NAME: LAB DIV 050 OOS ID 108    NAME: SECURE MESSAGING    

External References

Name Field # of Occurrence
^%DT 1920.9+1, 2505+1, 2506+1
EN^DDIOL IDWRITE+1
^DIC 8+1, 16+1, 31+1, 1916+1, 2503+1, 2507+1, 2508+1, 2509+1, 2510+1, 2511+1
^DICR .01(XREF 2n1.4), .01(XREF 12n1.4), 2(XREF 1n1.4), 42(XREF 1n1.4), 42(XREF 1n2.4), 2502(XREF 1n1.4)
^RTP6 .01(XREF 10K)
$$PRDEF^SDCO31 IDWRITE+1
A44S^SDEC03 1(XREF 2S)
N44S^SDEC03 .01(XREF 4S)
LAPPT^SDUTL 1912+1
HELP^SDUTL2 16(HELP )

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" .01(XREF 10K)
^DD( .01(XREF 2n1.4), .01(XREF 12n1.4), 2(XREF 1n1.4), 42(XREF 1n1.4), 42(XREF 1n2.4), 2502(XREF 1n1.4)
^DD(44 .01(XREF 2S), .01(XREF 12S), 2(XREF 1S), 42(XREF 1S), 42(XREF 1n1.3), 42(XREF 1K), 2502(XREF 1S)
^DIC(40.9 - [#40.9] 2(XREF 1n1.1), 2.1+1, 2.1(XREF 1S), 2.1(XREF 1K)
^DIC(42 - [#42] .01(XREF 2n1.3), .01(XREF 2n1.4), .01(XREF 2n89.2), 42+1, 42(XREF 1S), 42(XREF 1n1.4), 42(XREF 1K), 42(XREF 1n2.4), 42(XREF 1n69.2)
^SC - [#44] .01DEL.01+1, .01DEL1900+1, .01(XREF 2n1.3), .01(XREF 2n89.2), .01(XREF 12n1.3), .01(XREF 12n89.2), 2(XREF 1S), 2(XREF 1n1.4), 2.1+1, 2.1(HELP )
, 42+1, 1912+1, 2003+1, 2502(XREF 1S), 2502(XREF 1n1.4)
^SC("AC" 2.1(XREF 1S), 2.1(XREF 1K)
^SC("ACST" IXACSTSL+1*, IXACSTKL+1!, IXACSTKEIC+1!
^SC("AE" 2802(XREF 1S), 2802(XREF 1K)
^SC("AG" IXAGSL+1*, IXAGKL+1!, IXAGKEIC+1!
^SC("ALTA" 2511(XREF 1S), 2511(XREF 1K)
^SC("ALTC" 2510(XREF 1S), 2510(XREF 1K)
^SC("ALTN" 2508(XREF 1S), 2508(XREF 1K)
^SC("ALTP" 2509(XREF 1S), 2509(XREF 1K)
^SC("AOOS" 50.01(XREF 1S), 50.01(XREF 1K)
^SC("ASCRPW" 31(XREF 1S), 31(XREF 1K)
^SC("AST" IXASTSL+1*, IXASTKL+1!, IXASTKEIC+1!
^SC("B" .01(XREF 1S), .01(XREF 1K)
^SC("C" 1(XREF 1S), 1(XREF 1K)
^SCRS(403.12 .01(XREF 12n1.3), .01(XREF 12n1.4), .01(XREF 12n89.2)

Naked Globals

Name Field # of Occurrence
^("SL" 1912+1, 2003+1
^(0 IDWRITE+1, .01(XREF 2n1.3), .01(XREF 2n1.4), .01(XREF 2n89.2), .01(XREF 12n1.3), .01(XREF 12n1.4), .01(XREF 12n89.2), 2(XREF 1S), 2(XREF 1n1.4), 2.1+1
2.1(XREF 1S), 2.1(XREF 1K), 42(XREF 1n1.4), 42(XREF 1n2.4), 2502(XREF 1S), 2502(XREF 1n1.4)
^(42 .01(XREF 2n1.3), .01(XREF 2n89.2)
^(44 42+1, 42(XREF 1S), 42(XREF 1n1.4), 42(XREF 1K), 42(XREF 1n2.4), 42(XREF 1n69.2)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % .01(XREF 2n1.4), 2(XREF 1n1.4), 42(XREF 1n1.4), 42(XREF 1n2.4), 2502(XREF 1n1.4)
>> %DT 1920.9+1*, 2505+1*, 2506+1*
>> D0 .01DEL.01+1, .01(XREF 2S), .01(XREF 2n1.3), .01(XREF 2n89.2), .01(XREF 12S), .01(XREF 12n1.3), .01(XREF 12n89.2), 2(XREF 1S), 42(XREF 1S), 42(XREF 1n1.1)
42(XREF 1n1.3), 42(XREF 1K), 42(XREF 1n69.2), 2502(XREF 1S)
>> DA IXACSTSL+1, IXACSTKL+1, IXAGSL+1, IXAGKL+1, IXASTSL+1, IXASTKL+1, .01DEL1900+1, .01(XREF 1S), .01(XREF 1K), .01(XREF 2n1.3)
.01(XREF 4S), .01(XREF 12n1.3), 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 2(XREF 1S), 2.1+1, 2.1(HELP ), 2.1(XREF 1S), 2.1(XREF 1K)
31(XREF 1S), 31(XREF 1K), 42+1, 42(XREF 1n1.3), 42(XREF 1K), 50.01(XREF 1S), 50.01(XREF 1K), 1912+1, 2003+1, 2502(XREF 1S)
2508(XREF 1S), 2508(XREF 1K), 2509(XREF 1S), 2509(XREF 1K), 2510(XREF 1S), 2510(XREF 1K), 2511(XREF 1S), 2511(XREF 1K), 2802(XREF 1S), 2802(XREF 1K)
DIC 8+1!*, 16+1!*, 31+1!*, 1916+1!*, 2503+1!*, 2507+1!*, 2508+1!*, 2509+1!*, 2510+1!*, 2511+1!*
DIC("S" 2.1(HELP ), 8+1*, 8SCR+1*, 16+1*, 16SCR+1*, 31+1*, 31SCR+1*, 1916+1*, 1916SCR+1*, 2503+1*
, 2503SCR+1*, 2507+1*, 2507SCR+1*, 2508+1*, 2508SCR+1*, 2509+1*, 2509SCR+1*, 2510+1*, 2510SCR+1*, 2511+1*
, 2511SCR+1*
>> DIE 8+1, 16+1, 31+1, 1916+1, 2503+1, 2507+1, 2508+1, 2509+1, 2510+1, 2511+1
>> DIG .01(XREF 2n1.4), .01(XREF 12n1.4), 2(XREF 1n1.4), 42(XREF 1n1.4), 42(XREF 1n2.4), 2502(XREF 1n1.4)
>> DIH .01(XREF 2n1.4), .01(XREF 12n1.4), 2(XREF 1n1.4), 42(XREF 1n1.4), 42(XREF 1n2.4), 2502(XREF 1n1.4)
>> DIU .01(XREF 2S), .01(XREF 2n1.4), .01(XREF 12S), 2(XREF 1S), 2(XREF 1n1.4), 42(XREF 1S), 42(XREF 1n1.4), 42(XREF 1K), 42(XREF 1n2.4), 2502(XREF 1S)
2502(XREF 1n1.4)
DIV .01(XREF 2S), .01(XREF 2n1.3), .01(XREF 2n1.4), .01(XREF 12S), .01(XREF 12n1.3), .01(XREF 12n1.4), 2(XREF 1S), 2(XREF 1n1.1), 2(XREF 1n1.4), 42(XREF 1S)
42(XREF 1n1.1), 42(XREF 1n1.3), 42(XREF 1n1.4), 42(XREF 1K), 42(XREF 1n2.4), 2502(XREF 1S), 2502(XREF 1n1.4)
DIV(0 .01(XREF 2n1.3), .01(XREF 2n1.4), .01(XREF 2n89.2), .01(XREF 12n1.3), .01(XREF 12n1.4), .01(XREF 12n89.2), 2(XREF 1S), 2(XREF 1n1.4), 42(XREF 1S), 42(XREF 1n1.3)
42(XREF 1n1.4), 42(XREF 1K), 42(XREF 1n2.4), 2502(XREF 1S), 2502(XREF 1n1.4)
DT .01DEL1900+1, 16(HELP )
>> I(0 .01(XREF 2S), .01(XREF 2n89.2), .01(XREF 12S), .01(XREF 12n89.2), 42(XREF 1S), 42(XREF 1n1.3), 42(XREF 1K), 42(XREF 1n69.2)
RTPL .01(XREF 10K)
SCMSG IDWRITE+1~*
SDLA 1912+1*, 1917OF9.2+1!
SDX 2(XREF 1n1.1)
>> SDZ0 1912+1*
>> SDZ1 1912+1*
U IDWRITE+1, .01(XREF 2S), .01(XREF 2n1.3), .01(XREF 2n1.4), .01(XREF 2n89.2), .01(XREF 12S), .01(XREF 12n1.3), .01(XREF 12n1.4), .01(XREF 12n89.2), 2(XREF 1S)
2(XREF 1n1.4), 42(XREF 1S), 42(XREF 1n1.4), 42(XREF 1K), 42(XREF 1n2.4), 42(XREF 1n69.2), 1912+1, 2502(XREF 1S), 2502(XREF 1n1.4)
X IXACSTSL+1, IXACSTKL+1, IXASTSL+1, IXASTKL+1, .01+1!, .01TPL+1*, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2n1.3)
.01(XREF 2n1.4), .01(XREF 4S), .01(XREF 10K), .01(XREF 12S), .01(XREF 12n1.3), .01(XREF 12n1.4), 1+1!, 1(XREF 1S), 1(XREF 1K), 1(XREF 2S)
2(XREF 1S), 2(XREF 1n1.1), 2(XREF 1n1.4), 2.1+1!, 2.1(XREF 1S), 2.1(XREF 1K), 5+1!, 7+1!, 8+1*!, 8.1+1!
, 10+1!, 11+1!, 12+1!, 15+1!, 16+1*!, 29+1!, 31+1*!, 31(XREF 1S), 31(XREF 1K), 42+1!
42(XREF 1S), 42(XREF 1n1.1), 42(XREF 1n1.3), 42(XREF 1n1.4), 42(XREF 1K), 42(XREF 1n2.4), 42(XREF 1n69.2), 50.01(XREF 1S), 50.01(XREF 1K), 60+1!
, 99+1!, 99.1+1!, 1912+1!, 1914+1!, 1915+1!, 1916+1*!, 1917OF9.2+1!, 1918+1!, 1919+1!, 1920.9+1*!
, 2001+1!, 2002+1!, 2003+1!, 2005+1!, 2007+1!, 2008+1!, 2011+1!, 2502(XREF 1S), 2502(XREF 1n1.4), 2503+1*!
, 2503.1+1!, 2505+1*!, 2506+1*!, 2507+1*!, 2508+1*!, 2508(XREF 1S), 2508(XREF 1K), 2509+1*!, 2509(XREF 1S), 2509(XREF 1K)
, 2510+1*!, 2510(XREF 1S), 2510(XREF 1K), 2511+1*!, 2511(XREF 1S), 2511(XREF 1K), 2802(XREF 1S), 2802(XREF 1K)
X(1 IXAGSL+1, IXAGKL+1
X(2 IXAGSL+1, IXAGKL+1
Y IDWRITE+1, .01(XREF 2S), .01(XREF 12S), 2(XREF 1S), 8+1, 16+1, 31+1, 42(XREF 1S), 42(XREF 1n1.3), 42(XREF 1K)
, 1916+1, 1920.9+1, 2502(XREF 1S), 2503+1, 2505+1, 2506+1, 2507+1, 2508+1, 2509+1, 2510+1
, 2511+1
Y(0 .01(XREF 2n1.3), .01(XREF 12n1.3), 42(XREF 1n1.3), 42(XREF 1n69.2)
Y(1 .01(XREF 2n1.3), .01(XREF 2n89.2), .01(XREF 12n1.3), .01(XREF 12n89.2), 2(XREF 1S), 42(XREF 1n1.3), 42(XREF 1n69.2), 2502(XREF 1S)
Y(101 .01(XREF 2S), .01(XREF 2n89.2), .01(XREF 12S), .01(XREF 12n89.2), 42(XREF 1S), 42(XREF 1K), 42(XREF 1n69.2)
ZSI 1917OF9.2+1!
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All