Routine: GMTSRO

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Entry Points
External References
Interaction Calls
Label References
Local Variables

Information

GMTSRO ; SLC/JER,KER - All Surgery Reports ; 06/24/2002 [8/3/04 2:10pm]

Source Information

Source file <GMTSRO.m>

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
Health Summary	5	$$WRAP^GMTSORC ($$GL,ONE)^GMTSROE WRT^GMTSRON ($$ED,$$PROK)^GMTSU CKP^GMTSUP
Surgery	1	HS^SROGMTS

Entry Points

Name	Comments	DBIA/ICR reference
SORT	; Sort Surgeries by Inverse Date
OPER	; Operative Procedure
PSTDX	; Post-Op Diagnosis
RPT	; Dictation
ENSR	; Entry Point for SURGERY REPORT component ; (includes NON-OR procedures)
DICDT	; Dictation Date
SS	; Date/Specialty/Surgeon
TRCDT	; Transcription Time
OOPM
ENSRO	; Entry Point for Surgery Only Component
LAB	; Lab Work
OPREDX	; Other Pre-Op Diagnosis
NONOP	; Non-Op Procedure ; Quit if Surgery Only
WRT	; Write Surgical Case Record
RPTDT	; Dates
OOP	; Other Procedures
OPM	; Operative Procedures (Modifiers)
SPA	; Status/Principal Anesthetist
PREDX	; Principal Pre-Op Diagnosis
OPSTDX	; Other Post-Op Diagnosis
OP	; Operative Procedures

External References

Name	Field # of Occurrence
$$WRAP^GMTSORC	SS+3, PREDX+3, OPREDX+3, PSTDX+2, OPSTDX+2, OP+1, OPM+2, OOP+2, OOPM+2
$$GL^GMTSROE	ENSR+2
ONE^GMTSROE	WRT+3
WRT^GMTSRON	NONOP+7
$$ED^GMTSU	SS+2
$$PROK^GMTSU	WRT+2, WRT+3, RPT+3, RPT+4
CKP^GMTSUP	SS+1, SS+5, SPA+1, PREDX+1, PREDX+5, OPREDX+5, PSTDX+1, PSTDX+3, OPSTDX+3, OP+1 , OP+3, OPM+4, OOP+4, OOPM+4, LAB+1, DICDT+2, TRCDT+2, TRCDT+3, RPT+3, RPT+5
HS^SROGMTS	WRT+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $G(GMDT),?21,$P($G(GMTSTR),"\|"),?47,"Surgeon:",?56,$G(REC(130,GMN,.14,"E")),! Line Location: SS+4
Function Call: WRITE	Prompt: ?23,$P($G(GMTSTR),"\|",GMI),! Line Location: SS+5
Function Call: WRITE	Prompt: ?13,"Status:",?21,$G(REC(130,GMN,"STATUS")) Line Location: SPA+2
Function Call: WRITE	Prompt: ?44,"Prin Anest:",?56,$G(REC(130,GMN,.31,"E")),! Line Location: SPA+3
Function Call: WRITE	Prompt: ?5,"Pre-op Diag(s):" Line Location: PREDX+1
Function Call: WRITE	Prompt: ?$S(GMJ=1:21,1:22),$P(GMTSTR,"\|",GMJ) Line Location: PREDX+5
Function Call: WRITE	Prompt: ! Line Location: PREDX+5
Function Call: WRITE	Prompt: ?$S(GMJ=1:21,1:22),$P(GMTSTR,"\|",GMJ) Line Location: OPREDX+5
Function Call: WRITE	Prompt: ! Line Location: OPREDX+5
Function Call: WRITE	Prompt: ?4,"Post-op Diag(s):" Line Location: PSTDX+1
Function Call: WRITE	Prompt: ?$S(GMJ=1:21,1:22),$P(GMTSTR,"\|",GMJ) Line Location: PSTDX+3
Function Call: WRITE	Prompt: " ",$G(REC(130,GMN,"VERIFIED")) Condition for execution: GMJ=1&(GMTSTR?1.A.E) Line Location: PSTDX+3
Function Call: WRITE	Prompt: ! Line Location: PSTDX+3
Function Call: WRITE	Prompt: ?$S(GMJ=1:21,1:22),$P(GMTSTR,"\|",GMJ) Line Location: OPSTDX+3
Function Call: WRITE	Prompt: " ",$G(REC(130,GMN,"VERIFIED")) Condition for execution: GMJ=1&(GMTSTR?1.A.E) Line Location: OPSTDX+3
Function Call: WRITE	Prompt: ! Line Location: OPSTDX+3
Function Call: WRITE	Prompt: ?2,"Operative Proc(s):" Line Location: OP+1
Function Call: WRITE	Prompt: ?$S(GMJ=1:21,1:22),$P(GMTSTR,"\|",GMJ),! Line Location: OP+3
Function Call: WRITE	Prompt: ?$S(GMJ=1:25,1:26),$P(GMTSTR,"\|",GMJ),! Line Location: OPM+4
Function Call: WRITE	Prompt: ?$S(GMJ=1:21,1:22),$P(GMTSTR,"\|",GMJ),! Line Location: OOP+5
Function Call: WRITE	Prompt: ?$S(GMJ=1:25,1:26),$P(GMTSTR,"\|",GMJ),! Line Location: OOPM+4
Function Call: WRITE	Prompt: ?11,"Lab Work: ",$G(REC(130,GMN,"LAB")),! Line Location: LAB+1
Function Call: WRITE	Prompt: ?5,"Dictation Time:",?21,GMTSTR Line Location: DICDT+2
Function Call: WRITE	Prompt: ?41,"Transcription Time:",?61,GMTSTR Line Location: TRCDT+2
Function Call: WRITE	Prompt: "Surgeon's Dictation:",! Line Location: RPT+3
Function Call: WRITE	Prompt: ?2,$G(REC(130,GMN,1.15,GMI)),! Line Location: RPT+5

