Routine: ONCOCKI

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

ONCOCKI ;Hines OIFO/GWB - Edit checks/INPUT TRANSFORM edit checks ;06/23/10

Source Information

Source file <ONCOCKI.m>

Call Graph

Call Graph Total: 1

Package	Total	Call Graph
Oncology	1	SDP^ONCOCOM

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 3

Package	Total	Caller Graph
Oncology	3	ONCOAIC ONCOAIM ^ONCO(165.5

Entry Points

Name	Comments	DBIA/ICR reference
11
ACN	;Accession Number check
SGAN	;SET GREATEST ACCESSION NUMBER @ ACCESSION YEAR
KGAN	;RESET GREATEST ACCESSION NUMBER @YEAR
RE
GN	;GET NEXT GREATEST ACCESSION NUMBER
KACD	;CHECK DELETED NUMBER
SEQ	;SEQUENCE NUMBER (165.5,.06)
PSEX	;PATIENT NAME (165.5,.02) INPUT TRANSFORM
SEX
EX	;Kill variables and Exit
CLEANUP	;Cleanup

External References

Name	Field # of Occurrence
SDP^ONCOCOM	SEQ+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"***DATE DX is after LAST DATE CONTACT*** ",Y,! Line Location: 11+1
Function Call: WRITE	Prompt: *7,?50,"Number is already assigned!!" Line Location: ACN+1
Function Call: WRITE	Prompt: !?10,"NEED TO RE-INITIALIAZE FILE" Line Location: RE+0
Function Call: WRITE	Prompt: !?50,"No ACCESSION NUMBER assigned",!! Line Location: SEQ+2
Function Call: WRITE	Prompt: !?25,XX," is already assigned.",! Line Location: SEQ+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ONCO(160 - [#160]	11, SEX+2
^ONCO(164.2 - [#164.2]	SEX+4, SEX+7
^ONCO(165.5 - [#165.5]	11, ACN+1, SGAN+1, SGAN+2, KGAN+1, GN+1, GN+2!, KACD+1*, SEQ+1, SEQ+3 , PSEX+1

Label References

Name	Line Occurrences
EX	SGAN+1, SGAN+2, KGAN+1, RE, GN+1, GN+2, KACD+1
GN	KGAN+1
RE	KGAN+1

Naked Globals

Name	Field # of Occurrence
^(	SGAN+2*, KGAN+1
^(1	11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AC	GN+1*, EX+1!
D0	11, ACN+1, SEQ+1, PSEX+1, CLEANUP+1!
SG	SEX+1~, SEX+4, SEX+5, SEX+7, SEX+8
SX	SEX+1~, SEX+2*, SEX+3, SEX+6
U	11, ACN+1, SEQ+1, PSEX+1, SEX+2, SEX+4, SEX+7
X	11, 11+1!, ACN+1!, SGAN+1, SGAN+2, KGAN+1, GN+1, KACD+1, SEQ+2!, SEQ+3 , SEQ+4!, PSEX+1, SEX+3!, SEX+6!
XD0	PSEX+1*, SEX+2, EX+1!
XX	SEQ+1, SEQ+2!, SEQ+3, SEQ+4!, PSEX+1*, SEX, SEX+3, SEX+4, SEX+6, SEX+7 , EX+1!
Y	11, 11+1!
YR	SGAN+1, SGAN+2, KGAN+1, GN+1, GN+2, KACD+1, EX+1!