Scott,

Try the following:

!setvar fsize1 finfo("DB2PRV3","LIMIT") + (finfo("DB2PRV3","LIMIT")/10)
!BUILD DB2PRV4;REC=-656,,F,ASCII;DISC=!fsize1
RUN <the COBOL program)
!setvar fsize2 finfo("DB2PRV4","LIMIT")* 4
!BUILD DB2PRV5.TEMPDATA;REC=-164,4,F,ASCII;DISC=!fsize2
!FCOPY FROM=DB2PRV4.TEMPDATA;TO=DB2PRV5.TEMPDATA

Regards

Paul H. Christidis
____________________Reply Separator____________________
Subject:    FLIMIT changes syntax help
Author: [log in to unmask]
Date:       9/27/99 9:10 AM

I have a job that runs daily that creates several files for transfer.

It suprtools info out of the database a file which feeds into a COBOL
program that produces an output which must be a little larger than the input
for header and trailer info.
It must then fcopy to a file for transfer that is 1/4 the record length so
the output must be 4 times
longer.
It blows up about every 6 months or so due to file size increases.
I want to replace the DISC= statements with DISC=  a calculated setvar based
on the size of
the DB2PRV3 file say

sizeof DB2PRV4 = sizeof DB2PRV3 * 1.1  (an extra 10% for margin of error)

and then the
sizeof DB2PRV5 = sizeof DB2PRV4 * 4

Can someone help me with the syntax?

Here's an example of what's running now.

!BUILD DB2PRV4;REC=-656,,F,ASCII;DISC=750000
RUN <the COBOL program)
!BUILD DB2PRV5.TEMPDATA;REC=-164,4,F,ASCII;DISC=3000000
!FCOPY FROM=DB2PRV4.TEMPDATA;TO=DB2PRV5.TEMPDATA


Scott Gates
Trigon BC/BS of VA
804-354-7625
MPE/iX HP31900 C.05.08 r: C.55.00
SUPRTOOL/iX/(Version 4.1.04 VAR)
PH 7.29.C6 -- AMISYS v9.4