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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: GMTSLRA

Package: Health Summary

Routine: GMTSLRA


Information

GMTSLRA ; SLC/JER,KER - Surgical Pathology Component ; 09/21/2001

Source Information

Source file <GMTSLRA.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Health Summary 4 ^GMTSLRAE  $$WRAP^GMTSORC  REGDTM4^GMTSU  CKP^GMTSUP  
VA FileMan 1 $$GET1^DIQ  

Entry Points

Name Comments DBIA/ICR reference
WRTP ; Writes Procedure field
TEXT ; Handles GROSS DESCRIPTION & MICROSCOPIC EXAM/DX Print
WRT ; Writes Surgical Pathology Record
SUPPR ; Writes Supplementary Report
WRTSPC ; Writes Specimen field entries
MAIN ; Surgical Pathology
WRTTM ; Writes Topography and Morphology

External References

Name Field # of Occurrence
$$GET1^DIQ MAIN+2
^GMTSLRAE MAIN+3
$$WRAP^GMTSORC TEXT+5, SUPPR+6, WRTP+6
REGDTM4^GMTSU SUPPR+3
CKP^GMTSUP MAIN+6, WRT+3, WRT+5, WRTSPC+2, WRTSPC+4, TEXT+2, TEXT+6, TEXT+7, SUPPR+3, SUPPR+8
, WRTTM+2, WRTTM+3, WRTTM+6, WRTTM+9, WRTTM+13, WRTP+2, WRTP+7, WRTP+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?8,"Collected:",?19,$P(X,U),?31,"Acc:",?36,$P(X,U,2),!
  • Line Location: WRT+4
Function Call: WRITE
  • Prompt: "Surgeon/Physician:",?19,$G(SP),!
  • Line Location: WRT+6
Function Call: WRITE
  • Prompt: ?9,"Specimen:"
  • Line Location: WRTSPC+2
Function Call: WRITE
  • Prompt: ?19,^TMP("LRA",$J,IX,.1,GMS),!
  • Line Location: WRTSPC+4
Function Call: WRITE
  • Prompt: ?(17-$L(X)),X_":",!
  • Line Location: TEXT+2
Function Call: WRITE
  • Prompt: $P(GMTSLN,"|"),!
  • Line Location: TEXT+6
Function Call: WRITE
  • Prompt: "Supplementary Rpt: ",X,!
  • Line Location: SUPPR+3
Function Call: WRITE
  • Prompt: ?7,"Topography:",?19,$P(X,U),!
  • Line Location: WRTTM+2
Function Call: WRITE
  • Prompt: ?9,"Disease:"
  • Condition for execution: GMD=1
  • Line Location: WRTTM+5
Function Call: WRITE
  • Prompt: ?21,^TMP("LRA",$J,IX,IX0,IX1,1,GMD),!
  • Line Location: WRTTM+5
Function Call: WRITE
  • Prompt: ?7,"Morphology:",?21,^TMP("LRA",$J,IX,IX0,IX1,2,GMT),!
  • Line Location: WRTTM+10
Function Call: WRITE
  • Prompt: ?9,"Etiology:"
  • Condition for execution: GME=1
  • Line Location: WRTTM+13
Function Call: WRITE
  • Prompt: ?23,^TMP("LRA",$J,IX,IX0,IX1,2,GMT,1,GME),!
  • Line Location: WRTTM+13
Function Call: WRITE
  • Prompt: ?7,"Procedures:"
  • Line Location: WRTP+2
Function Call: WRITE
  • Prompt: ?21,$P(GMQ,"|"),!
  • Line Location: WRTP+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("LRA" MAIN+4, MAIN+5, MAIN+7, MAIN+8, MAIN+9, MAIN+10, MAIN+11!, WRT+9, WRTSPC+4, TEXT+4
, SUPPR+3, SUPPR+5, WRTTM+3, WRTTM+5, WRTTM+6, WRTTM+8, WRTTM+10, WRTTM+12, WRTTM+13, WRTP+2
, WRTP+4, WRTP+5

Label References

Name Line Occurrences
SUPPR MAIN+10
TEXT WRT+8
WRT MAIN+9
WRTP WRT+9
WRTSPC WRT+7
WRTTM WRT+9

Naked Globals

Name Field # of Occurrence
^( WRT+9, TEXT+4, SUPPR+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN MAIN+2
GMD WRTTM+1~, WRTTM+4*, WRTTM+5*
GME WRTTM+1~, WRTTM+11*, WRTTM+12*, WRTTM+13
GMI MAIN+1~, MAIN+5*, MAIN+6
GMJ WRT+1~
GMK WRTP+1~, WRTP+8*
GMQ WRTP+1~, WRTP+5*, WRTP+6*, WRTP+7, WRTP+8
GMS WRTSPC+1~, WRTSPC+3*, WRTSPC+4*
GMT WRTTM+1~, WRTTM+7*, WRTTM+8*, WRTTM+9, WRTTM+10, WRTTM+12, WRTTM+13, WRTP+3*, WRTP+4*, WRTP+5
GMTSLN TEXT+1~, TEXT+4*, TEXT+5*, TEXT+6, TEXT+7
GMTSLNI TEXT+1~, TEXT+7*
>> GMTSNDM MAIN+3
>> GMTSNPG MAIN+6
>> GMTSQIT MAIN+5, MAIN+6, WRT+3, WRT+5, WRTSPC+2, WRTSPC+4, TEXT+2, TEXT+6, TEXT+7, SUPPR+3
, SUPPR+8, WRTTM+2, WRTTM+3, WRTTM+6, WRTTM+9, WRTTM+13, WRTP+2, WRTP+7, WRTP+8
GMTSR SUPPR+1~, SUPPR+4*, SUPPR+5*
GMTSRL SUPPR+1~, SUPPR+5*, SUPPR+6*, SUPPR+7, SUPPR+8
GMTSRLI SUPPR+1~, SUPPR+8*
IX MAIN+1~, MAIN+5*, MAIN+7, MAIN+8, MAIN+9, MAIN+10, WRT+9, WRTSPC+4, TEXT+4, SUPPR+3
, SUPPR+5, WRTTM+3, WRTTM+5, WRTTM+6, WRTTM+8, WRTTM+10, WRTTM+12, WRTTM+13, WRTP+2, WRTP+4
, WRTP+5
IX0 MAIN+1~, MAIN+7*, MAIN+8, WRT+2, WRT+7, WRT+8, WRT+9, TEXT+4, WRTTM+3, WRTTM+5
, WRTTM+6, WRTTM+8, WRTTM+10, WRTTM+12, WRTTM+13, WRTP+2, WRTP+4, WRTP+5
IX1 WRT+1~, WRT+9*, SUPPR+2*, SUPPR+3*, SUPPR+5, WRTTM+3, WRTTM+5, WRTTM+6, WRTTM+8, WRTTM+10
, WRTTM+12, WRTTM+13, WRTP+2, WRTP+4, WRTP+5
LN TEXT+1~, TEXT+3*, TEXT+4*
LRDFN MAIN+1~, MAIN+2*
MAX MAIN+1~, MAIN+3*, MAIN+5
SP MAIN+1~, MAIN+9*, WRT+5, WRT+6
SRDATE SUPPR+1~, SUPPR+3*
U WRT+4, WRTTM+2, WRTP+5
X MAIN+1~, MAIN+8*, WRT+4, WRT+9*, TEXT+2, SUPPR+1~, SUPPR+3*, WRTTM+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All