hier:

DCL VAR(&ANZN1) TYPE(*DEC) LEN(10 0)


RTVMBRD FILE(&DATN) NBRCURRCD(&ANZN1)

karl-heinz