On 2017-11-19, at 16:40:19, Ed Jaffe wrote:
>
> We do this in (E)JES:
>
> * Convert Local TOD (Passed in R1) to GMT
> Cnvt_LclTod_to_GmtTod DC 0H
> LLGT R15,FLCCVT Point to CVT
> USING CVTMAP,R15 <Synchronize CVT
> LLGT R15,CVTEXT2 Point to OS/VS2 common extension
> USING CVTXTNT2,R15 <Synchronize CVTXTNT2
> ALG R1,CVTLSO Add leap seconds adjustment
>
I'm surprised. What (hex) value is in your CVTLSO?
And, you shouldn't need to make a leap second adjustment.
Leap seconds apply alike to local time and to GMT. Example
on a Linux system:
516 $ TZ=America/Denver date; TZ=GMT0 date
Sun Nov 19 17:13:11 MST 2017
Mon Nov 20 00:13:11 GMT 2017
> SLG R1,CVTLDTO Adjust to GMT from local time
> DROP R15 <Drop CVT/CVTXTNT2
> BR R14 Return GMT TOD value
-- gil
