0005.00 **
0006.00 CHGJOB SWS(10000000)
0007.00 **
0008.00 // IFF DATAF1-J.USTSUM BLDFILE J.USTSUM,I,R,200,128,,T,1,10,DFILE,,00100
0009.00 // IFF DATAF1-J.B.FSPE BLDFILE J.B.FSPE,S,R,1000,200,,,,,DFILE,,05000
0010.00 // IFF DATAF1-J.B.ATST BLDFILE J.B.ATST,I,RECORDS,1,80,,T,1,9
0011.00 // IFF DATAF1-J.B.EIN5 BLDFILE J.B.EIN5,S,R,1000,200,,,,,DFILE,,05000
0012.00 // * '************************************************* *************'
0013.00 // * 'WW ÜBERNAHME DER DEBITOREN-RECHNUNGEN IN DIE FIBU OFPO ***'
0014.00 // * '************************************************* *************'
0015.00 CALL PGM(FUS906WWCL)