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: GMTSLRCP

Package: Health Summary

Routine: GMTSLRCP


Information

GMTSLRCP ; SLC/JER,KER - Cytopathology Comp Dvr ; 09/21/2001

Source Information

Source file <GMTSLRCP.m>

Call Graph

Call Graph

Call Graph Total: 5

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

Entry Points

Name Comments DBIA/ICR reference
MAIN ; Cytopathology
TRVRS ; Traverses/Interprets ^TMP("LRCY",$J,
AH ; Writes clinical history
G ; Writes Gross Description
MI ; Writes Microscopic exam/diagnosis field
SR ; Writes Supplementary Reports
ND ; Writes Diagnosis field
OT ; Traverses/Interprets Organ/Tissue Subarray
D ; Writes Disease Field
M ; Writes Morphology Field
P ; Writes Procedure Field
XI ; Writes ICD diagnoses

External References

Name Field # of Occurrence
$$GET1^DIQ MAIN+2
^GMTSLRPE MAIN+3
$$WRAP^GMTSORC AH+5, G+5, MI+5, SR+7, ND+6, P+3
REGDTM4^GMTSU SR+4
CKP^GMTSUP MAIN+6, TRVRS+2, TRVRS+3, TRVRS+4, AH+2, AH+6, AH+7, G+2, G+6, G+7
, MI+2, MI+6, MI+7, SR+3, SR+8, SR+10, SR+12, ND+2, ND+7, ND+9
, OT+1, D+1, M+2, M+4, M+6, P+2, P+4, P+7, XI+1, XI+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?8,"Collected:",?19,$P(^TMP("LRCY",$J,IX,IX0),U),?31,"Acc:",?36,$P(^TMP("LRCY",$J,IX,IX0),U,2),!
  • Line Location: TRVRS+2
Function Call: WRITE
  • Prompt: ?19,^TMP("LRCY",$J,IX,IX0,GMS),!
  • Line Location: TRVRS+3
Function Call: WRITE
  • Prompt: ?18,"** REPORT NOT YET RELEASED **",!
  • Line Location: TRVRS+4
Function Call: WRITE
  • Prompt: !,"Brief Clinical Hx:",!
  • Line Location: AH+2
Function Call: WRITE
  • Prompt: $P(GMTSHL,"|"),!
  • Line Location: AH+6
Function Call: WRITE
  • Prompt: !,"Gross Description:",!
  • Line Location: G+2
Function Call: WRITE
  • Prompt: $P(GMTSGL,"|"),!
  • Line Location: G+6
Function Call: WRITE
  • Prompt: !,"Microscopic exam:",!
  • Line Location: MI+2
Function Call: WRITE
  • Prompt: $P(GMTSML,"|"),!
  • Line Location: MI+6
Function Call: WRITE
  • Prompt: !,"Supplementary Rpt: ",X,!
  • Line Location: SR+4
Function Call: WRITE
  • Prompt: $P(GMTSLINE,"|"),!
  • Line Location: SR+8
Function Call: WRITE
  • Prompt: !
  • Line Location: SR+12
Function Call: WRITE
  • Prompt: !," Cytopathology Dx:",!
  • Line Location: ND+2
Function Call: WRITE
  • Prompt: $P(GMTSDL,"|"),!
  • Line Location: ND+7
Function Call: WRITE
  • Prompt: ?7,"Topography:",?19,^TMP("LRCY",$J,IX,IX0,OT),!
  • Line Location: OT+2
Function Call: WRITE
  • Prompt: ?21,^TMP("LRCY",$J,IX,IX0,OT),!
  • Line Location: D+3
Function Call: WRITE
  • Prompt: ?7,"Morphology:",?21,$P(^TMP("LRCY",$J,IX,IX0,OT),U),!
  • Line Location: M+3
Function Call: WRITE
  • Prompt: ?23,^TMP("LRCY",$J,IX,IX0,OT,GME),!
  • Line Location: M+8
Function Call: WRITE
  • Prompt: ?21,$P(GMTSJ,"|"),!
  • Line Location: P+5
Function Call: WRITE
  • Prompt: " ICD-9 Diagnoses:"
  • Line Location: XI+1
Function Call: WRITE
  • Prompt: ?19,$P(^TMP("LRCY",$J,IX,IX0,GMTSDX),U)
  • Line Location: XI+4
Function Call: WRITE
  • Prompt: ?28,$P(^TMP("LRCY",$J,IX,IX0,GMTSDX),U,2),!
  • Line Location: XI+5

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LR - [#63] MAIN+2
^TMP("LRCY" MAIN+4, MAIN+5, MAIN+7, MAIN+9!, TRVRS+2, TRVRS+3, TRVRS+4, AH+4, G+4, MI+4
, SR+2, SR+3, SR+6, SR+7, ND+4, OT+2, OT+3, D+3, M+3, M+5
, M+8, P+1, XI+2, XI+4, XI+5
^UTILITY($J P+9!

Label References

Name Line Occurrences
@( TRVRS+5, OT+3
TRVRS MAIN+8

Naked Globals

Name Field # of Occurrence
^( AH+4, G+4, MI+4, ND+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN MAIN+2
GME M+1~, M+5*, M+7, M+8
GMI MAIN+1~, MAIN+5*, MAIN+6
GMK P+1~, P+6*, P+8
GMS TRVRS+1~, TRVRS+3*
GMTSD ND+1~, ND+3*, ND+4*, ND+5
GMTSDL ND+1~, ND+5*, ND+6*, ND+7, ND+8, ND+10
GMTSDLI ND+1~, ND+8*, ND+10
GMTSDX XI+1~*, XI+2*, XI+4, XI+5
GMTSG G+1~, G+3*, G+4*
GMTSGL G+1~, G+4*, G+5*, G+6, G+7
GMTSGLI G+1~, G+7*
GMTSH AH+1~, AH+3*, AH+4*
GMTSHL AH+1~, AH+4*, AH+5*, AH+6, AH+7
GMTSHLI AH+1~, AH+7*
GMTSJ P+1~*, P+3*, P+5, P+6, P+8
GMTSL SR+1~, SR+9*, SR+11
GMTSLINE SR+1~, SR+7*, SR+8, SR+9, SR+11
GMTSM MI+1~, MI+3*, MI+4*
GMTSML MI+1~, MI+4*, MI+5*, MI+6, MI+7
GMTSMLI MI+1~, MI+7*
>> GMTSNDM MAIN+3
>> GMTSNPG MAIN+6, D+2, M+7, P+4, XI+3
>> GMTSQIT MAIN+5, MAIN+6, MAIN+7, TRVRS+2, TRVRS+3, TRVRS+4, AH+2, AH+6, AH+7, G+2
, G+6, G+7, MI+2, MI+6, MI+7, SR+2, SR+3, SR+6, SR+8, SR+9
, SR+10, SR+12, ND+2, ND+4, ND+7, ND+8, ND+9, OT+1, D+1, M+2
, M+4, M+5, M+6, P+2, P+4, P+6, P+7, XI+1, XI+2, XI+3
GMTSR SR+1~, SR+5*, SR+6*, SR+7
IX MAIN+1~, MAIN+4*, MAIN+5*, MAIN+7, TRVRS+2, TRVRS+3, TRVRS+4, AH+4, G+4, MI+4
, SR+2, SR+3, SR+6, SR+7, ND+4, OT+2, OT+3, D+3, M+3, M+5
, M+8, P+1, XI+2, XI+4, XI+5
IX0 MAIN+1~, MAIN+6*, MAIN+7*, TRVRS+2, TRVRS+3, TRVRS+4, TRVRS+5, AH+4, G+4, MI+4
, SR+2, SR+3, SR+6, SR+7, ND+4, OT+2, OT+3, D+3, M+3, M+5
, M+8, P+1, XI+2, XI+4, XI+5
IX1 MAIN+1~, SR+1*, SR+2*, SR+3, SR+6, SR+7
LRDFN MAIN+1~, MAIN+2*
MAX MAIN+1~, MAIN+3*, MAIN+5
OT OT+1~*, OT+2, OT+3*, D+2, D+3, M+3, M+5, M+8, P+1, P+4
SPEC TRVRS+1~
SRDATE SR+1~, SR+3*, SR+4
U TRVRS+2, TRVRS+4, M+3, P+1, XI+4, XI+5
X SR+1~, SR+4*
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