Name	Line Occurrences
OPER	NONOP+5
SORT	ENSR+4
WRT	ENSR+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DFN	ENSR+2, ENSR+4
GMCOUNT	ENSR+2~, ENSR+5, NONOP+8, RPT+1*
GMDT	SORT+1~, SORT+2, SORT+3, WRT+1~, SS+2*, SS+4
GMI	WRT+1~, SS+5, OPREDX+1, OPREDX+2, OPSTDX+1, OPSTDX+2, OPM+1, OPM+2, OOP+1, OOP+2 , OOPM+1, OOPM+2, RPT+3~, RPT+4, RPT+5
GMIDT	ENSR+2~, ENSR+5*
GMJ	WRT+1~, PREDX+4, PREDX+5, OPREDX+4, OPREDX+5, PSTDX+3, OPSTDX+3, OP+2, OP+3, OPM+3 , OPM+4, OOP+3, OOP+5, OOPM+3, OOPM+4
GMM	OOPM+1~*, OOPM+2
GMN	ENSR+2~, ENSR+4, ENSR+5, SORT+1, SORT+3, WRT+2, WRT+3, NONOP+2, NONOP+5, NONOP+7 , SS+2, SS+3, SS+4, SPA+2, SPA+3, PREDX+2, PREDX+3, OPREDX+1, OPREDX+2, OPREDX+3 , PSTDX+2, PSTDX+3, OPSTDX+1, OPSTDX+2, OPSTDX+3, OP+1, OPM+1, OPM+2, OOP+1, OOP+2 , OOPM+1, OOPM+2, LAB+1, DICDT+1, TRCDT+1, TRCDT+3, RPT+2, RPT+4, RPT+5
>> GMTSBEG	SORT+1
>> GMTSEND	SORT+1
GMTSGL	ENSR+2~*, ENSR+4, SORT+1
GMTSMX	ENSR+2~, ENSR+3*, ENSR+5
>> GMTSNDM	ENSR+3
>> GMTSQIT	ENSR+5, SS+1, SS+5, SPA+1, PREDX+1, PREDX+4, PREDX+5, PREDX+6, OPREDX+4, OPREDX+5 , OPREDX+6, PSTDX+1, PSTDX+3, OPSTDX+3, OP+1, OP+2, OP+3, OP+4, OPM+1, OPM+3 , OPM+4, OPM+5, OOP+3, OOP+4, OOPM+3, OOPM+4, OOPM+5, OOPM+6, LAB+1, DICDT+2 , TRCDT+2, TRCDT+3, RPT+3, RPT+4, RPT+5, RPT+6
GMTSSO	ENSRO+1*, ENSR+6!, NONOP+2, NONOP+7
GMTSTR	WRT+1~, SS+3, SS+4, SS+5, PREDX+2, PREDX+3, PREDX+4, PREDX+5, OPREDX+2, OPREDX+3* , OPREDX+4, OPREDX+5, PSTDX+2, PSTDX+3, OPSTDX+2, OPSTDX+3, OP+1, OP+2, OP+3, OPM+2 , OPM+3, OPM+4, OOP+2, OOP+3, OOP+5, OOPM+2, OOPM+3, OOPM+4, DICDT+1, DICDT+2 , TRCDT+1, TRCDT+2
REC	WRT+1~
REC(130	NONOP+2, NONOP+5, NONOP+7, SS+2, SS+3, SS+4, SPA+2, SPA+3, PREDX+2, PREDX+3 , OPREDX+1, OPREDX+2, OPREDX+3, PSTDX+2, PSTDX+3, OPSTDX+1, OPSTDX+2, OPSTDX+3, OP+1, OPM+1 , OPM+2, OOP+1, OOP+2, OOPM+1, OOPM+2, LAB+1, DICDT+1, TRCDT+1, TRCDT+3, RPT+2 , RPT+4, RPT+5
SURG	ENSR+2~, ENSR+5
SURG(	ENSR+5
SURG(9999999	SORT+2, SORT+3*
U	SORT+1
X	WRT+1~

Customize PDF page

Package: Health Summary

Routine: GMTSRO

Call Graph Total: 6