Routine: SROGMTS

Information

SROGMTS ;BIR/ADM - SURGERY HEALTH SUMMARY ; [ 08/08/01 7:12 AM ]

Source Information

Source file <SROGMTS.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
VA Fileman	3	$$GET1^DIQ EN^DIQ1 ^DIWP
DRG Grouper	2	$$CPT^ICPTCOD $$MOD^ICPTMOD
Kernel	1	($$FMTE,$$HTFM)^XLFDT
Surgery	1	($$ED,$$EDT,$$EN2,DICT)^SROGMTS0

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Health Summary	2	GMTSRO GMTSRON

Entry Points

Name	Comments	DBIA/ICR reference
SUB	;
OS(X)	; Obtains status for OR procedures
CPT(SRM,SRDOO,SRFIL,SRFLD)	;Set CPT code into REC array
SG(X)	; Surgical (Operative) Record
WP(X,Y,Z)	;
EDT(X)	; external date and time
MOD(SRM,SRFIL,SUB)	;Set CPT Modifier into REC array
ED(X)	; external date
SPD	;Obtain Surgery Procedure/Diagnosis Code File entry
HS(X)	; return case information for a surical or non-OR case ; X - case number (IEN) in file 130	ICR #3590 Status: Active Usage: Private

External References

Name	Field # of Occurrence
$$GET1^DIQ	SG+1
EN^DIQ1	HS+11, SUB+10, SUB+19, SUB+29, SUB+39, SUB+58, SPD+3, SPD+10, SPD+15
^DIWP	WP+9
$$CPT^ICPTCOD	SUB+40, SUB+42, CPT+1
$$MOD^ICPTMOD	SUB+61, MOD+1
$$ED^SROGMTS0	HS+22
$$EDT^SROGMTS0	HS+23, HS+24
$$EN2^SROGMTS0	HS+14, HS+15, HS+16, HS+17, HS+18, SUB+11, SUB+20, SUB+42, SUB+45, SUB+46 , SUB+67, CPT+1, CPT+3, MOD+6
DICT^SROGMTS0	HS+13
$$FMTE^XLFDT	ED+2, EDT+2
$$HTFM^XLFDT	HS+6

