Routine: BLRCCPED

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
IHS Changes To Lab	3	(EEP,HEADERDT,LINEWRAP,PRESSKEY)^BLRGMENU $$GETACCCP^BLRUTIL3 RETACCV^BLRUTIL4
VA Fileman	3	UPDATE^DIE $$GET1^DIQ ^DIR
Kernel	2	($$DT,$$HTFM,$$NOW)^XLFDT $$CJ^XLFSTR
IHS VA Utilities	1	^XBFMK
Toolkit	1	($$GET,EN)^XPAR

Package

Total

Call Graph

IHS Changes To Lab

(EEP,HEADERDT,LINEWRAP,PRESSKEY)^BLRGMENU $$GETACCCP^BLRUTIL3 RETACCV^BLRUTIL4

VA Fileman

UPDATE^DIE $$GET1^DIQ ^DIR

Kernel

($$DT,$$HTFM,$$NOW)^XLFDT $$CJ^XLFSTR

IHS VA Utilities

^XBFMK

Toolkit

($$GET,EN)^XPAR

Package	Total	Caller Graph
Automated Lab Instruments	1	LA7CSHL
Lab Service	1	LRVER4

Package

Total

Caller Graph

Automated Lab Instruments

LA7CSHL

Lab Service

LRVER4

Entry Points

Name	Comments	DBIA/ICR reference
GETCCDTA(LRDFN,LRSS,LRIDT)	; EP - Get CC Data; Called from LRVER4
GETCCDTO(LRODT,LRSP,LRTST)	; EP - Get CC Data; called from LROW2A
PEP	; EP
EEP	; Ersatz EP
UYEXPORT(UID)	; EP - Given an UID, call YEXPORTD
AYEXPORT(LRAS)	; EP - Given an accession number, call YEXPORTD
RPTERR(ERROR)	; EP
YEXPORTD(LRDFN,LRSS,LRIDT)	; EP - Put YES into EXPORTED DATA field in file 63
CHANGE	; EP

External References

Name	Field # of Occurrence
EEP^BLRGMENU	EEP+1
HEADERDT^BLRGMENU	CHANGE+10
LINEWRAP^BLRGMENU	RPTERR+9
PRESSKEY^BLRGMENU	CHANGE+20, RPTERR+12, GETCCDTA+26
$$GETACCCP^BLRUTIL3	AYEXPORT+3
RETACCV^BLRUTIL4	UYEXPORT+2
UPDATE^DIE	GETCCDTA+36, YEXPORTD+9
$$GET1^DIQ	GETCCDTO+6, AYEXPORT+5, AYEXPORT+7, AYEXPORT+8, UYEXPORT+3
^DIR	CHANGE+16, GETCCDTA+15, GETCCDTA+23
^XBFMK	CHANGE+12, GETCCDTA+10, GETCCDTA+20
$$DT^XLFDT	RPTERR+15
$$HTFM^XLFDT	RPTERR+16
$$NOW^XLFDT	GETCCDTA+29
$$CJ^XLFSTR	CHANGE+5
$$GET^XPAR	CHANGE+7, GETCCDTA+7
EN^XPAR	CHANGE+24

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,?4,"Invalid/No Entry/Quit. Routine Ends." Line Location: CHANGE+19
Function Call: WRITE	Prompt: !!,"* ERROR Modifying BLR CC DATA paramter. *",!! Line Location: RPTERR+6
Function Call: WRITE	Prompt: ?4,"Error Number:",ERRNUM,! Line Location: RPTERR+7
Function Call: WRITE	Prompt: ! Line Location: RPTERR+10
Function Call: WRITE	Prompt: !! Line Location: GETCCDTA+18
Function Call: WRITE	Prompt: !,?4,"Invalid/No/Quit Input. Routine Ends." Line Location: GETCCDTA+25
Routine Call	DIE Line Location: GETCCDTA+36 YEXPORTD+9
Routine Call	DIR Line Location: CHANGE+16 GETCCDTA+15 GETCCDTA+23

