第9讲 数据类型 - 日期.zip

<?xml version="1.0" encoding="UTF-8"?> <Export generator="Cache" version="25" zv="Cache for Windows (x86-64) 2016.2 (Build 736U)" ts="2021-06-24 15:15:49"> <Class name="M.NineDateTime"> <Super>%RegisteredObject</Super> <TimeChanged>65918,74880.678661</TimeChanged> <TimeCreated>65918,74179.435192</TimeCreated> <Method name="DateTime"> <Description> d ##class(M.NineDateTime).DateTime()</Description> <ClassMethod>1</ClassMethod> <Implementation><![CDATA[ w $h,! w +$h,! w $p($h, ",", 2),! w $now(),! w $zdate($h),! w $zd($h, 3),! w $ztime($p($h, ",", 2)),! w $zt($p($h, ",", 2), 3),! w $zdatetime($h),! w $zdt($h, 3),! w $ztimestamp ,! w $zdt($ztimestamp, 3 , , 4),! w $zh,! w $zh/3600,! w $zdateh("06/23/2021"),! w $zdh("2021-06-23", 3),! w $zdh("T", 5),! w $ztimeh("16:17:00"),! w $zth("16:17:00.123"),! w $zdatetimeh("2021-06-23 12:00:00", 3),! w $zdth("T", 5),! ]]></Implementation> </Method> <Method name="Runtime"> <Description> w ##class(M.NineDateTime).Runtime()</Description> <ClassMethod>1</ClassMethod> <Implementation><![CDATA[ s t1 = $zh // to do hang 3 s t2 = $zh q t2 - t1 ]]></Implementation> </Method> </Class> </Export>