FileNo	Call Tags
^SRF - [#130]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^SRF - [#130]	HS+5, HS+12, SUB+8, SUB+17, SUB+27, SUB+37, SUB+40, SUB+42, SUB+56, SUB+61 , MOD+1, SPD+6
^SRO(	SPD+8, SPD+13
^UTILITY($J	WP+6!, WP+10, WP+11, WP+13!

Name	Line Occurrences
$$OS	HS+11
$$SG	HS+8
CPT	HS+12, SPD+6
MOD	SUB+30, SPD+11
SPD	HS+13
SUB	HS+13
WP	HS+26

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	HS+2~, HS+7, SUB+1~, SUB+7, SUB+16, SUB+26, SUB+36, SUB+57~, SPD+1, SPD+12~
DA(	SUB+9, SUB+18, SUB+28, SUB+38, SUB+57, SPD+9, SPD+14*
DIC	HS+2~, HS+7, SUB+1~, SUB+7, SUB+16, SUB+26, SUB+36, SUB+57~, SPD+1*
DIQ	HS+2~, HS+7, SUB+1~, SUB+7, SUB+16, SUB+26, SUB+36, SUB+57~, SPD+1, SPD+7
DIQ(0	HS+7, SUB+7, SUB+16, SUB+26, SUB+36, SUB+57, SPD+1*
DIWF	WP+1~, WP+6*
DIWL	WP+1~, WP+6*
DIWR	WP+1~, WP+6*
DR	HS+2~, HS+9, HS+10, SUB+1~, SUB+7, SUB+16, SUB+26, SUB+36, SUB+57~, SPD+2 , SPD+7, SPD+8, SPD+12, SPD+13
DR(	SUB+7, SUB+16, SUB+26, SUB+36, SUB+57, SPD+7, SPD+12*
DT	HS+6*
DTIME	HS+6*
FILE	HS+2~, HS+7, SUB+1~, SUB+7, SUB+16, SUB+26, SUB+30, SUB+36, SUB+57~, SPD+1* , SPD+4, SPD+5, SPD+6, SPD+8, SPD+11, SPD+13, SPD+16, SPD+17
FLD	HS+2~, SUB+1~
FLDA	HS+3~, SUB+1~
FLDB	HS+3~, SUB+1~
FLDI	HS+2~, SUB+1~
FLDR	HS+3~, SUB+1~
FLDRT	HS+3~, SUB+1~
FLDS	HS+2~, SUB+1~
IEN	HS+2~, HS+3~, HS+5*, HS+8, HS+11, HS+12, HS+14, HS+15, HS+16, HS+17 , HS+18, HS+19, HS+20, HS+21, HS+22, HS+23, HS+24, HS+25, HS+26, SUB+7 , SUB+8, SUB+11, SUB+16, SUB+17, SUB+20, SUB+26, SUB+27, SUB+30, SUB+36, SUB+37 , SUB+39, SUB+40, SUB+41, SUB+42, SUB+43, SUB+45, SUB+48, SUB+49, SUB+50, SUB+56 , SUB+57, SUB+59, SUB+61, SUB+64, SUB+65, SUB+66, SUB+68, SUB+69, CPT+2, CPT+3 , CPT+6, CPT+7, CPT+8, CPT+9, MOD+1, MOD+4, MOD+5, MOD+8, SPD+1, SPD+4 , SPD+5, SPD+6, SPD+7, SPD+8, SPD+11, SPD+12, SPD+13, SPD+16, SPD+17
IENS	HS+2~, HS+5*, SUB+1~
REC	HS+2!
REC(	SUB+8!, SUB+17!, SUB+27!, SUB+37!, CPT+2, CPT+6, CPT+8, CPT+9, MOD+4, MOD+5 , MOD+8*, SPD+4, SPD+5, SPD+8!, SPD+11, SPD+13!, SPD+16, SPD+17
REC(130	HS+8, HS+11, HS+12, HS+14, HS+15, HS+16, HS+17, HS+18, HS+19, HS+20 , HS+21, HS+22, HS+23, HS+24, HS+25, HS+26, WP+2, WP+3, WP+5, WP+7 , WP+8, WP+11, WP+12, OS+1, OS+2, OS+3, OS+5, OS+6, OS+7, OS+8 , OS+9, OS+10, SUB+11, SUB+20, SUB+30, SUB+39, SUB+40, SUB+41, SUB+43, SUB+45 , SUB+48, SUB+49, SUB+50, SUB+59, SUB+64, SUB+65, SUB+66, SUB+68, SUB+69!, CPT+3 , CPT+7, SPD+16, SPD+17!*
SCOD	SUB+1~
SNAM	SUB+1~
SRC	HS+3~, SUB+1~, SUB+41~, SUB+42, SUB+43, SUB+44, SUB+47, SUB+62, SUB+64, SUB+66 , SUB+67, CPT+1, CPT+2, CPT+3, CPT+5, MOD+2, MOD+4, MOD+7
SRCPTM	HS+2~, HS+4*, SUB+25, SUB+55
SRCS	HS+3~, SUB+42, SUB+47, SUB+50, CPT+1, CPT+5, CPT+9
SRDOO	CPT~, CPT+1
SRF	WP+1~, WP+3*, WP+5, WP+7, WP+8, WP+11, WP+12
SRFIL	CPT~, CPT+2, CPT+6, CPT+7, CPT+8, CPT+9, MOD~, MOD+4, MOD+5, MOD+8
SRFLD	CPT~, CPT+2, CPT+6, CPT+8, CPT+9
SRGI	WP+1~, WP+6, WP+7, WP+8, WP+10*, WP+11
SRI	HS+3~, WP+1~, WP+2, WP+3, WP+5, WP+7, WP+8, WP+11, WP+12, SUB+1~ , SUB+8, SUB+9, SUB+11, SUB+17, SUB+18, SUB+20, SUB+27, SUB+28, SUB+30, SUB+37* , SUB+38, SUB+39, SUB+40, SUB+41, SUB+43, SUB+45, SUB+48, SUB+49, SUB+50, SUB+56 , SUB+57, SUB+59, SUB+64, SUB+65, SUB+66, SUB+68, SUB+69, MOD+4, MOD+5, MOD+8 , SPD+8, SPD+9, SPD+11, SPD+13, SPD+14
SRJ	SUB+1~, SUB+56~*, SUB+57, SUB+59, SUB+64, SUB+65, SUB+66, SUB+68
SRM	HS+12, SUB+1~, SUB+30, SUB+39, SUB+40, SUB+41, SUB+42, SUB+59, SUB+60, SUB+61 , CPT~, CPT+1, MOD~, MOD+1, SPD+5, SPD+6, SPD+11*
>> SRMOD	MOD+1*, MOD+2, MOD+3
SRMOD1	SUB+60~, SUB+61*, SUB+62, SUB+63
SRN	OS+1~*, OS+2, OS+3, OS+5, OS+6, OS+7, OS+8, OS+9, OS+10
SRRT	HS+3~
SRS	HS+3~, SUB+41~, SUB+42, SUB+46, SUB+48, SUB+63, SUB+65, SUB+66, SUB+67, CPT+1* , CPT+4, CPT+6, MOD+3*, MOD+5, MOD+6
SRSG	HS+2~, HS+8*, HS+9, HS+10, HS+11, HS+25, HS+26, SUB+2
SRT	HS+3~, SUB+41~, SUB+45, SUB+46, SUB+47, SUB+49, SUB+67, SUB+68, CPT+3, CPT+4 , CPT+5, CPT+7, CPT+8, MOD+6, MOD+7*, MOD+8
SRW	WP+1~, WP+4*, WP+6
STXT	SUB+1~
SUB	SUB+1~, SUB+7, SUB+8, SUB+9, SUB+16, SUB+17, SUB+18, SUB+26, SUB+27, SUB+28 , SUB+30, SUB+36, SUB+37, SUB+38, SUB+57~, SUB+64, SUB+65, SUB+66, SUB+68, MOD~ , MOD+4, MOD+5, MOD+8, SPD+7, SPD+8, SPD+9, SPD+11, SPD+12*, SPD+13, SPD+14
U	HS+5*
X	HS~, HS+5, HS+7, ED~, ED+1, ED+2, ED+3, EDT~, EDT+1, EDT+2* , EDT+3, WP~, WP+2, WP+8, OS~, OS+1, OS+2, OS+3, OS+4, OS+5 , OS+6, OS+7, OS+8, OS+9, OS+10, OS+11, OS+12, SG~, SG+1
Y	WP~, WP+3
Z	WP~, WP+4

Customize PDF page

Package: Surgery

Routine: SROGMTS

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 2

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: