Considero que esta tu solución, la presente genera el resultado en minutos.d
Fecha8I s 8 0 inz(20080101) fecha iniciald
HoraIni s 6 0 inz(060000) hora iniciald
Fecha8F s 8 0 inz(20080625) fecha finald HoraFin
s 6 0 inz(123025) hora finald Resultado
s 30 0 d HoraInsIso s z
d HoraFinIso s z d
xechaHoraIIso s 26 d xechahoraFIso s
26 /free
xechaHoraIIso = %char(%date(Fecha8I:*Iso)) +
'-' +
%char(%time(HoraIni:*Iso)) + '.000000';
xechaHoraFIso = %char(%date(Fecha8F:*Iso)) +
'-' +
%char(%time(HoraFin:*Iso)) + '.000000';
HoraInsIso = %timestamp(xechaHoraIIso);
HoraFinIso = %timestamp(xechaHoraFIso); Resultado =
%diff(HoraFinIso:HoraInsIso:*MINUTES); *InLr = *On;
/end-free ____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.
