Routine: AIBCVT0

Customize PDF page

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

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

Package	Total	Call Graph
IBM DDPS Record Consolidation	3	^AIBCVT00 WRITE^AIBCVT3 ERRMSG^AIBCVT6

Package

Total

Call Graph

IBM DDPS Record Consolidation

^AIBCVT00 WRITE^AIBCVT3 ERRMSG^AIBCVT6

Package	Total	Caller Graph
IBM DDPS Record Consolidation	1	AIBCVT

Package

Total

Caller Graph

IBM DDPS Record Consolidation

AIBCVT

Entry Points

Name	Comments	DBIA/ICR reference
RETURN	;RETURN TO CALLING ROUTINE
CONTROL	;READ CONTROL GLOBAL TO DETERMINE SYSTEM AND FIELD CHARACTERISTICS
EJCLOOP	;WRITE NEXT ENDING JCL CARD
GETNAME	;GET OUTPUT FILE NAME
EJCL	;WRITE ENDING JCL FOR RJE BYSYNC JOB
BJCL	;WRITE BEGINNING JCL FOR RJE BYSYNC JOB
CTLFOUND	;CONTROL GLOBAL FOUND FOR RECORDS SYSTEM
CTLOOPN	;GET CONTROL FOR ALL NODES IN RECORD
CTLOOPB	;GET CONTROL INFORMATION FOR RJE JOB BYSYNC TELECOMMUNICATIONS CARD
CTLNDONE	;CONTROL FOR ALL NODES LOADED
CTLOOPF	;GET CONTROL FOR ALL FIELDS IN NODE
SETRJE	;SETUP TO GET RJE DATA
CK2ND	;CHECK IF TEMPORARY FILE FOR 2ND RECORD FORMAT IS NEEDED
RESOLVE4	;AREA NAME
RESOLVE5	;PARKLAWN REMOTE NUMBER
RESOLVE6	;NIH REMOTE NUMBER
CTLFDONE	;CONTROL FOR ALL FIELDS IN NODE LOADED
RESOLVE1	;RESOLVE AREA CODES
RESOLVE2	;DDPS REMOTE NUMBER
RESOLVE3	;ACCOUNTING POINT
BJCLOOP	;WRITE NEXT BEGINNING JCL CARD
NEWFILE	;CREATE A NEW OUTPUT FILE

