Routine: BVCONV

Package	Total	Call Graph
Kernel	4	(,HOME)^%ZIS $$HTE^XLFDT ^XUP STOP^ZTMKU
VA Fileman	3	IX^DIC YN^DICN ^DIR
IHS V Files 200 Conversion	2	^BVCINIT (,EN)^BVCONV1
MailMan	1	^XMD

Package	Total	Caller Graph
IHS V Files 200 Conversion	2	BVCHK BVCONV1

Entry Points

Name	Comments	DBIA/ICR reference
PR	;EP get a default provider
ELEMLST(BVCFLG)	;EP get list of conversion elements ; If BVCFLG=0 check to for file 200 pointers (an indication the ; conversion has been started or complete) ; If BVCFLG=1 build conversion table
ZIS()	; get device variables
EN	;EP
TASKCHK()	; check if taskman and servers are down
EXEC	;EP; call here to see whether the completion is complete
FM(BVCNUMB,BVCFLD)	; function to determine whether fileman must be used ; must use fileman when field has cross references or an audit node not ; equal to n
SPLASH	; splash screen message
ABORT(BVCFLG)	;
ELEM	; conversion element records in the format ; file number^file root^direct set (flag);field number;node;piece^..
O
XMD(BVCST,BVCCVTM)	;EP send a mail message of abort or completion
EXIT
RESTRT	;EP; call here to restart the conversion
DELETE	;EP delete conversion routine

External References