FileNo	Call Tags
^LRO(68 - [#68]	GET1^DIQ
68.02	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^LRO(68 - [#68]	GETCCDTO+10
^LRO(69 - [#69]	GETCCDTO+3
^XTMP("BLRCCPED"	RPTERR+15, RPTERR+16, RPTERR+18, RPTERR+19*

Name	Line Occurrences
GETCCDTA	GETCCDTO+13
RPTERR	CHANGE+26
YEXPORTD	AYEXPORT+10, UYEXPORT+5

Name	Field # of Occurrence
^(3	GETCCDTO+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ANSWER	CHANGE+22*, CHANGE+24
CCIEN	GETCCDTA+1~, GETCCDTA+28*, GETCCDTA+29
CCNAME	GETCCDTA+1~, GETCCDTA+28*, GETCCDTA+29
CCSTR	GETCCDTA+1~, GETCCDTA+29*, GETCCDTA+35
>> DILOCKTM	CHANGE+1
>> DIR("A"	CHANGE+14, GETCCDTA+13, GETCCDTA+22*
>> DIR("B"	CHANGE+15, GETCCDTA+14
>> DIR(0	CHANGE+13, GETCCDTA+11, GETCCDTA+21*
>> DIRUT	CHANGE+18, GETCCDTA+16, GETCCDTA+24
>> DISYS	CHANGE+1
DT	CHANGE+1
DTIME	CHANGE+1
DUZ	CHANGE+1, RPTERR+18, GETCCDTA+29
ERRDESC	RPTERR+1~, RPTERR+4*, RPTERR+8, RPTERR+9
ERRNUM	RPTERR+1~, RPTERR+3*, RPTERR+7
ERROR	RPTERR~, RPTERR+3, RPTERR+4, RPTERR+19
ERRS	CHANGE+24, CHANGE+26, GETCCDTA+1~, YEXPORTD+1~
FDA	GETCCDTA+1~, YEXPORTD+1~
FDA(	GETCCDTA+35, YEXPORTD+8
HEADER	GETCCDTA+1~
HEADER(1	CHANGE+3*
HEADER(2	CHANGE+4*
HEADER(3	CHANGE+5*
IENS	GETCCDTA+1~, GETCCDTA+34, GETCCDTA+35, YEXPORTD+1~, YEXPORTD+3, YEXPORTD+8, AYEXPORT+1~, AYEXPORT+6*, AYEXPORT+7, AYEXPORT+8 , UYEXPORT+1~
IO	CHANGE+1
>> IOBS	CHANGE+1
IOF	CHANGE+1
IOM	CHANGE+1, CHANGE+5
ION	CHANGE+1
>> IOS	CHANGE+1
IOSL	CHANGE+1
IOST	CHANGE+1
>> IOT	CHANGE+1
>> IOXY	CHANGE+1
LRAA	GETCCDTO+1~, GETCCDTO+4*, GETCCDTO+6, GETCCDTO+10, AYEXPORT+1~, AYEXPORT+3, AYEXPORT+5, AYEXPORT+6, UYEXPORT+1~, UYEXPORT+2 , UYEXPORT+3
LRAD	GETCCDTO+1~, GETCCDTO+9*, GETCCDTO+10, AYEXPORT+1~, AYEXPORT+3, AYEXPORT+6, UYEXPORT+1~, UYEXPORT+2
LRAN	GETCCDTO+1~, GETCCDTO+9*, GETCCDTO+10, AYEXPORT+1~, AYEXPORT+3, AYEXPORT+6, UYEXPORT+1~, UYEXPORT+2
LRAS	AYEXPORT~, AYEXPORT+3
LRDFN	GETCCDTO+1~, GETCCDTO+10, GETCCDTO+11, GETCCDTO+13, GETCCDTA~, GETCCDTA+34, YEXPORTD~, YEXPORTD+3, AYEXPORT+1~, AYEXPORT+7 , AYEXPORT+10, UYEXPORT+1~, UYEXPORT+2, UYEXPORT+5
LRIDT	GETCCDTO+1~, GETCCDTO+10, GETCCDTO+11, GETCCDTO+13, GETCCDTA~, GETCCDTA+34, YEXPORTD~, YEXPORTD+3, AYEXPORT+1~, AYEXPORT+8 , AYEXPORT+10, UYEXPORT+1~, UYEXPORT+2, UYEXPORT+5
LRODT	GETCCDTO~, GETCCDTO+3
LRSP	GETCCDTO~, GETCCDTO+3
LRSS	GETCCDTO+1~, GETCCDTO+6, GETCCDTO+7, GETCCDTO+13, GETCCDTA~, GETCCDTA+32, YEXPORTD~, YEXPORTD+6, AYEXPORT+1~, AYEXPORT+5 , AYEXPORT+10, UYEXPORT+1~, UYEXPORT+2, UYEXPORT+3*, UYEXPORT+5
LRTST	GETCCDTO~, GETCCDTO+3
NOWH	RPTERR+1~, RPTERR+14*, RPTERR+18, RPTERR+19
RESULT	CHANGE+7, CHANGE+8, CHANGE+15, GETCCDTA+1~, GETCCDTA+7*, GETCCDTA+8
>> STR	GETCCDTO+3*, GETCCDTO+4, GETCCDTO+9
U	CHANGE+1
UID	UYEXPORT~, UYEXPORT+2
WOTSUBF	GETCCDTA+1~, GETCCDTA+32, GETCCDTA+35, YEXPORTD+6, YEXPORTD+8
>> X	CHANGE+22, GETCCDTA+24
>> XPARSYS	CHANGE+1
>> XQXFLG	CHANGE+1
>> XTMP("BLRCCPED"	RPTERR+15*
>> Y	CHANGE+18, GETCCDTA+16, GETCCDTA+28

Customize PDF page

Package: IHS Changes To Lab

Routine: BLRCCPED

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: