Routine: SROCD4

Package	Total	Call Graph
VA Fileman	6	NOW^%DTC ^DIC FILE^DICN ^DIE ^DIK ^DIR
Surgery	3	(,$$CHNG)^SROCD1 NITE^SROPCE (START,UTIL)^SROPCEP
DRG Grouper	1	$$ICDDX^ICDCODE
Kernel	1	MES^XPDUTL
Scheduling	1	CL^SDCO21

Package	Total	Caller Graph
Surgery	1	SROCD2

Entry Points

External References

Name	Field # of Occurrence
NOW^%DTC	FILE
^DIC	CHF+2
FILE^DICN	FILE+2
^DIE	FILE+1
^DIK	PRE+2, PRE+3, PRE+4, PRE+5, PRE+6, PRE+7, PRE+8, PRE+9
^DIR	SROCD4+17, ASKCHF+7, PAGE
$$ICDDX^ICDCODE	CHF+3
CL^SDCO21	SROCD4+10
^SROCD1	C2+8
$$CHNG^SROCD1	SROCD4+15
NITE^SROPCE	CONV+2
START^SROPCEP	FILE+7
UTIL^SROPCEP	CHKIN+2
MES^XPDUTL	CONV+1, C2+1, C2+8, C2+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Coding of this surgical case is not complete.",!,"The following items are missing:",! Line Location: MISS+0
Function Call: WRITE	Prompt: ?5,SRDATA,! Line Location: MISS+1
Function Call: WRITE	Prompt: !,"This case cannot be sent to PCE until all missing information is supplied.",! Line Location: MISS+2
Routine Call	DIE Line Location: FILE+1
Routine Call	DIC Line Location: CHF+2
Routine Call	DIR Line Location: SROCD4+17 ASKCHF+7 PAGE

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	SROCD4+10, SROCD4+16, CHF+3, C2+2, C2+3, C2+4, C2+5
^SRO(136 - [#136]	SROCD4+7, SROCD4+11, SROCD4+12, SROCD4+13, SROCD4+15, SROCD4+17, CHF+4, CHF+5, CONV+1, C2+7

Label References

Name	Line Occurrences
ASKCHF	SROCD4+6
CHF	SROCD4+6
CHKIN	FILE+3
FILE	SROCD4+16
MISS	SROCD4+14
OSCEI	SROCD4+13
PAGE	FILE+6, FILE+8
PSCEI	SROCD4+10
SRSET	PSCEI+1, PSCEI+2, PSCEI+3, PSCEI+4, PSCEI+5, PSCEI+6, PSCEI+7, OSCEI+1, OSCEI+2, OSCEI+3 , OSCEI+4, OSCEI+5, OSCEI+6, OSCEI+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	FILE
DA	FILE+1!, FILE+2!, PRE+2!, PRE+3!, PRE+4!, PRE+5!, PRE+6!, PRE+7!, PRE+8!, PRE+9!*
DA(1	PRE+2, PRE+3, PRE+4, PRE+5, PRE+6, PRE+7, PRE+8, PRE+9
DA(2	PRE+2, PRE+3, PRE+4, PRE+5, PRE+6, PRE+7, PRE+8, PRE+9
DD	FILE+2!
>> DFN	SROCD4+10*
DIC	FILE+2!, CHF+2!
DIC("DR"	FILE+2*
DIC(0	FILE+2, CHF+2
DIE	FILE+1!*, PRE+2!
DIK	PRE+2!, PRE+3!, PRE+4!, PRE+5!, PRE+6!, PRE+7!, PRE+8!, PRE+9!
DIR	SROCD4+17!, SROCD4+18!, ASKCHF+1!, ASKCHF+7!, PAGE!
DIR("A"	SROCD4+18, ASKCHF+1, ASKCHF+2, ASKCHF+3, ASKCHF+4, ASKCHF+5, ASKCHF+6, PAGE
DIR("B"	SROCD4+18, ASKCHF+6
DIR(0	SROCD4+18, ASKCHF+1, PAGE*
DO	FILE+2!
DR	FILE+1!*, FILE+2!, PRE+2!
>> DTOUT	SROCD4+17, ASKCHF+7
>> DUOUT	SROCD4+17, ASKCHF+7
DUZ	FILE+2
SR	SROCD4+5~, CHKIN+1~
SR(0	SROCD4+7*, SROCD4+8, SROCD4+9, PSCEI+1, PSCEI+2, PSCEI+3, PSCEI+4, PSCEI+5, PSCEI+6, PSCEI+7
SRAO	CHKIN+1~
SRATT	CHKIN+1~
SRCHF	SROCD4+5~, SROCD4+6, CHF+1, CHF+4, CHF+5*
>> SRCHFNO	SROCD4+6, ASKCHF+1, ASKCHF+7
SRCHK	CHKIN+1~
SRCL	SROCD4+5~, SROCD4+10, SROCD4+13
SRCL(1	PSCEI+1, OSCEI+1
SRCL(2	PSCEI+2, OSCEI+2
SRCL(3	PSCEI+3, OSCEI+3
SRCL(4	PSCEI+4, OSCEI+4
SRCL(5	PSCEI+5, OSCEI+5
SRCL(6	PSCEI+6, OSCEI+6
SRCL(7	PSCEI+7, OSCEI+7
SRCPT	CHKIN+1~
SRCT	C2~, C2+2, C2+8, C2+9
SRCV	CHKIN+1~
SRD	C2~, C2+5*
SRDATA	SROCD4+5~, MISS+1*
SRDATE	CHKIN+1~
SRDEPC	CHKIN+1~
SRDIAG	CHKIN+1~
SRDX	SROCD4+5~, SROCD4+13*, OSCEI+1, OSCEI+2, OSCEI+3, OSCEI+4, OSCEI+5, OSCEI+6, OSCEI+7
SRDXF	CHKIN+1~
SREC	CHKIN+1~
>> SREDIT	SROCD4+7*
SRHNC	CHKIN+1~
SRICD	SROCD4+5~, CHF+4*, ASKCHF+2, ASKCHF+6
SRINOUT	CHKIN+1~
SRIR	CHKIN+1~
SRK	SROCD4+5~, FILE+3!
SRLOC	CHKIN+1~
SRMISS	SROCD4+5~, SROCD4+14
SRMISS(	MISS+1, SRSET*
SRMISS("OTHER	ASSOCIATED DIAGNOSIS" , SROCD4+12*
SRMISS("PRINC	IPAL ASSOCIATED DIAGNOSIS" , SROCD4+11, IPAL POSTOP DIAGNOSIS CODE" , SROCD4+9, IPAL PROCEDURE CODE" , SROCD4+8*
SRMST	CHKIN+1~
SRNON	CHKIN+1~
>> SRNOW	FILE*, FILE+2
SRO	CHKIN+1~
SRODIAG	CHKIN+1~
SRODX	C2~, C2+5*, C2+6
SROP	C2~, C2+4*, C2+6
SROTH	SROCD4+5~, SROCD4+12, SROCD4+13
SRP	C2~, C2+4*
SRPDX	C2~, C2+5*, C2+6
SRPP	C2~, C2+4*, C2+6
SRPROV	CHKIN+1~
SRRPROV	CHKIN+1~
SRSC	CHKIN+1~
SRSDATE	SROCD4+5~, SROCD4+10*
>> SRSOUT	SROCD4+7*
SRTN	SROCD4+7, SROCD4+10, SROCD4+11, SROCD4+12, SROCD4+13, SROCD4+15, SROCD4+16, SROCD4+17, FILE+1, CHF+3 , CHF+4, CHF+5, C2~, C2+2*, C2+3, C2+4, C2+5, C2+7
SRTYPE	SROCD4+5~, PSCEI, OSCEI, SRSET
SRUP	CHKIN+1~
SRX	CHKIN+1~
SRY	CHF+1~, CHF+2, CHF+3, CHF+4, CHF+5
X	FILE+2, CHF+1~, CHF+2, CHF+4*
Y	SROCD4+17, CHF+1~, CHF+2, CHF+3, CHF+4, CHF+5, ASKCHF+7

Customize PDF page

Package: Surgery

Routine: SROCD4

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
PRE	; pre-install entry ; delete APCE x-refs
OSCEI
CHF	; check diagnoses for CRIMEAN HEMORRHAGIC FEVER
SRSET
CONV	; convert coding data from file 130 to file 136
PSCEI
FILE
CHKIN	; check for items in file 130 required by PCE
C2
ASKCHF	; ask for confirmation of CRIMEAN HEMORRHAGIC FEVER diagnosis
MISS
PAGE