Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

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

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
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call