Hallo GG,
ohne das jetzt getestet zu haben, denke ich mal in etwa so
GrußPHP-Code:Update x/ipdocim a
Set(a.imbeld, a.imadrn ) =
(Select '20' concat SubStr(Digits(b.akkdt2), 1, 2)
concat SubStr(Digits(b.akkdt2), 3, 2)
concat SubStr(Digits(b.akkdt2), 5, 2),
akkto
from xxx/ako01pf b where a.imbeln = b.akanr and b.akkdt2 > 130101)
where imbeln between 148125 and 148129
and imbela = 'AS'
and imbelj <> 13
and imbeln in (Select akanr from xxx/ako01pf where akkdt2 > 130101)
Ronald
![[NEWSboard IBMi Forum]](images/duke/nblogo.gif)



Mit Zitat antworten
Bookmarks