Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BSDROUT2

Package: IHS Changes To Scheduling

Routine: BSDROUT2


Information

BSDROUT2 ; IHS/ANMC/LJF - MORE SUBROUTINES ; [ 10/29/2004 4:59 PM ]

Source Information

Source file <BSDROUT2.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
IHS Changes To Scheduling 2 (CLO,NMO,PCO,TDO)^BSDROUT0  ($$CONF,$$DIV,$$DIVC,$$FAC)^BSDU  
IHS Changes To ADT 1 ($$DEAD,$$DOD,$$HRCN,$$HRCND,$$HRCNT)^BDGF2  
Kernel 1 $$FMTE^XLFDT  
VA Fileman 1 $$GET1^DIQ  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
IHS Changes To Scheduling 2 BSDROUT  BSDROUT1  
Clinical Scheduling for Windows 1 BSDX42  
Scheduling 1 SDROUT  

Entry Points

Name Comments DBIA/ICR reference
HED ;EP -- rerouted from BSDROUT1 if printing short form
STATUS(DFN) ;EP; -- called to check if patient's chart is incomplete
; or pulled for day surgery
; called by BSDROUT1
CRLOOP ;EP; process chart requests for date
; called by BSDROUT for each clinic
; assumes VA variables SDREP,SDX,SDSTART,SDSTOP,ORDER,SDATE are set
CRSET(CLN,DATE,DFN,ORDER) ;EP; process single chart request
; called by CRLOOP and by chart request software
OKAY(C) ; returns 1 if okay to use this clinic

External References

Name Field # of Occurrence
$$DEAD^BDGF2 HED+10
$$DOD^BDGF2 HED+10
$$HRCN^BDGF2 HED+7, CRSET+4
$$HRCND^BDGF2 CRSET+7
$$HRCNT^BDGF2 CRSET+5
CLO^BSDROUT0 CRSET+31
NMO^BSDROUT0 CRSET+18, CRSET+19, CRSET+33
PCO^BSDROUT0 CRSET+32
TDO^BSDROUT0 CRSET+30
$$CONF^BSDU HED+3
$$DIV^BSDU HED+2
$$DIVC^BSDU CRSET+6
$$FAC^BSDU CRSET+4
$$GET1^DIQ HED+2, HED+6, HED+8, CRSET+6, CRSET+16, CRSET+17, CRSET+26, CRSET+27
$$FMTE^XLFDT HED+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HED+1
Function Call: WRITE
  • Prompt: !,"FACILITY: ",$$GET1^DIQ(40.8,$$DIV^BSDU,.01)
  • Line Location: HED+2
Function Call: WRITE
  • Prompt: !?7,"**",$E($$CONF^BSDU,1,25),"**"
  • Line Location: HED+3
Function Call: WRITE
  • Prompt: !,"PAGE ",BSDPG,?10,"OUTPATIENT ROUTING SLIP"
  • Line Location: HED+4
Function Call: WRITE
  • Prompt: !,"NAME: ",$$GET1^DIQ(2,DFN,.01)
  • Line Location: HED+6
Function Call: WRITE
  • Prompt: ?30,"HRCN: ",$$HRCN^BDGF2(DFN,+$G(DUZ(2)))
  • Line Location: HED+7
Function Call: WRITE
  • Prompt: !,"DOB: ",$$GET1^DIQ(2,DFN,.03)
  • Line Location: HED+8
Function Call: WRITE
  • Prompt: ?27,"APPT DT: ",$$FMTE^XLFDT(SDATE,5)
  • Line Location: HED+9
Function Call: WRITE
  • Prompt: !,"** PATIENT DIED ON ",$$DOD^BDGF2(DFN)," **"
  • Line Location: HED+10
Function Call: WRITE
  • Prompt: !
  • Line Location: HED+14
Function Call: WRITE
  • Prompt: !!,"Current Status: INPATIENT on ward ",^DPT(DFN,.1)
  • Line Location: STATUS+6
Function Call: WRITE
  • Prompt: !,"Current Status: ACTIVE INCOMPLETE CHART"
  • Line Location: STATUS+16
Function Call: WRITE
  • Prompt: !?8,$P(^BDGIC(X,0),U,18)
  • Line Location: STATUS+17
