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
Print Page as PDF
Routine: ONCSCHMT

Package: Oncology

Routine: ONCSCHMT


Information

ONCSCHMT ;HINES OIFO/RTK - TEMPLATE JUMPING BASED ON SCHEMA CODE ;09/11/18

Source Information

Source file <ONCSCHMT.m>

Entry Points

Name Comments DBIA/ICR reference
TMP1 ;Utility to display chapters/names/codes in string set below
TMP1SUB
TMP2 ;Utility to display very long character strings
TMP3 ;Utility to display the Chapter and AJCC ID
NOAJCC ;Utility to find/display Grade tables & AJCC ID/Chapter
FINDTS ;Utility to find 165.8 entries without T codes --> these use Parent ptr
FINDNS ;Utility to find 165.8 entries without N codes --> these use Parent ptr
FINDMS ;Utility to find 165.8 entries without M codes --> these use Parent ptr
LISTAJ ;List the AJCC Chapter/ID and which entry in File #165.8 it points to
TESTEOD ;Utility to find 165.9 entries without HELP codes

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?1,"Chapter: ",$P($G(^ONCO(165.8,ONCSDIEN,0)),U,1)
  • Line Location: TMP1SUB+0
Function Call: WRITE
  • Prompt: ?15,"Chapter Name: ",$E($P($G(^ONCO(165.8,ONCSDIEN,0)),U,2),1,51),!
  • Line Location: TMP1SUB+1
Function Call: WRITE
  • Prompt: ?29,$E($P($G(^ONCO(165.8,ONCSDIEN,0)),U,2),52,90),!
  • Line Location: TMP1SUB+1
Function Call: WRITE
  • Prompt: !?7,$E($P($G(^ONCO(165.8,ONCSDIEN,1,IEN,1)),U,1),75,147)
  • Line Location: TMP1SUB+5
Function Call: WRITE
  • Prompt: !?7,$E($P($G(^ONCO(165.8,ONCSDIEN,1,IEN,1)),U,1),148,222)
  • Line Location: TMP1SUB+5
Function Call: WRITE
  • Prompt: !?7,$E($P($G(^ONCO(165.8,ONCSDIEN,1,IEN,1)),U,1),223,297)
  • Line Location: TMP1SUB+6
Function Call: WRITE
  • Prompt: !?7,$E($P($G(^ONCO(165.8,ONCSDIEN,1,IEN,1)),U,1),298,334)
  • Line Location: TMP1SUB+6
Function Call: WRITE
  • Prompt: !,N123,!
  • Line Location: TMP2+2
Function Call: WRITE
  • Prompt: !?9,LINE
  • Line Location: TMP2+6
Function Call: WRITE
  • Prompt: !?9,LINE
  • Line Location: TMP2+7
Function Call: WRITE
  • Prompt: ?5,"SCHEMA ID=",$P($G(^ONCO(164.44,IEN,1,SUBIEN,0)),"^",1)," AJCC CHAPTER #=",$P($G(^ONCO(164.44,IEN,1,SUBIEN,0)),"^",3)," AJCC ID=",$P($G(^ONCO(164.44,IEN,1,SUBIEN,0)),"^",5)
  • Line Location: NOAJCC+3
Function Call: WRITE
  • Prompt: !,$P($G(^ONCO(165.8,AJIEN,0)),U,1)," --> NO STAGE CODES"
  • Line Location: FINDTS+2
Function Call: WRITE
  • Prompt: "...USE "
  • Line Location: FINDTS+3
Function Call: WRITE
  • Prompt: " ",ONCPARNT
  • Line Location: FINDTS+3
Function Call: WRITE
  • Prompt: " ",ONCPARNT
  • Line Location: FINDTS+3
Function Call: WRITE
  • Prompt: !,$P($G(^ONCO(165.8,AJIEN,0)),U,1)," --> NO STAGE CODES"
  • Line Location: FINDNS+2
Function Call: WRITE
  • Prompt: "...USE "
  • Line Location: FINDNS+3
Function Call: WRITE
  • Prompt: " ",ONCPARNT
  • Line Location: FINDNS+3
Function Call: WRITE
  • Prompt: " ",ONCPARNT
  • Line Location: FINDNS+3
Function Call: WRITE
  • Prompt: !,$P($G(^ONCO(165.8,AJIEN,0)),U,1)," --> NO STAGE CODES"
  • Line Location: FINDMS+2
Function Call: WRITE
  • Prompt: "...USE "
  • Line Location: FINDMS+3
Function Call: WRITE
  • Prompt: " ",ONCPARNT
  • Line Location: FINDMS+3
Function Call: WRITE
  • Prompt: " ",ONCPARNT
  • Line Location: FINDMS+3
Function Call: WRITE
  • Prompt: ?24,"AJCHP=",AJCHP
  • Line Location: LISTAJ+4
Function Call: WRITE
  • Prompt: ?36,"AJIEN=",AJIEN
  • Line Location: LISTAJ+5
Function Call: WRITE
  • Prompt: ?47,"CHAP=",AJ1658
  • Line Location: LISTAJ+7
Function Call: WRITE
  • Prompt: ?56,">",$E(AJCHN,1,23)
  • Line Location: LISTAJ+8
Function Call: WRITE
  • Prompt: "----> NO PT !!!!"
  • Line Location: TESTEOD+3
Function Call: WRITE
  • Prompt: "----> NO RN !!!!"
  • Line Location: TESTEOD+4
Function Call: WRITE
  • Prompt: "----> NO MT !!!!"
  • Line Location: TESTEOD+5
Info |  Source |  Entry Points |  Interaction Calls