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

Package: Oncology

Routine: ONCOAIP


Information

ONCOAIP ;HINES OIFO/GWB - [EE Abstract Edit Primary] ;09/26/11

Source Information

Source file <ONCOAIP.m>

Entry Points

Name Comments DBIA/ICR reference
ED ;[EE Abstract Edit Primary]
EN
PAIR ;LATERALITY (165.5,28)
HISTXT ;Stuff TEXT-HISTOLOGY TITLE (165.5,101)
MEN ;Primary Menu Options
A
Y
HP
PAT ;Patient Identification
CAN
EXT
PSD
NOSTAGE ;No staging
FST
ORF
NTX ;DATE OF NO TREATMENT (165.5,124)
RS ;RADIATION/SURGERY SEQUENCE (165.5,51.3)
AB ;Abstract Status
NAN ;NEW ACC #
NA
FND ;SEARCH for unused #s
NR
TOPNAM ;PRIMARY SITE and PRIMARY SITE CODE for header
SECTION
EX ;Exit
CLEANUP ;Cleanup

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: ED+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: MEN+22
Function Call: WRITE
  • Prompt: !,?1,PATNAM,?SITTAB,SITEGP,!,?1,SSN,?TOPTAB,TOPNAM," ",TOPCOD,!,DASHES
  • Line Location: MEN+23
Function Call: WRITE
  • Prompt: !,?25,"Primary Menu Options",!,DASHES
  • Line Location: MEN+24
Function Call: WRITE
  • Prompt: !?22,"1. Patient Identification"
  • Line Location: MEN+25
Function Call: WRITE
  • Prompt: !?22,"2. Cancer Identification"
  • Line Location: MEN+26
Function Call: WRITE
  • Prompt: !?22,"3. Stage of Disease at Diagnosis"
  • Line Location: MEN+27
Function Call: WRITE
  • Prompt: !?22," Collaborative Staging (2004+ cases)"
  • Line Location: MEN+28
Function Call: WRITE
  • Prompt: !?22,"4. First Course of Treatment"
  • Line Location: MEN+29
Function Call: WRITE
  • Prompt: !?22,"5. Performance Measures"
  • Line Location: MEN+30
Function Call: WRITE
  • Prompt: !?22,"6. Over-ride Flags"
  • Line Location: MEN+31
Function Call: WRITE
  • Prompt: !?22,"7. Case Administration"
  • Line Location: MEN+32
Function Call: WRITE
  • Prompt: !?22,"8. EDIT Modifiers"
  • Line Location: MEN+33
Function Call: WRITE
  • Prompt: !?22,"9. User-Defined Fields"
  • Line Location: MEN+34
Function Call: WRITE
  • Prompt: !!?22,"A All - Complete Abstract"
  • Line Location: MEN+35
Function Call: WRITE
  • Prompt: "??"
  • Line Location: A+7
Function Call: WRITE
  • Prompt: !!,?10,"Select 'A' for the complete abstract"
  • Line Location: HP+0
Function Call: WRITE
  • Prompt: !?10,"Select 1-9 for the desired subsection",!
  • Line Location: HP+1
Function Call: WRITE
  • Prompt: !?18,"====> UNKNOWN PRIMARY - No EOD/TNM coding <===="
  • Line Location: EXT+17
Function Call: WRITE
  • Prompt: !!?5,"You have entered a DATE OF NO TREATMENT. Relevant treatment"
  • Line Location: NTX+6
Function Call: WRITE
  • Prompt: !?5,"fields will be stuffed with the appropriate value indicating no"
  • Line Location: NTX+7
Function Call: WRITE
  • Prompt: !?5,"treatment.",!
  • Line Location: NTX+8
Function Call: WRITE
  • Prompt: !
  • Line Location: NTX+11
Function Call: WRITE
  • Prompt: !," Abstract Status.............: ",ONC(165.5,D0,91)
  • Line Location: AB+8
Function Call: WRITE
  • Prompt: !," Date Case Initiated.........: ",ONC(165.5,D0,236)
  • Line Location: AB+9
Function Call: WRITE
  • Prompt: !," Initiated By................: ",ONC(165.5,D0,244)
  • Line Location: AB+10
Function Call: WRITE
  • Prompt: !," Date of First Contact.......: ",ONC(165.5,D0,155)
  • Line Location: AB+11
Function Call: WRITE
  • Prompt: !," Date Case Completed.........: "
  • Line Location: AB+12
Function Call: WRITE
  • Prompt: $$FMTE^XLFDT(ONCDTEMP,"5P")
  • Line Location: AB+12
Function Call: WRITE
  • Prompt: !," Elapsed Days to Completion..: ",$$GET1^DIQ(165.5,D0,157,"E")
  • Line Location: AB+13
Function Call: WRITE
  • Prompt: !," Abstracted by...............: ",ONC(165.5,D0,92)
  • Line Location: AB+15
Function Call: WRITE
  • Prompt: !," Date Case Last Changed......: "
  • Line Location: AB+16
Function Call: WRITE
  • Prompt: $$FMTE^XLFDT(ONCDTEMP,"5P")
  • Line Location: AB+16
Function Call: WRITE
  • Prompt: !," Case Last Changed by........: ",ONC(165.5,D0,199)
  • Line Location: AB+17
Function Call: WRITE
  • Prompt: !,DASHES
  • Line Location: AB+18
Function Call: WRITE
  • Prompt: !!
  • Line Location: NAN+1
Function Call: WRITE
  • Prompt: !!?5,"SYSTEM appears out of numbers-looking for unassigned ones"
  • Line Location: NA+1
Function Call: WRITE
  • Prompt: !!?10,"OUT of ACCESSION Numbers for 19"_YR
  • Line Location: NR+1
Function Call: WRITE
  • Prompt: @IOF,DASHES
  • Line Location: SECTION+1
Function Call: WRITE
  • Prompt: !,?1,PATNAM,?TAB,SECTION,?SITTAB,SITEGP
  • Line Location: SECTION+2
Function Call: WRITE
  • Prompt: !,?1,SSN,?TOPTAB,TOPNAM," ",TOPCOD
  • Line Location: SECTION+3
Function Call: WRITE
  • Prompt: !,DASHES
  • Line Location: SECTION+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ONCO(160 - [#160] GET1^DIQ
^ONCO(165.5 - [#165.5] Classic Fileman Calls,  GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call