1..MAC文件是m语言,下面是test111.MAC
test111
aa()
w "abc"
q 0
- 最上面的名字和文件名一致
- 然后是方法名
- 文件名和方法名要顶头写,不能有空格
调用方式:DHC-APP>d aa^test111(),方法名有括号就带括号
2..cls是类文件,方法的写法与上面不一样
ClassMethod aa()
{
w "abc"
q 0
}
调用方式:DHC-APP>d ##class(web.test111).aa()
3.建立临时Global
DHC-APP>set ^TEMP=3//Global物理存储到数据库,terminal关了的话还会有,其他变量会消失
DHC-APP>S ^TEMP("A")=1//设置节点
DHC-APP>s ^TEMP("B")=2
在Global里可以搜索到^TEMP
4.$h日期函数
$ZDate 把$Horolog 格式的日期值按照指定格式显示
+号表示第一个非数字符号前的数字
$ZDateH 是$ZDate 的反函数
$ZTime 把$Horolog 格式的时间值按照指定格式显示。
$ZTimeH $ZTime 的反函数。
DHC-APP>w $h
63802,58589
DHC-APP>w $zd(63802)
09/07/2015
DHC-APP>w $zd(63802,3)
2015-09-07
DHC-APP>w +$h
63802
DHC-APP>w $zd(+$h,3)
2015-09-07
DHC-APP>w $zdh("2015-9-7",3)
63802
DHC-APP>w $zdh("2024-9-7",3)-$zdh("2015-9-7",3)
3288
DHC-APP>w $zt(58543)
16:15:43
DHC-APP>w $zt(58543,2)
16:15
DHC-APP>w $zt(58543,3)
04:15:43PM
DHC-APP>w $zt($p($h,",",2))
17:07:50
5.$i
对每次运行的global产生唯一一个值
DHC-APP>w $i(^TEMP)
4
DHC-APP>w $i(^TEMP)
5
DHC-APP>w $i(^TEMP)
6
6.$e截取字符串
DHC-APP>s a="abcdef"
DHC-APP>w $e(a,2)
b
DHC-APP>w $e(a,2,4)
bcd
7.for循环1加到100
ClassMethod testfor()
{
s m=0
f i=1:1:100 d
.s m=m+i
s sum=m
q sum
}
DHC-APP>w ##class(web.test111).testfor()
5050
计算有多少个科室
ClassMethod testfor()
{
s m=0
s ctlocrowid=""
//q和d,f和s空两个空格
f s ctlocrowid=$o(^CTLOC(ctlocrowid)) q:ctlocrowid="" d
.s m=m+1
s sum=m
q sum
}
8.Terminal查看Global
zw ^STUDENT
9.buildIndices()重建索引指定的类