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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ASDROUT2

Package: IHS Changes To Scheduling

Routine: ASDROUT2


Information

ASDROUT2 ; IHS/ADC/PDW/ENM - RS HEADING (SHORT FORM) ; [ 03/25/1999 11:48 AM ]

Source Information

Source file <ASDROUT2.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
IHS Changes To Scheduling 1 ($$CONF1,$$HRN)^ASDUT  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Changes To Scheduling 1 ASDROUT0  

Entry Points

Name Comments DBIA/ICR reference
OVR
SHORT() ;EP -- returns 1 is short rs form wanted
STATUS(DFN) ;EP; -- called to check if patient's chart is incomplete
; or pulled for day surgery
DIV() ; -- returns division ien
APDT() ;EP; returns printable appt date
HED ;EP -- rerouted from SDROUT2 if printing short form
HD ;EP

External References

Name Field # of Occurrence
$$CONF1^ASDUT HED+5
$$HRN^ASDUT HED+7
$$FMTE^XLFDT APDT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HED+1
Function Call: WRITE
  • Prompt: !,"FACILITY: "
  • Line Location: HED+2
Function Call: WRITE
  • Prompt: $S($D(^DG(40.8,+DIV,0)):$P(^(0),U),1:^DD("SITE"))
  • Line Location: HED+3
Function Call: WRITE
  • Prompt: !,"PAGE ",P,?10,"OUTPATIENT ROUTING SLIP"
  • Line Location: HED+4
Function Call: WRITE
  • Prompt: !?7,"***",$$CONF1^ASDUT,"***"
  • Line Location: HED+5
Function Call: WRITE
  • Prompt: !,"NAME:",?7,NAME,?30,"HRCN: ",$$HRN^ASDUT(J)
  • Line Location: HED+7
Function Call: WRITE
  • Prompt: !,"DOB:",?7,Y,?27,"APPT DT: ",$$APDT
  • Line Location: HED+8
Function Call: WRITE
  • Prompt: !!,"*** INPATIENT ***"
  • Line Location: HED+10
Function Call: WRITE
  • Prompt: ?20,"LOCATED ON WARD: ",$P(^DPT(J,.1),U,1),!
  • Line Location: HED+11
Function Call: WRITE
  • Prompt: !
  • Line Location: OVR+0
Function Call: WRITE
  • Prompt: !,?11,"**CURRENT APPOINTMENTS**",!!,?3,"TIME",?11,"CLINIC"
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: !?5,"**Active Incomplete Chart**"
  • Line Location: STATUS+5
Function Call: WRITE
  • Prompt: !?8,$P(^ADGIC(DFN,"D",X,0),U,12)
  • Line Location: STATUS+8
Function Call: WRITE
  • Prompt: !?5,"**Active DS Incomplete Chart**"
  • Line Location: STATUS+11
Function Call: WRITE
  • Prompt: !?8,$P(^ADGDSI(DFN,"DT",X,0),U,4)
  • Line Location: STATUS+14
Function Call: WRITE
  • Prompt: !?5,"**Active Day Surgery Patient**"
  • Line Location: STATUS+17
Function Call: WRITE
  • Prompt: !?5,"**Day Surgery/SDA Patient**"
  • Line Location: STATUS+21

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ADGDS - [#9009012] STATUS+16
^ADGDSI - [#9009012.5] STATUS+10, STATUS+12, STATUS+13, STATUS+14
^ADGIC - [#9009013] STATUS+4, STATUS+6, STATUS+7, STATUS+8
^DD("DD" HED+8
^DD("SITE" HED+3
^DG(40.8 - [#40.8] HED+3, SHORT+1, DIV+1
^DPT - [#2] HED+6, HED+9, HED+11, HED+12
^SRF("AIHS3" STATUS+20

Label References

Name Line Occurrences
$$APDT HED+8
$$DIV SHORT+1
OVR HED+9

Naked Globals

Name Field # of Occurrence
^(0 HED+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ADDR HED+12*
>> APDATE APDT+1
>> ASDLONG SHORT+1
DATE STATUS+19~*, STATUS+21
DFN STATUS~, STATUS+3, STATUS+4, STATUS+6, STATUS+7, STATUS+8, STATUS+10, STATUS+12, STATUS+13, STATUS+14
, STATUS+16, STATUS+20
>> DIV HED+3
>> DOB HED+6*, HED+8
DT APDT+1, STATUS+16, STATUS+17, STATUS+19
DUZ(2 DIV+1
IOF HED+1
>> J HED+6, HED+7, HED+9, HED+11, HED+12
>> NAME HED+6*, HED+7
>> P HED+3*, HED+4
>> SDCNT HED+1
U HED+3, HED+6, HED+11, SHORT+1, STATUS+7, STATUS+8, STATUS+13, STATUS+14
X STATUS+2~, STATUS+6*, STATUS+7, STATUS+8, STATUS+12*, STATUS+13, STATUS+14, STATUS+16~*, STATUS+17, STATUS+19~*
, STATUS+20*, STATUS+21
>> Y HED+6*, HED+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All