Name	Field # of Occurrence
^%ZIS	ZIS+1
HOME^%ZIS	PR+25
^BVCINIT	PR+13
^BVCONV1	EN+9, EXEC+1
EN^BVCONV1	O+3
IX^DIC	PR+4
YN^DICN	RESTRT+5
^DIR	PR+20
$$HTE^XLFDT	O, XMD+6
^XMD	XMD+20
^XUP	EN+2
STOP^ZTMKU	PR+10

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This routine can't be called from the top" Line Location: BVCONV+3
Function Call: WRITE	Prompt: !,"Your DUZ must be defined." Line Location: EN+4
Function Call: WRITE	Prompt: !,"You must have fileman programmer access to run this routine." Line Location: EN+5
Function Call: WRITE	Prompt: !!,"In case a provider file pointer can not be resolved to a file " Line Location: PR+1
Function Call: WRITE	Prompt: "200 pointer, a default provider must determined for use." Line Location: PR+2
Function Call: WRITE	Prompt: !!,"TASKMAN AND SERVERS ARE NOT SHUT DOWN." Line Location: PR+11
Function Call: WRITE	Prompt: !!,"EXITING" Line Location: EXIT+0
Function Call: WRITE	Prompt: !!,"This program will repoint field values, that currently point to file 6, to file",!,"200. and change targeted AUPN* file data dictionaries to file 200 versus 6" Line Location: SPLASH+1
Function Call: WRITE	Prompt: !,"pointer datatypes. If a field value (provider pointer) can not be resolved to a",!,"corresponding file 200 entry, the default provider you supply will be used. " Line Location: SPLASH+2
Function Call: WRITE	Prompt: !,"You have "_$FN(BVCRCNT,",")_" records to repoint, and this process will take between",!,"3 to 8 hours, depending on your system. It is imperative to permit this process" Line Location: SPLASH+3
Function Call: WRITE	Prompt: !,"to complete. Please turn off journalling until you are notified the conversion",!,"is complete. A notification of completion will be sent to your's and the" Line Location: SPLASH+4
Function Call: WRITE	Prompt: !,"postmaster's mailbox. Exceptions are recorded in the FILE 200 CONVERSION ERROR",!,"FILE file." Line Location: SPLASH+5
Function Call: WRITE	Prompt: !!,"If you have any questions, please call the Help Desk desk",! Line Location: SPLASH+6
Function Call: WRITE	Prompt: !!,"The conversion of PCC data to file 200 pointers is being aborted." Line Location: ABORT+2
Function Call: WRITE	Prompt: !,"Condition flag: "_$P(BVCFLG,U,2,99) Line Location: ABORT+4
Function Call: WRITE	Prompt: !!,"If you need assistance, call the Help Desk." Line Location: ABORT+12
Function Call: WRITE	Prompt: !!,"* RESTART OF THE PCC CONVERSION *",!! Line Location: RESTRT+1
Function Call: WRITE	Prompt: !,"The conversion is "_$S($L($T(^BVCONV1)):"not",1:"")_" complete.",! Line Location: EXEC+1
Routine Call	%ZIS Line Location: PR+25
Routine Call	DIR Line Location: PR+20
Routine Call	%ZIS Line Location: ZIS+1
Routine Call	DIC Line Location: PR+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("BRK"	O+5
^%ZOSF("DEL"	DELETE+2, DELETE+3, DELETE+4, DELETE+5
^%ZOSF("NBRK"	O+1
^%ZTSCH("RUN"	TASKCHK+1
^%ZTSCH("STOP"	TASKCHK+1
^BVCHK(1	EN+8, EN+16
^BVCONV(1	EN+6, PR+24!, PR+26, PR+27, O+1*, RESTRT+3, RESTRT+6!
^BVCONV1(	EN+11, XMD+5, XMD+11, XMD+12
^DD(	FM+4, FM+5, ELEMLST+12
^DIC - [#1]	XMD+13
^VA(200 - [#200]	XMD+15

Label References

Name	Line Occurrences
$$FM	ELEMLST+13
$$TASKCHK	PR+10, PR+11
$$ZIS	PR+22
ABORT	EN+6, EN+8, EN+9, EN+12, EN+13, EN+17, PR+16
ELEMLST	EN+10, PR+15
EN	RESTRT+7
EXIT	BVCONV+3, EN+4, EN+5, EN+6, EN+8, EN+9, EN+12, EN+13, EN+17, PR+4 , PR+8, PR+20, PR+22
SPLASH	EN+19

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	RESTRT+5~*
%ZIS	ZIS+1~*
BVCABRT	EN+1~, PR+7, PR+8, PR+11, PR+16*
BVCCVTM	XMD~, XMD+8
BVCDFDC	EN+1~, PR+5*, XMD+15
BVCELM	ELEMLST+6~, ELEMLST+10, ELEMLST+11, ELEMLST+13
BVCELMS	ELEMLST+6~, ELEMLST+9, ELEMLST+13, ELEMLST+14
BVCFCNT	EN+1~, ELEMLST+7, ELEMLST+11
BVCFLD	FM~, FM+4, FM+5, ELEMLST+6~, ELEMLST+11, ELEMLST+12, ELEMLST+13, ABORT+1~, ABORT+8, ABORT+10* , ABORT+11
BVCFLG	ELEMLST~, ELEMLST+11, ABORT~, ABORT+3, ABORT+4, ABORT+5
BVCNCNT	EN+1~, ELEMLST+7, ELEMLST+12
BVCNUMB	XMD+1~, XMD+10, XMD+11, XMD+12, XMD+13, FM~, FM+4, FM+5, ELEMLST+6~, ELEMLST+9* , ELEMLST+12, ELEMLST+13, ELEMLST+14, ABORT+1~, ABORT+8, ABORT+9, ABORT+10, ABORT+11
BVCONV	EN+1~, XMD+1~, ELEMLST+5!
BVCONV(	XMD+7, XMD+8, XMD+12, XMD+13, XMD+14, XMD+15, XMD+17, XMD+18, ELEMLST+14*
BVCONV(1	EN+12, PR+16, XMD+3, ELEMLST+12, ABORT+6, ABORT+9, ABORT+10
BVCONV(2	XMD+5*
BVCONV(3	XMD+6*
BVCONV(4	XMD+9*
BVCPRCP	EN+1~, EN+7*, EN+11, PR+8, PR+19, O, O+1, O+5, XMD+5, XMD+11 , XMD+12
BVCQ	EN+1~, PR+20*, PR+25, O+2, ZIS+1
BVCRCNT	EN+1~, ELEMLST+7, ELEMLST+14, SPLASH+3
BVCREC	ELEMLST+6~, ELEMLST+8*, ELEMLST+9, ELEMLST+10, ELEMLST+14
BVCROOT	ELEMLST+6~, ELEMLST+14*
BVCRUN	EN+1~, EN+15*, PR+13, O
BVCST	XMD~, XMD+2, XMD+3, XMD+4, XMD+6, XMD+8, XMD+13, XMD+14, XMD+15
BVCTMP	DELETE+1~
D	EN+1~, PR+3*
DIC	EN+1~, PR+3*
DIC("A"	PR+3*
DIC("S"	PR+4*
DIC(0	PR+3*
DIR	EN+1~
DIR("A"	PR+19*
DIR("B"	PR+18*
DIR(0	PR+18*
>> DIRUT	PR+20
DUZ	EN+4, XMD+19
DUZ(0	EN+5
DUZ(2	PR+27
I	PR+26, XMD+11, XMD+12, XMD+13, XMD+14, XMD+15, ELEMLST+8, ABORT+6, ABORT+7, ABORT+9 , ABORT+10, DELETE+1~, DELETE+3, DELETE+4, DELETE+5*
IOM	ZIS+2
ION	ZIS+2
>> IOP	ZIS+2*
IOSL	ZIS+2
>> J	ELEMLST+10*
POP	ZIS+2, ZIS+3, RESTRT+2~, RESTRT+3, RESTRT+5
U	EN+13, XMD+6, XMD+13, XMD+14, XMD+15, ELEMLST+10, ELEMLST+12, ELEMLST+13, ELEMLST+14, ABORT+4
X	EN+1~, EN+11, EN+12, EN+13, EN+15, EN+17, XMD+5, XMD+6, XMD+12, XMD+13 , XMD+14, XMD+15, FM+3~, FM+4, FM+5, FM+6, DELETE+1~, DELETE+2, DELETE+3, DELETE+4 , DELETE+5*
X1	EN+1~, EN+16*, EN+17
XMDUZ	XMD+1~, XMD+2*
XMSUB	XMD+1~, XMD+2*
XMTEXT	XMD+1~, XMD+2*
XMY	XMD+1~
XMY(	XMD+19*
Y	EN+1~, PR+4, PR+5, PR+20

Customize PDF page

Package: IHS V Files 200 Conversion

Routine: BVCONV

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items