Function Call: WRITE
  • Prompt: !?17,"(",$P(^BDGIC(X,0),U,18),")"
  • Line Location: STATUS+18
Function Call: WRITE
  • Prompt: !,"Current Status: ACTIVE DAY SURGERY PATIENT"
  • Line Location: STATUS+22
Function Call: WRITE
  • Prompt: !,"Current Status: DAY SURGERY/SDA PATIENT"
  • Line Location: STATUS+26

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^DG(40.8 - [#40.8] GET1^DIQ
^BSDPAR - [#9009020.2] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ADGDS - [#9009012] STATUS+21
^BDGIC - [#9009016.1] STATUS+13, STATUS+14, STATUS+18
^BDGIC("B" STATUS+11
^DPT - [#2] STATUS+5, STATUS+6
^SC - [#44] CRLOOP+4, CRLOOP+7, CRLOOP+8, CRLOOP+9, OKAY+4, OKAY+5
^SRF("AIHS3" STATUS+25
^TMP("SDRS" CRSET+16, CRSET+17

Label References

Name Line Occurrences
$$OKAY CRLOOP+5
CRSET CRLOOP+11
STATUS HED+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BSDMODE CRSET+2~, CRSET+13*
>> BSDPG HED+4*, HED+12
BSDX CRLOOP+3~, CRLOOP+9*, CRLOOP+10
C OKAY~, OKAY+3, OKAY+4, OKAY+5
CLN CRLOOP+3~, CRLOOP+4*, CRLOOP+5, CRLOOP+7, CRLOOP+8, CRLOOP+9, CRLOOP+11, CRSET~, CRSET+4, CRSET+6
, CRSET+18, CRSET+19, CRSET+30, CRSET+31, CRSET+32, CRSET+33
CRDT CRLOOP+3~
DATE STATUS+24~*, STATUS+26, CRSET~, CRSET+16, CRSET+17, CRSET+18, CRSET+19, CRSET+30, CRSET+31, CRSET+32
, CRSET+33
DFN HED+6, HED+7, HED+8, HED+10, HED+14, STATUS~, STATUS+3, STATUS+5, STATUS+6, STATUS+11
, STATUS+21, STATUS+25, CRLOOP+3~, CRLOOP+8*, CRLOOP+11, CRSET~, CRSET+4, CRSET+16, CRSET+17, CRSET+18
, CRSET+19, CRSET+26, CRSET+27, CRSET+30, CRSET+31, CRSET+32, CRSET+33
DT STATUS+21, STATUS+22, STATUS+24, OKAY+6
DUZ(2 HED+7
FOUND STATUS+9~*, STATUS+11, STATUS+15*
HRCN CRSET+2~, CRSET+4*, CRSET+5, CRSET+7
I CRSET+17~*, CRSET+18
IEN CRLOOP+3~, CRLOOP+6*, CRLOOP+7*, CRLOOP+8, CRLOOP+9
IOF HED+1
ORDER CRLOOP+11, CRSET~, CRSET+15, CRSET+22, CRSET+23, CRSET+26, CRSET+27, CRSET+30, CRSET+31, CRSET+32
>> SDATE HED+9, CRLOOP+7, CRLOOP+8, CRLOOP+9, CRLOOP+11
>> SDCNT HED+1
>> SDREP CRLOOP+10
>> SDSTART CRSET+22, CRSET+26
>> SDSTOP CRSET+23, CRSET+27
>> SDX CRLOOP+10
>> TERM CRSET+5*, CRSET+7*, CRSET+16, CRSET+17, CRSET+18, CRSET+19, CRSET+22, CRSET+23, CRSET+30, CRSET+31
, CRSET+32, CRSET+33
TERN CRSET+2~
U STATUS+13, STATUS+14, STATUS+18, CRLOOP+10, OKAY+4, OKAY+6
>> VAUTC OKAY+3
>> VAUTC( OKAY+3
>> VAUTD OKAY+4
>> VAUTD( OKAY+4
X STATUS+3~, STATUS+11*, STATUS+13, STATUS+14, STATUS+18, STATUS+21~*, STATUS+22, STATUS+24~*, STATUS+25*, STATUS+26
, OKAY+2~, OKAY+4*, OKAY+5*, OKAY+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All