Tracing:
1534 *-*
/*------------------------------------------------------------------* *
Set up the Pipeline stages for showing pro
gress messages. * We define variables progresspipe, progresspipe2, and
rexxfilter *-----------------------------------------------
-------------------*/
1538 *-* /* Settings for showing progress messages as work is
done */
1539 *-* cyltrk=15 /* 15 tracks/cyl for 3380 and 3390
disk */
>L> "15"
1540 *-* fbablk.0=762 /* Pipelines fba blocks in record
(observed) */
>L> "762"
1541 *-* fbablk.1=115 /* DDR fba blocks in record (about)
*/
>L> "115"
1542 *-* minshow.=500 /* Must process this many records as
a minimum */
>L> "500"
1543 *-* maxshow.=2000 /* Show progress every 2000 recs or
10% */
>L> "2000"
1544 *-* minshow.9336.0=250 /* Smaller rec counts for pipelines
fba blocking */
>L> "250"
1545 *-* maxshow.9336.0=600
>L> "600"
1547 *-* arg ddr? pack? dtype dsize .
>>> "0"
>>> "9336"
>>> "784"
>>> ""
>.> ""
1548 *-* If dtype='9336'
>V> "784"
>L> "9336"
>O> "0"
1550 *-* else
1551 *-* drecs=dsize*cyltrk /* Each record is a
track */
>V> ""
>V> "15"
1551 +++ drecs=dsize*cyltrk /* Each record is a
track */
929 +++ Call SetupProgress useddr rempack diskinfo
526 +++ Call RestoreDisk
DMSREX476E Error 41 running PIPEDDR EXEC, line 1551: Bad arithmetic
conversion
------------------------------------------------------------------------
----------------------------------------------------------------------
When attempting to RESTORE of a V-DISK (this weekend):
1550 +++ drecs=dsize*cyltrk /* Each record is a
track */
929 +++ Call SetupProgress useddr rempack diskinfo
526 +++ Call RestoreDisk
DMSREX476E Error 41 running PIPEDDR EXEC, line 1550: Bad arithmetic
conversion
(maybe because it's FBA?)
Quick Fix:
SetupProgress:
Return
/*------------------------------------------------------------------*
Frank M. Ramaekers Jr.
Systems Programmer
MCP, MCP+I, MCSE & RHCE
American Income Life Insurance Co.
Phone: (254)761-6649
1200 Wooded Acres Dr.
Fax: (254)741-5777
Waco, Texas 76701
_____________________________________________________
This message contains information which is privileged and confidential and is
solely for the use of the
intended recipient. If you are not the intended recipient, be aware that any
review, disclosure,
copying, distribution, or use of the contents of this message is strictly
prohibited. If you have
received this in error, please destroy it immediately and notify us at
[email protected].
