123456789101112131415161718192021222324 |
- (
- #comment
- (let config (DataSource 'config))
- (let res_sink (DataSink 'result))
- (let data (Bool 'x"00"))
- (let world (Write! world res_sink (Key) data '()))
- (let data (Int16 'x"FEFF"))
- (let world (Write! world res_sink (Key) data '()))
- (let data (Double 'x"722078DC7BF042D3"))
- (let world (Write! world res_sink (Key) data '()))
- (let data (Date 'x"0100"))
- (let world (Write! world res_sink (Key) data '()))
- (let data (TzTimestamp 'x"0000F9BCF768AC000001"))
- (let world (Write! world res_sink (Key) data '()))
- (let world (Commit! world res_sink))
- (return world)
- )
|