//DESBD130 PROC                                                         00000010
//****
//*     UPDATE THE YEAR PORTION OF THE LAST USED LOG NUMBER
//*     WHEN THE YEAR CHANGES.
//*
//****
//STEP0100 EXEC PGM=DESBD130,
//             COND=(0,LT)
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//**