Name	Field # of Occurrence
^AIBCVT00	CTLNDONE+4
WRITE^AIBCVT3	RESOLVE6+3, EJCLOOP+3
ERRMSG^AIBCVT6	CONTROL+4, NEWFILE+3, CTLOOPB+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AIBCVTC - [#9002140]	CTLFOUND+4, CK2ND+1, CK2ND+3, GETNAME+1, GETNAME+4, CTLOOPN+1, CTLOOPN+3, CTLOOPN+4, CTLOOPF+1, CTLOOPF+4 , CTLOOPF+5, CTLOOPB+1, CTLOOPB+4, CTLOOPB+5, BJCL+1
^AIBCVTC("C"	CONTROL+1
^AIBCVTJ - [#9002141]	BJCLOOP+1, BJCLOOP+2, EJCLOOP+1, EJCLOOP+2

Label References

Name	Line Occurrences
BJCLOOP	RESOLVE6+3
CK2ND	CTLFOUND+4, NEWFILE+2
CTLFDONE	CTLOOPF+2
CTLFOUND	CONTROL+2
CTLNDONE	CTLOOPN+1
CTLOOPB	CTLOOPB+6
CTLOOPF	CTLOOPF+5
CTLOOPN	GETNAME+3, CTLFDONE+2
EJCLOOP	EJCLOOP+3
GETNAME	CK2ND+2
NEWFILE	CTLFOUND+3
RESOLVE1	RESOLVE1+1
RESOLVE2	RESOLVE2+1
RESOLVE3	RESOLVE3+1
RESOLVE4	RESOLVE4+1
RESOLVE5	RESOLVE5+1
RESOLVE6	RESOLVE6+1
RETURN	CONTROL+4, CTLNDONE+3, CTLNDONE+4, CTLOOPB+2, CTLOOPB+3, BJCLOOP+1, EJCLOOP+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> AIB2ND	CTLFOUND+3, CK2ND+1*, CK2ND+2, CK2ND+3
>> AIBA	CONTROL+3, CTLNDONE+4, CTLOOPB+2
AIBB	CONTROL+1!
AIBB(	CTLOOPB+5*
>> AIBB1	CTLOOPB+4*, CTLOOPB+5
>> AIBB2	SETRJE+1, CTLOOPB+2, CTLOOPB+4, CTLOOPB+5
>> AIBB3	SETRJE+1, CTLOOPB+1, CTLOOPB+2, CTLOOPB+3, CTLOOPB+4
AIBC	CONTROL+1!
AIBC(	CTLOOPN+4, CTLOOPF+5, CTLFDONE+1*, CTLNDONE+1
AIBC(0	CTLNDONE+3*
>> AIBCF	CTLFOUND+4, GETNAME+4*
>> AIBCF1	CTLOOPF+4*, CTLOOPF+5
>> AIBCF2	CTLOOPN+2, CTLOOPF+3, CTLOOPF+5, CTLFDONE+1, CTLNDONE+1
>> AIBCF3	CTLOOPN+2, CTLOOPF+1, CTLOOPF+2, CTLOOPF+4
>> AIBCL	CTLNDONE+1*, CTLNDONE+2
>> AIBCN1	CTLFOUND+1, CTLOOPN+3, CTLOOPN+4, CTLOOPF+1, CTLOOPF+4, CTLOOPF+5
>> AIBCN2	CTLFOUND+1, CTLOOPN+2, CTLOOPN+4, CTLFDONE+1, CTLNDONE+1, CTLNDONE+3
>> AIBCN3	GETNAME+2, CTLOOPN+1, CTLOOPN+3
>> AIBCNM	GETNAME+1*
>> AIBCS	CONTROL+1*, CONTROL+2, CTLFOUND+4, CK2ND+1, GETNAME+1, GETNAME+4, CTLOOPN+1, CTLOOPN+3, CTLOOPN+4, CTLOOPF+1 , CTLOOPF+4, CTLOOPF+5, CTLOOPB+1, CTLOOPB+4, CTLOOPB+5, BJCL+1
>> AIBCTJ	RESOLVE6+3, EJCLOOP+3
>> AIBFFN	NEWFILE+1*
>> AIBFILE	CTLFOUND+4, GETNAME+3, CTLNDONE+3
>> AIBGBLP	CONTROL+1, CONTROL+3, CTLFOUND+4, GETNAME+3, CTLOOPB+2
>> AIBJ	CTLNDONE+3, BJCL+1, BJCLOOP+1, BJCLOOP+2, EJCL+1, EJCLOOP+1*, EJCLOOP+2
>> AIBJC	BJCL+1*, BJCLOOP+1, BJCLOOP+2, EJCLOOP+1, EJCLOOP+2
>> AIBJSAC	RESOLVE1+1
>> AIBJSAN	RESOLVE4+1
>> AIBJSAP	RESOLVE3+1
>> AIBJSRD	RESOLVE2+1
>> AIBJSRN	RESOLVE6+1
>> AIBJSRP	RESOLVE5+1
>> AIBL	CTLNDONE+1*, CTLNDONE+2
>> AIBMSG	CONTROL+3, NEWFILE+3, CTLOOPB+2*
>> AIBOK	NEWFILE+1
>> AIBOS	NEWFILE+2
>> AIBOT	BJCLOOP+2, RESOLVE1+1, RESOLVE2+1, RESOLVE3+1, RESOLVE4+1, RESOLVE5+1, RESOLVE6+1, EJCLOOP+2
>> AIBOW	RESOLVE1+1, RESOLVE2+1, RESOLVE3+1, RESOLVE4+1, RESOLVE5+1, RESOLVE6+1
AIBOW2	RESOLVE1+1, RESOLVE2+1, RESOLVE3+1, RESOLVE4+1, RESOLVE5+1, RESOLVE6+1, RESOLVE6+2!
>> AIBRLN	CTLNDONE+2*
>> AIBT1	NEWFILE+2, NEWFILE+3
>> AIBT2	CTLFOUND+4, NEWFILE+1
>> AIBTGBL	CTLFOUND+2, CK2ND+3
>> AIBTGFT	CTLFOUND+2, CK2ND+4
>> AIBTGLT	CTLFOUND+2, CK2ND+4
AIBTLN	RESOLVE1+1, RESOLVE2+1, RESOLVE3+1, RESOLVE4+1, RESOLVE5+1, RESOLVE6+1, RESOLVE6+2!
>> AIBTMP	CTLFOUND+2, CK2ND+3, CK2ND+4
>> AIBTZ(1	CK2ND+4*
U	CTLFOUND+4, CK2ND+1, CK2ND+3, GETNAME+1, GETNAME+4, CTLFDONE+1, CTLNDONE+1, BJCL+1, BJCLOOP+2, EJCLOOP+2

Customize PDF page

Package: IBM DDPS Record Consolidation

Routine: AIBCVT0

Information

Source Information