xreport.scr

来自「prolog,人工智能推理程序,运行环境prolog」· SCR 代码 · 共 30 行

field("payment",str,1,18,14)
field("name",str,1,55,23)
field("street",str,2,55,23)
field("delivery",str,3,18,3)
field("city",str,3,55,23)
field("state",str,4,55,23)
field("warranty",str,5,18,3)
field("tel",str,6,55,19)
field("item1",int,10,0,10)
field("make1",str,10,12,37)
field("price1",real,10,52,8)
field("item2",int,12,0,10)
field("make2",str,12,12,37)
field("price2",real,12,52,8)
field("item3",int,14,0,10)
field("make3",str,14,12,37)
field("price3",real,14,52,8)
field("total",real,16,52,8)
field("date",str,17,6,10)
field("money",real,18,52,8)
field("time",str,19,6,8)
field("change",real,20,52,8)
txtfield(16,41,1," ")
txtfield(3,0,8,"Deliver:")
txtfield(5,0,15,"Extra Warranty:")
txtfield(8,0,9,"Item Code")
txtfield(2,44,1," ")
txtfield(6,43,1," ")
txtfield(8,52,6," Price")
txtfield(14,11,1,"