Routine: SROQIDP0

Package	Total	Call Graph
Surgery	7	TECH^SROPRIN AC^SROQIDP ^SROSTOP PROC^SROUTL $$NODATA^SROUTL0 PROC^SROUTLN $$SITE^SROVAR
VA Fileman	3	NOW^%DTC $$GET1^DIQ ^DIR
Registration	1	DEM^VADPT

Package

Total

Call Graph

Surgery

TECH^SROPRIN AC^SROQIDP ^SROSTOP PROC^SROUTL $$NODATA^SROUTL0 PROC^SROUTLN $$SITE^SROVAR

VA Fileman

NOW^%DTC $$GET1^DIQ ^DIR

Registration

DEM^VADPT

Package	Total	Caller Graph
Surgery	1	SROQIDP

Package

Total

Caller Graph

Surgery

SROQIDP

Name	Comments	DBIA/ICR reference
PRINT	; print case information
PRESS
PAGE
HDR	; print heading

Name	Field # of Occurrence
NOW^%DTC	SROQIDP0+10
$$GET1^DIQ	SROQIDP0+9
^DIR	PRESS
TECH^SROPRIN	PRINT+4
AC^SROQIDP	SROQIDP0+11
^SROSTOP	HDR+1
PROC^SROUTL	PRINT+1
$$NODATA^SROUTL0	SROQIDP0+12
PROC^SROUTLN	PRINT+7
$$SITE^SROVAR	SROQIDP0+9
DEM^VADPT	PRINT+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $$NODATA^SROUTL0() Line Location: SROQIDP0+12
Function Call: WRITE	Prompt: !! Line Location: SROQIDP0+14
Function Call: WRITE	Prompt: ?4,"TOTAL CASES BY IN/OUT-PATIENT STATUS",!,?14,"INPATIENT: ",SRIOT("I"),!,?13,"OUTPATIENT: ",SRIOT("O"),!,?12,"NOT ENTERED: ",SRIOT("N"),!!,?12,"TOTAL CASES: ",SRIDPT Line Location: SROQIDP0+15
Function Call: WRITE	Prompt: "TOTAL "_$S(SRIO="I":"INPATIENT",1:"OUTPATIENT")_" CASES: "_SRIOT(SRIO) Line Location: SROQIDP0+16
Function Call: WRITE	Prompt: !,SRSDATE,?22,SRSNM,?54,$S(SRSPEC:$E(SRDOC,1,27),1:$E(SRSS,1,27)),?89,SRANES,?117,SRIOSTAT Line Location: PRINT+5
Function Call: WRITE	Prompt: ?54,SRPROC(I),! Line Location: PRINT+6
Function Call: WRITE	Prompt: ?54,SRPROC(I),! Line Location: PRINT+7
Function Call: WRITE	Prompt: !! Line Location: PRESS+0
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+2
Function Call: WRITE	Prompt: !,?(IOM-$L(SRINST)\2),SRINST Condition for execution: $E(IOST)="P" Line Location: HDR+2
Function Call: WRITE	Prompt: !,?(IOM-$L(SRRPT)\2),SRRPT,?(IOM-10),$J("PAGE "_SRPAGE,9),!,?(IOM-$L(SRFRTO)\2),SRFRTO Line Location: HDR+2
Function Call: WRITE	Prompt: !,?(IOM-$L(SRPRINT)\2),SRPRINT Condition for execution: $E(IOST)="P" Line Location: HDR+2
Function Call: WRITE	Prompt: !,?(IOM-$L(X)\2),X Line Location: HDR+3
Function Call: WRITE	Prompt: !!,"DATE OF OPERATION",?22,"PATIENT NAME",?54,$S(SRSPEC:"SURGEON",1:"SURGICAL SPECIALTY"),?89,"ANESTHESIA TECHNIQUE",?117,"IN/OUT-PATIENT" Line Location: HDR+4
Function Call: WRITE	Prompt: !,"CASE #",?22,"PATIENT ID (AGE)",?54,"PROCEDURE(S) PERFORMED" Line Location: HDR+5
Function Call: WRITE	Prompt: ! Line Location: HDR+6
Function Call: WRITE	Prompt: "=" Line Location: HDR+6
Routine Call	DIR Line Location: PRESS

FileNo	Call Tags
^DIC(4 - [#4]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	SROQIDP0+7, SROQIDP0+10, PRINT+3
^SRF - [#130]	PRINT+2
^SRO(137.45 - [#137.45]	PRINT+2
^TMP("SR"	SROQIDP0+7!, SROQIDP0+13
^VA(200 - [#200]	PRINT+2

Name	Line Occurrences
HDR	SROQIDP0+11, PAGE
PAGE	SROQIDP0+14, PRINT+1, PRINT+7
PRESS	PAGE+1
PRINT	SROQIDP0+13

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	SROQIDP0+10
>> DFN	PRINT+2*
DIR	PRESS!
DIR(0	PRESS*
>> DTOUT	PRESS
>> DUOUT	PRESS
>> EDATE	SROQIDP0+7
>> ENDATE	SROQIDP0+7*, SROQIDP0+8
>> I	SROQIDP0+7, PRINT+6, PRINT+7, HDR+6
IO	SROQIDP0+7
IOF	HDR+2
IOM	HDR+2, HDR+3, HDR+6
IOSL	SROQIDP0+14, PRINT+1, PRINT+7
IOST	PAGE, HDR+2
>> SDATE	SROQIDP0+7
>> SRAGE	PRINT+3*, PRINT+6
>> SRANES	PRINT+4*, PRINT+5
>> SRDOC	PRINT+2*, PRINT+5
>> SRED	SROQIDP0+7*
>> SRFRTO	SROQIDP0+8*, HDR+2
>> SRHALT	HDR+1
>> SRHDR	SROQIDP0+7, PAGE, HDR+6
>> SRIDPT	SROQIDP0+7*, SROQIDP0+12, SROQIDP0+15
>> SRINST	SROQIDP0+9*, HDR+2
>> SRINSTP	SROQIDP0+9
>> SRIO	SROQIDP0+15, SROQIDP0+16
>> SRIOSTAT	PRINT+2*, PRINT+5
>> SRIOT(	SROQIDP0+7*, SROQIDP0+16
>> SRIOT("I"	SROQIDP0+15
>> SRIOT("N"	SROQIDP0+15
>> SRIOT("O"	SROQIDP0+15
>> SRL	PRINT+1, PRINT+7
>> SRPAGE	SROQIDP0+7, HDR+2, HDR+6
>> SRPRINT	SROQIDP0+10*, HDR+2
>> SRPROC(	PRINT+6, PRINT+7
>> SRPROC(1	PRINT+6, PRINT+7
>> SRRPT	SROQIDP0+8*, HDR+2
>> SRSD	SROQIDP0+7, SROQIDP0+13, PRINT+3
>> SRSDATE	PRINT+3*, PRINT+5
>> SRSNM	PRINT+3*, PRINT+5
>> SRSOUT	SROQIDP0+7, SROQIDP0+13, SROQIDP0+14, PRINT+1, PRINT+7, PRESS, PAGE+1, HDR+1*
>> SRSPEC	PRINT+5, HDR+3, HDR+4
>> SRSPECN	HDR+3
>> SRSS	PRINT+2*, PRINT+5
>> SRSSN	PRINT+3*, PRINT+6
>> SRSUPCPT	PRINT+1*
>> SRTECH	PRINT+4
>> SRTN	SROQIDP0+13*, PRINT+2, PRINT+6
>> SRZ	SROQIDP0+13*, PRINT+2
>> STARTDT	SROQIDP0+7*, SROQIDP0+8
>> VA("PID"	PRINT+3
>> VADM(1	PRINT+3
>> VADM(3	PRINT+3
>> X	HDR+3*
>> X1	PRINT+3*
>> X2	PRINT+3*
>> Y	SROQIDP0+7, SROQIDP0+10, PRINT+2, PRINT+3
>> ZTQUEUED	HDR+1

Customize PDF page

Package: Surgery

Routine: SROQIDP0

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: