Dim parser As JSONParser

parser.Initialize(<text>)

Dim root As Map = parser.NextObject

Dim result As Map = root.Get("result")

Dim count As Int = result.Get("count")

Dim closed As Map = result.Get("closed")

Dim OPZJN7-RNVKA-GTVHN7 As Map = closed.Get("OPZJN7-RNVKA-GTVHN7")

Dim opentm As Double = OPZJN7-RNVKA-GTVHN7.Get("opentm")

Dim oflags As String = OPZJN7-RNVKA-GTVHN7.Get("oflags")

Dim reason As String = OPZJN7-RNVKA-GTVHN7.Get("reason")

Dim cost As String = OPZJN7-RNVKA-GTVHN7.Get("cost")

Dim limitprice As String = OPZJN7-RNVKA-GTVHN7.Get("limitprice")

Dim expiretm As Int = OPZJN7-RNVKA-GTVHN7.Get("expiretm")

Dim fee As String = OPZJN7-RNVKA-GTVHN7.Get("fee")

Dim vol_exec As String = OPZJN7-RNVKA-GTVHN7.Get("vol_exec")

Dim starttm As Int = OPZJN7-RNVKA-GTVHN7.Get("starttm")

Dim descr As Map = OPZJN7-RNVKA-GTVHN7.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OPZJN7-RNVKA-GTVHN7.Get("vol")

Dim userref As String = OPZJN7-RNVKA-GTVHN7.Get("userref")

Dim price As String = OPZJN7-RNVKA-GTVHN7.Get("price")

Dim closetm As Double = OPZJN7-RNVKA-GTVHN7.Get("closetm")

Dim refid As String = OPZJN7-RNVKA-GTVHN7.Get("refid")

Dim status As String = OPZJN7-RNVKA-GTVHN7.Get("status")

Dim stopprice As String = OPZJN7-RNVKA-GTVHN7.Get("stopprice")

Dim misc As String = OPZJN7-RNVKA-GTVHN7.Get("misc")

Dim OZJE4I-GY2VI-JZR2D5 As Map = closed.Get("OZJE4I-GY2VI-JZR2D5")

Dim opentm As Double = OZJE4I-GY2VI-JZR2D5.Get("opentm")

Dim oflags As String = OZJE4I-GY2VI-JZR2D5.Get("oflags")

Dim reason As String = OZJE4I-GY2VI-JZR2D5.Get("reason")

Dim cost As String = OZJE4I-GY2VI-JZR2D5.Get("cost")

Dim limitprice As String = OZJE4I-GY2VI-JZR2D5.Get("limitprice")

Dim expiretm As Int = OZJE4I-GY2VI-JZR2D5.Get("expiretm")

Dim fee As String = OZJE4I-GY2VI-JZR2D5.Get("fee")

Dim vol_exec As String = OZJE4I-GY2VI-JZR2D5.Get("vol_exec")

Dim starttm As Int = OZJE4I-GY2VI-JZR2D5.Get("starttm")

Dim descr As Map = OZJE4I-GY2VI-JZR2D5.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OZJE4I-GY2VI-JZR2D5.Get("vol")

Dim userref As String = OZJE4I-GY2VI-JZR2D5.Get("userref")

Dim price As String = OZJE4I-GY2VI-JZR2D5.Get("price")

Dim closetm As Double = OZJE4I-GY2VI-JZR2D5.Get("closetm")

Dim refid As String = OZJE4I-GY2VI-JZR2D5.Get("refid")

Dim status As String = OZJE4I-GY2VI-JZR2D5.Get("status")

Dim stopprice As String = OZJE4I-GY2VI-JZR2D5.Get("stopprice")

Dim misc As String = OZJE4I-GY2VI-JZR2D5.Get("misc")

Dim OY4GIP-Y2YPE-3G6E4M As Map = closed.Get("OY4GIP-Y2YPE-3G6E4M")

Dim opentm As Double = OY4GIP-Y2YPE-3G6E4M.Get("opentm")

Dim oflags As String = OY4GIP-Y2YPE-3G6E4M.Get("oflags")

Dim reason As String = OY4GIP-Y2YPE-3G6E4M.Get("reason")

Dim cost As String = OY4GIP-Y2YPE-3G6E4M.Get("cost")

Dim limitprice As String = OY4GIP-Y2YPE-3G6E4M.Get("limitprice")

Dim expiretm As Int = OY4GIP-Y2YPE-3G6E4M.Get("expiretm")

Dim fee As String = OY4GIP-Y2YPE-3G6E4M.Get("fee")

Dim vol_exec As String = OY4GIP-Y2YPE-3G6E4M.Get("vol_exec")

Dim starttm As Int = OY4GIP-Y2YPE-3G6E4M.Get("starttm")

Dim descr As Map = OY4GIP-Y2YPE-3G6E4M.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OY4GIP-Y2YPE-3G6E4M.Get("vol")

Dim userref As String = OY4GIP-Y2YPE-3G6E4M.Get("userref")

Dim price As String = OY4GIP-Y2YPE-3G6E4M.Get("price")

Dim closetm As Double = OY4GIP-Y2YPE-3G6E4M.Get("closetm")

Dim refid As String = OY4GIP-Y2YPE-3G6E4M.Get("refid")

Dim status As String = OY4GIP-Y2YPE-3G6E4M.Get("status")

Dim stopprice As String = OY4GIP-Y2YPE-3G6E4M.Get("stopprice")

Dim misc As String = OY4GIP-Y2YPE-3G6E4M.Get("misc")

Dim OA7TGH-KHPDE-TIIZ5C As Map = closed.Get("OA7TGH-KHPDE-TIIZ5C")

Dim opentm As Double = OA7TGH-KHPDE-TIIZ5C.Get("opentm")

Dim oflags As String = OA7TGH-KHPDE-TIIZ5C.Get("oflags")

Dim reason As String = OA7TGH-KHPDE-TIIZ5C.Get("reason")

Dim cost As String = OA7TGH-KHPDE-TIIZ5C.Get("cost")

Dim limitprice As String = OA7TGH-KHPDE-TIIZ5C.Get("limitprice")

Dim expiretm As Int = OA7TGH-KHPDE-TIIZ5C.Get("expiretm")

Dim fee As String = OA7TGH-KHPDE-TIIZ5C.Get("fee")

Dim vol_exec As String = OA7TGH-KHPDE-TIIZ5C.Get("vol_exec")

Dim starttm As Int = OA7TGH-KHPDE-TIIZ5C.Get("starttm")

Dim descr As Map = OA7TGH-KHPDE-TIIZ5C.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OA7TGH-KHPDE-TIIZ5C.Get("vol")

Dim userref As String = OA7TGH-KHPDE-TIIZ5C.Get("userref")

Dim price As String = OA7TGH-KHPDE-TIIZ5C.Get("price")

Dim closetm As Double = OA7TGH-KHPDE-TIIZ5C.Get("closetm")

Dim refid As String = OA7TGH-KHPDE-TIIZ5C.Get("refid")

Dim status As String = OA7TGH-KHPDE-TIIZ5C.Get("status")

Dim stopprice As String = OA7TGH-KHPDE-TIIZ5C.Get("stopprice")

Dim misc As String = OA7TGH-KHPDE-TIIZ5C.Get("misc")

Dim OKLODM-UHBJA-TNUOTH As Map = closed.Get("OKLODM-UHBJA-TNUOTH")

Dim opentm As Double = OKLODM-UHBJA-TNUOTH.Get("opentm")

Dim oflags As String = OKLODM-UHBJA-TNUOTH.Get("oflags")

Dim reason As String = OKLODM-UHBJA-TNUOTH.Get("reason")

Dim cost As String = OKLODM-UHBJA-TNUOTH.Get("cost")

Dim limitprice As String = OKLODM-UHBJA-TNUOTH.Get("limitprice")

Dim expiretm As Int = OKLODM-UHBJA-TNUOTH.Get("expiretm")

Dim fee As String = OKLODM-UHBJA-TNUOTH.Get("fee")

Dim vol_exec As String = OKLODM-UHBJA-TNUOTH.Get("vol_exec")

Dim starttm As Int = OKLODM-UHBJA-TNUOTH.Get("starttm")

Dim descr As Map = OKLODM-UHBJA-TNUOTH.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OKLODM-UHBJA-TNUOTH.Get("vol")

Dim userref As String = OKLODM-UHBJA-TNUOTH.Get("userref")

Dim price As String = OKLODM-UHBJA-TNUOTH.Get("price")

Dim closetm As Double = OKLODM-UHBJA-TNUOTH.Get("closetm")

Dim refid As String = OKLODM-UHBJA-TNUOTH.Get("refid")

Dim status As String = OKLODM-UHBJA-TNUOTH.Get("status")

Dim stopprice As String = OKLODM-UHBJA-TNUOTH.Get("stopprice")

Dim misc As String = OKLODM-UHBJA-TNUOTH.Get("misc")

Dim ORBRR4-ZBULM-U2WSCR As Map = closed.Get("ORBRR4-ZBULM-U2WSCR")

Dim opentm As Double = ORBRR4-ZBULM-U2WSCR.Get("opentm")

Dim oflags As String = ORBRR4-ZBULM-U2WSCR.Get("oflags")

Dim reason As String = ORBRR4-ZBULM-U2WSCR.Get("reason")

Dim cost As String = ORBRR4-ZBULM-U2WSCR.Get("cost")

Dim limitprice As String = ORBRR4-ZBULM-U2WSCR.Get("limitprice")

Dim expiretm As Int = ORBRR4-ZBULM-U2WSCR.Get("expiretm")

Dim fee As String = ORBRR4-ZBULM-U2WSCR.Get("fee")

Dim vol_exec As String = ORBRR4-ZBULM-U2WSCR.Get("vol_exec")

Dim starttm As Int = ORBRR4-ZBULM-U2WSCR.Get("starttm")

Dim descr As Map = ORBRR4-ZBULM-U2WSCR.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = ORBRR4-ZBULM-U2WSCR.Get("vol")

Dim userref As String = ORBRR4-ZBULM-U2WSCR.Get("userref")

Dim price As String = ORBRR4-ZBULM-U2WSCR.Get("price")

Dim closetm As Double = ORBRR4-ZBULM-U2WSCR.Get("closetm")

Dim refid As String = ORBRR4-ZBULM-U2WSCR.Get("refid")

Dim status As String = ORBRR4-ZBULM-U2WSCR.Get("status")

Dim stopprice As String = ORBRR4-ZBULM-U2WSCR.Get("stopprice")

Dim misc As String = ORBRR4-ZBULM-U2WSCR.Get("misc")

Dim OX6FPA-NJR4D-UGYKPI As Map = closed.Get("OX6FPA-NJR4D-UGYKPI")

Dim opentm As Double = OX6FPA-NJR4D-UGYKPI.Get("opentm")

Dim oflags As String = OX6FPA-NJR4D-UGYKPI.Get("oflags")

Dim reason As String = OX6FPA-NJR4D-UGYKPI.Get("reason")

Dim cost As String = OX6FPA-NJR4D-UGYKPI.Get("cost")

Dim limitprice As String = OX6FPA-NJR4D-UGYKPI.Get("limitprice")

Dim expiretm As Int = OX6FPA-NJR4D-UGYKPI.Get("expiretm")

Dim fee As String = OX6FPA-NJR4D-UGYKPI.Get("fee")

Dim vol_exec As String = OX6FPA-NJR4D-UGYKPI.Get("vol_exec")

Dim starttm As Int = OX6FPA-NJR4D-UGYKPI.Get("starttm")

Dim descr As Map = OX6FPA-NJR4D-UGYKPI.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OX6FPA-NJR4D-UGYKPI.Get("vol")

Dim userref As String = OX6FPA-NJR4D-UGYKPI.Get("userref")

Dim price As String = OX6FPA-NJR4D-UGYKPI.Get("price")

Dim closetm As Double = OX6FPA-NJR4D-UGYKPI.Get("closetm")

Dim refid As String = OX6FPA-NJR4D-UGYKPI.Get("refid")

Dim status As String = OX6FPA-NJR4D-UGYKPI.Get("status")

Dim stopprice As String = OX6FPA-NJR4D-UGYKPI.Get("stopprice")

Dim misc As String = OX6FPA-NJR4D-UGYKPI.Get("misc")

Dim OXOB4J-DTSMQ-A2LEDF As Map = closed.Get("OXOB4J-DTSMQ-A2LEDF")

Dim opentm As Double = OXOB4J-DTSMQ-A2LEDF.Get("opentm")

Dim oflags As String = OXOB4J-DTSMQ-A2LEDF.Get("oflags")

Dim reason As String = OXOB4J-DTSMQ-A2LEDF.Get("reason")

Dim cost As String = OXOB4J-DTSMQ-A2LEDF.Get("cost")

Dim limitprice As String = OXOB4J-DTSMQ-A2LEDF.Get("limitprice")

Dim expiretm As Int = OXOB4J-DTSMQ-A2LEDF.Get("expiretm")

Dim fee As String = OXOB4J-DTSMQ-A2LEDF.Get("fee")

Dim vol_exec As String = OXOB4J-DTSMQ-A2LEDF.Get("vol_exec")

Dim starttm As Int = OXOB4J-DTSMQ-A2LEDF.Get("starttm")

Dim descr As Map = OXOB4J-DTSMQ-A2LEDF.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OXOB4J-DTSMQ-A2LEDF.Get("vol")

Dim userref As String = OXOB4J-DTSMQ-A2LEDF.Get("userref")

Dim price As String = OXOB4J-DTSMQ-A2LEDF.Get("price")

Dim closetm As Double = OXOB4J-DTSMQ-A2LEDF.Get("closetm")

Dim refid As String = OXOB4J-DTSMQ-A2LEDF.Get("refid")

Dim status As String = OXOB4J-DTSMQ-A2LEDF.Get("status")

Dim stopprice As String = OXOB4J-DTSMQ-A2LEDF.Get("stopprice")

Dim misc As String = OXOB4J-DTSMQ-A2LEDF.Get("misc")

Dim OBNHPX-BMCOC-BGL25O As Map = closed.Get("OBNHPX-BMCOC-BGL25O")

Dim opentm As Double = OBNHPX-BMCOC-BGL25O.Get("opentm")

Dim oflags As String = OBNHPX-BMCOC-BGL25O.Get("oflags")

Dim reason As String = OBNHPX-BMCOC-BGL25O.Get("reason")

Dim cost As String = OBNHPX-BMCOC-BGL25O.Get("cost")

Dim limitprice As String = OBNHPX-BMCOC-BGL25O.Get("limitprice")

Dim expiretm As Int = OBNHPX-BMCOC-BGL25O.Get("expiretm")

Dim fee As String = OBNHPX-BMCOC-BGL25O.Get("fee")

Dim vol_exec As String = OBNHPX-BMCOC-BGL25O.Get("vol_exec")

Dim starttm As Int = OBNHPX-BMCOC-BGL25O.Get("starttm")

Dim descr As Map = OBNHPX-BMCOC-BGL25O.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OBNHPX-BMCOC-BGL25O.Get("vol")

Dim userref As String = OBNHPX-BMCOC-BGL25O.Get("userref")

Dim price As String = OBNHPX-BMCOC-BGL25O.Get("price")

Dim closetm As Double = OBNHPX-BMCOC-BGL25O.Get("closetm")

Dim refid As String = OBNHPX-BMCOC-BGL25O.Get("refid")

Dim status As String = OBNHPX-BMCOC-BGL25O.Get("status")

Dim stopprice As String = OBNHPX-BMCOC-BGL25O.Get("stopprice")

Dim misc As String = OBNHPX-BMCOC-BGL25O.Get("misc")

Dim OOKP6V-4OGDC-E7BHHX As Map = closed.Get("OOKP6V-4OGDC-E7BHHX")

Dim opentm As Double = OOKP6V-4OGDC-E7BHHX.Get("opentm")

Dim oflags As String = OOKP6V-4OGDC-E7BHHX.Get("oflags")

Dim reason As String = OOKP6V-4OGDC-E7BHHX.Get("reason")

Dim cost As String = OOKP6V-4OGDC-E7BHHX.Get("cost")

Dim limitprice As String = OOKP6V-4OGDC-E7BHHX.Get("limitprice")

Dim expiretm As Int = OOKP6V-4OGDC-E7BHHX.Get("expiretm")

Dim fee As String = OOKP6V-4OGDC-E7BHHX.Get("fee")

Dim vol_exec As String = OOKP6V-4OGDC-E7BHHX.Get("vol_exec")

Dim starttm As Int = OOKP6V-4OGDC-E7BHHX.Get("starttm")

Dim descr As Map = OOKP6V-4OGDC-E7BHHX.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OOKP6V-4OGDC-E7BHHX.Get("vol")

Dim userref As String = OOKP6V-4OGDC-E7BHHX.Get("userref")

Dim price As String = OOKP6V-4OGDC-E7BHHX.Get("price")

Dim closetm As Double = OOKP6V-4OGDC-E7BHHX.Get("closetm")

Dim refid As String = OOKP6V-4OGDC-E7BHHX.Get("refid")

Dim status As String = OOKP6V-4OGDC-E7BHHX.Get("status")

Dim stopprice As String = OOKP6V-4OGDC-E7BHHX.Get("stopprice")

Dim misc As String = OOKP6V-4OGDC-E7BHHX.Get("misc")

Dim OK3IOZ-TIJHB-COI45B As Map = closed.Get("OK3IOZ-TIJHB-COI45B")

Dim opentm As Double = OK3IOZ-TIJHB-COI45B.Get("opentm")

Dim oflags As String = OK3IOZ-TIJHB-COI45B.Get("oflags")

Dim reason As String = OK3IOZ-TIJHB-COI45B.Get("reason")

Dim cost As String = OK3IOZ-TIJHB-COI45B.Get("cost")

Dim limitprice As String = OK3IOZ-TIJHB-COI45B.Get("limitprice")

Dim expiretm As Int = OK3IOZ-TIJHB-COI45B.Get("expiretm")

Dim fee As String = OK3IOZ-TIJHB-COI45B.Get("fee")

Dim vol_exec As String = OK3IOZ-TIJHB-COI45B.Get("vol_exec")

Dim starttm As Int = OK3IOZ-TIJHB-COI45B.Get("starttm")

Dim descr As Map = OK3IOZ-TIJHB-COI45B.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OK3IOZ-TIJHB-COI45B.Get("vol")

Dim userref As Int = OK3IOZ-TIJHB-COI45B.Get("userref")

Dim price As String = OK3IOZ-TIJHB-COI45B.Get("price")

Dim closetm As Double = OK3IOZ-TIJHB-COI45B.Get("closetm")

Dim refid As String = OK3IOZ-TIJHB-COI45B.Get("refid")

Dim status As String = OK3IOZ-TIJHB-COI45B.Get("status")

Dim stopprice As String = OK3IOZ-TIJHB-COI45B.Get("stopprice")

Dim misc As String = OK3IOZ-TIJHB-COI45B.Get("misc")

Dim OOMJAO-6BICL-4FEVZ4 As Map = closed.Get("OOMJAO-6BICL-4FEVZ4")

Dim opentm As Double = OOMJAO-6BICL-4FEVZ4.Get("opentm")

Dim oflags As String = OOMJAO-6BICL-4FEVZ4.Get("oflags")

Dim reason As String = OOMJAO-6BICL-4FEVZ4.Get("reason")

Dim cost As String = OOMJAO-6BICL-4FEVZ4.Get("cost")

Dim limitprice As String = OOMJAO-6BICL-4FEVZ4.Get("limitprice")

Dim expiretm As Int = OOMJAO-6BICL-4FEVZ4.Get("expiretm")

Dim fee As String = OOMJAO-6BICL-4FEVZ4.Get("fee")

Dim vol_exec As String = OOMJAO-6BICL-4FEVZ4.Get("vol_exec")

Dim starttm As Int = OOMJAO-6BICL-4FEVZ4.Get("starttm")

Dim descr As Map = OOMJAO-6BICL-4FEVZ4.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OOMJAO-6BICL-4FEVZ4.Get("vol")

Dim userref As String = OOMJAO-6BICL-4FEVZ4.Get("userref")

Dim price As String = OOMJAO-6BICL-4FEVZ4.Get("price")

Dim closetm As Double = OOMJAO-6BICL-4FEVZ4.Get("closetm")

Dim refid As String = OOMJAO-6BICL-4FEVZ4.Get("refid")

Dim status As String = OOMJAO-6BICL-4FEVZ4.Get("status")

Dim stopprice As String = OOMJAO-6BICL-4FEVZ4.Get("stopprice")

Dim misc As String = OOMJAO-6BICL-4FEVZ4.Get("misc")

Dim OHU4DJ-2SZXI-PVUBPB As Map = closed.Get("OHU4DJ-2SZXI-PVUBPB")

Dim opentm As Double = OHU4DJ-2SZXI-PVUBPB.Get("opentm")

Dim oflags As String = OHU4DJ-2SZXI-PVUBPB.Get("oflags")

Dim reason As String = OHU4DJ-2SZXI-PVUBPB.Get("reason")

Dim cost As String = OHU4DJ-2SZXI-PVUBPB.Get("cost")

Dim limitprice As String = OHU4DJ-2SZXI-PVUBPB.Get("limitprice")

Dim expiretm As Int = OHU4DJ-2SZXI-PVUBPB.Get("expiretm")

Dim fee As String = OHU4DJ-2SZXI-PVUBPB.Get("fee")

Dim vol_exec As String = OHU4DJ-2SZXI-PVUBPB.Get("vol_exec")

Dim starttm As Int = OHU4DJ-2SZXI-PVUBPB.Get("starttm")

Dim descr As Map = OHU4DJ-2SZXI-PVUBPB.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OHU4DJ-2SZXI-PVUBPB.Get("vol")

Dim userref As String = OHU4DJ-2SZXI-PVUBPB.Get("userref")

Dim price As String = OHU4DJ-2SZXI-PVUBPB.Get("price")

Dim closetm As Double = OHU4DJ-2SZXI-PVUBPB.Get("closetm")

Dim refid As String = OHU4DJ-2SZXI-PVUBPB.Get("refid")

Dim status As String = OHU4DJ-2SZXI-PVUBPB.Get("status")

Dim stopprice As String = OHU4DJ-2SZXI-PVUBPB.Get("stopprice")

Dim misc As String = OHU4DJ-2SZXI-PVUBPB.Get("misc")

Dim OSPQWR-BCRXC-VD2ZDF As Map = closed.Get("OSPQWR-BCRXC-VD2ZDF")

Dim opentm As Double = OSPQWR-BCRXC-VD2ZDF.Get("opentm")

Dim oflags As String = OSPQWR-BCRXC-VD2ZDF.Get("oflags")

Dim reason As String = OSPQWR-BCRXC-VD2ZDF.Get("reason")

Dim cost As String = OSPQWR-BCRXC-VD2ZDF.Get("cost")

Dim limitprice As String = OSPQWR-BCRXC-VD2ZDF.Get("limitprice")

Dim expiretm As Int = OSPQWR-BCRXC-VD2ZDF.Get("expiretm")

Dim fee As String = OSPQWR-BCRXC-VD2ZDF.Get("fee")

Dim vol_exec As String = OSPQWR-BCRXC-VD2ZDF.Get("vol_exec")

Dim starttm As Int = OSPQWR-BCRXC-VD2ZDF.Get("starttm")

Dim descr As Map = OSPQWR-BCRXC-VD2ZDF.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OSPQWR-BCRXC-VD2ZDF.Get("vol")

Dim userref As String = OSPQWR-BCRXC-VD2ZDF.Get("userref")

Dim price As String = OSPQWR-BCRXC-VD2ZDF.Get("price")

Dim closetm As Double = OSPQWR-BCRXC-VD2ZDF.Get("closetm")

Dim refid As String = OSPQWR-BCRXC-VD2ZDF.Get("refid")

Dim status As String = OSPQWR-BCRXC-VD2ZDF.Get("status")

Dim stopprice As String = OSPQWR-BCRXC-VD2ZDF.Get("stopprice")

Dim misc As String = OSPQWR-BCRXC-VD2ZDF.Get("misc")

Dim ONH4A4-4A3CO-6MJSOR As Map = closed.Get("ONH4A4-4A3CO-6MJSOR")

Dim opentm As Double = ONH4A4-4A3CO-6MJSOR.Get("opentm")

Dim oflags As String = ONH4A4-4A3CO-6MJSOR.Get("oflags")

Dim reason As String = ONH4A4-4A3CO-6MJSOR.Get("reason")

Dim cost As String = ONH4A4-4A3CO-6MJSOR.Get("cost")

Dim limitprice As String = ONH4A4-4A3CO-6MJSOR.Get("limitprice")

Dim expiretm As Int = ONH4A4-4A3CO-6MJSOR.Get("expiretm")

Dim fee As String = ONH4A4-4A3CO-6MJSOR.Get("fee")

Dim vol_exec As String = ONH4A4-4A3CO-6MJSOR.Get("vol_exec")

Dim starttm As Int = ONH4A4-4A3CO-6MJSOR.Get("starttm")

Dim descr As Map = ONH4A4-4A3CO-6MJSOR.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = ONH4A4-4A3CO-6MJSOR.Get("vol")

Dim userref As String = ONH4A4-4A3CO-6MJSOR.Get("userref")

Dim price As String = ONH4A4-4A3CO-6MJSOR.Get("price")

Dim closetm As Double = ONH4A4-4A3CO-6MJSOR.Get("closetm")

Dim refid As String = ONH4A4-4A3CO-6MJSOR.Get("refid")

Dim status As String = ONH4A4-4A3CO-6MJSOR.Get("status")

Dim stopprice As String = ONH4A4-4A3CO-6MJSOR.Get("stopprice")

Dim misc As String = ONH4A4-4A3CO-6MJSOR.Get("misc")

Dim ODD5SC-TOYS4-A54IAM As Map = closed.Get("ODD5SC-TOYS4-A54IAM")

Dim opentm As Double = ODD5SC-TOYS4-A54IAM.Get("opentm")

Dim oflags As String = ODD5SC-TOYS4-A54IAM.Get("oflags")

Dim reason As String = ODD5SC-TOYS4-A54IAM.Get("reason")

Dim cost As String = ODD5SC-TOYS4-A54IAM.Get("cost")

Dim limitprice As String = ODD5SC-TOYS4-A54IAM.Get("limitprice")

Dim expiretm As Int = ODD5SC-TOYS4-A54IAM.Get("expiretm")

Dim fee As String = ODD5SC-TOYS4-A54IAM.Get("fee")

Dim vol_exec As String = ODD5SC-TOYS4-A54IAM.Get("vol_exec")

Dim starttm As Int = ODD5SC-TOYS4-A54IAM.Get("starttm")

Dim descr As Map = ODD5SC-TOYS4-A54IAM.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = ODD5SC-TOYS4-A54IAM.Get("vol")

Dim userref As String = ODD5SC-TOYS4-A54IAM.Get("userref")

Dim price As String = ODD5SC-TOYS4-A54IAM.Get("price")

Dim closetm As Double = ODD5SC-TOYS4-A54IAM.Get("closetm")

Dim refid As String = ODD5SC-TOYS4-A54IAM.Get("refid")

Dim status As String = ODD5SC-TOYS4-A54IAM.Get("status")

Dim stopprice As String = ODD5SC-TOYS4-A54IAM.Get("stopprice")

Dim misc As String = ODD5SC-TOYS4-A54IAM.Get("misc")

Dim OFCFWZ-IZP7F-CTBDUX As Map = closed.Get("OFCFWZ-IZP7F-CTBDUX")

Dim opentm As Double = OFCFWZ-IZP7F-CTBDUX.Get("opentm")

Dim oflags As String = OFCFWZ-IZP7F-CTBDUX.Get("oflags")

Dim reason As String = OFCFWZ-IZP7F-CTBDUX.Get("reason")

Dim cost As String = OFCFWZ-IZP7F-CTBDUX.Get("cost")

Dim limitprice As String = OFCFWZ-IZP7F-CTBDUX.Get("limitprice")

Dim expiretm As Int = OFCFWZ-IZP7F-CTBDUX.Get("expiretm")

Dim fee As String = OFCFWZ-IZP7F-CTBDUX.Get("fee")

Dim vol_exec As String = OFCFWZ-IZP7F-CTBDUX.Get("vol_exec")

Dim starttm As Int = OFCFWZ-IZP7F-CTBDUX.Get("starttm")

Dim descr As Map = OFCFWZ-IZP7F-CTBDUX.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OFCFWZ-IZP7F-CTBDUX.Get("vol")

Dim userref As String = OFCFWZ-IZP7F-CTBDUX.Get("userref")

Dim price As String = OFCFWZ-IZP7F-CTBDUX.Get("price")

Dim closetm As Double = OFCFWZ-IZP7F-CTBDUX.Get("closetm")

Dim refid As String = OFCFWZ-IZP7F-CTBDUX.Get("refid")

Dim status As String = OFCFWZ-IZP7F-CTBDUX.Get("status")

Dim stopprice As String = OFCFWZ-IZP7F-CTBDUX.Get("stopprice")

Dim misc As String = OFCFWZ-IZP7F-CTBDUX.Get("misc")

Dim ONTZJH-CMZDA-DV2PUW As Map = closed.Get("ONTZJH-CMZDA-DV2PUW")

Dim opentm As Double = ONTZJH-CMZDA-DV2PUW.Get("opentm")

Dim oflags As String = ONTZJH-CMZDA-DV2PUW.Get("oflags")

Dim reason As String = ONTZJH-CMZDA-DV2PUW.Get("reason")

Dim cost As String = ONTZJH-CMZDA-DV2PUW.Get("cost")

Dim limitprice As String = ONTZJH-CMZDA-DV2PUW.Get("limitprice")

Dim expiretm As Int = ONTZJH-CMZDA-DV2PUW.Get("expiretm")

Dim fee As String = ONTZJH-CMZDA-DV2PUW.Get("fee")

Dim vol_exec As String = ONTZJH-CMZDA-DV2PUW.Get("vol_exec")

Dim starttm As Int = ONTZJH-CMZDA-DV2PUW.Get("starttm")

Dim descr As Map = ONTZJH-CMZDA-DV2PUW.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = ONTZJH-CMZDA-DV2PUW.Get("vol")

Dim userref As String = ONTZJH-CMZDA-DV2PUW.Get("userref")

Dim price As String = ONTZJH-CMZDA-DV2PUW.Get("price")

Dim closetm As Double = ONTZJH-CMZDA-DV2PUW.Get("closetm")

Dim refid As String = ONTZJH-CMZDA-DV2PUW.Get("refid")

Dim status As String = ONTZJH-CMZDA-DV2PUW.Get("status")

Dim stopprice As String = ONTZJH-CMZDA-DV2PUW.Get("stopprice")

Dim misc As String = ONTZJH-CMZDA-DV2PUW.Get("misc")

Dim OGQJIX-Z7LLH-MXHIKC As Map = closed.Get("OGQJIX-Z7LLH-MXHIKC")

Dim opentm As Double = OGQJIX-Z7LLH-MXHIKC.Get("opentm")

Dim oflags As String = OGQJIX-Z7LLH-MXHIKC.Get("oflags")

Dim reason As String = OGQJIX-Z7LLH-MXHIKC.Get("reason")

Dim cost As String = OGQJIX-Z7LLH-MXHIKC.Get("cost")

Dim limitprice As String = OGQJIX-Z7LLH-MXHIKC.Get("limitprice")

Dim expiretm As Int = OGQJIX-Z7LLH-MXHIKC.Get("expiretm")

Dim fee As String = OGQJIX-Z7LLH-MXHIKC.Get("fee")

Dim vol_exec As String = OGQJIX-Z7LLH-MXHIKC.Get("vol_exec")

Dim starttm As Int = OGQJIX-Z7LLH-MXHIKC.Get("starttm")

Dim descr As Map = OGQJIX-Z7LLH-MXHIKC.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OGQJIX-Z7LLH-MXHIKC.Get("vol")

Dim userref As String = OGQJIX-Z7LLH-MXHIKC.Get("userref")

Dim price As String = OGQJIX-Z7LLH-MXHIKC.Get("price")

Dim closetm As Double = OGQJIX-Z7LLH-MXHIKC.Get("closetm")

Dim refid As String = OGQJIX-Z7LLH-MXHIKC.Get("refid")

Dim status As String = OGQJIX-Z7LLH-MXHIKC.Get("status")

Dim stopprice As String = OGQJIX-Z7LLH-MXHIKC.Get("stopprice")

Dim misc As String = OGQJIX-Z7LLH-MXHIKC.Get("misc")

Dim OBSXXG-ISG7S-MI52AS As Map = closed.Get("OBSXXG-ISG7S-MI52AS")

Dim opentm As Double = OBSXXG-ISG7S-MI52AS.Get("opentm")

Dim oflags As String = OBSXXG-ISG7S-MI52AS.Get("oflags")

Dim reason As String = OBSXXG-ISG7S-MI52AS.Get("reason")

Dim cost As String = OBSXXG-ISG7S-MI52AS.Get("cost")

Dim limitprice As String = OBSXXG-ISG7S-MI52AS.Get("limitprice")

Dim expiretm As Int = OBSXXG-ISG7S-MI52AS.Get("expiretm")

Dim fee As String = OBSXXG-ISG7S-MI52AS.Get("fee")

Dim vol_exec As String = OBSXXG-ISG7S-MI52AS.Get("vol_exec")

Dim starttm As Int = OBSXXG-ISG7S-MI52AS.Get("starttm")

Dim descr As Map = OBSXXG-ISG7S-MI52AS.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OBSXXG-ISG7S-MI52AS.Get("vol")

Dim userref As String = OBSXXG-ISG7S-MI52AS.Get("userref")

Dim price As String = OBSXXG-ISG7S-MI52AS.Get("price")

Dim closetm As Double = OBSXXG-ISG7S-MI52AS.Get("closetm")

Dim refid As String = OBSXXG-ISG7S-MI52AS.Get("refid")

Dim status As String = OBSXXG-ISG7S-MI52AS.Get("status")

Dim stopprice As String = OBSXXG-ISG7S-MI52AS.Get("stopprice")

Dim misc As String = OBSXXG-ISG7S-MI52AS.Get("misc")

Dim OIBY4C-SYIH6-YDS37D As Map = closed.Get("OIBY4C-SYIH6-YDS37D")

Dim opentm As Double = OIBY4C-SYIH6-YDS37D.Get("opentm")

Dim oflags As String = OIBY4C-SYIH6-YDS37D.Get("oflags")

Dim reason As String = OIBY4C-SYIH6-YDS37D.Get("reason")

Dim cost As String = OIBY4C-SYIH6-YDS37D.Get("cost")

Dim limitprice As String = OIBY4C-SYIH6-YDS37D.Get("limitprice")

Dim expiretm As Int = OIBY4C-SYIH6-YDS37D.Get("expiretm")

Dim fee As String = OIBY4C-SYIH6-YDS37D.Get("fee")

Dim vol_exec As String = OIBY4C-SYIH6-YDS37D.Get("vol_exec")

Dim starttm As Int = OIBY4C-SYIH6-YDS37D.Get("starttm")

Dim descr As Map = OIBY4C-SYIH6-YDS37D.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OIBY4C-SYIH6-YDS37D.Get("vol")

Dim userref As String = OIBY4C-SYIH6-YDS37D.Get("userref")

Dim price As String = OIBY4C-SYIH6-YDS37D.Get("price")

Dim closetm As Double = OIBY4C-SYIH6-YDS37D.Get("closetm")

Dim refid As String = OIBY4C-SYIH6-YDS37D.Get("refid")

Dim status As String = OIBY4C-SYIH6-YDS37D.Get("status")

Dim stopprice As String = OIBY4C-SYIH6-YDS37D.Get("stopprice")

Dim misc As String = OIBY4C-SYIH6-YDS37D.Get("misc")

Dim OTJB6A-ZJIUU-NCEJ6X As Map = closed.Get("OTJB6A-ZJIUU-NCEJ6X")

Dim opentm As Double = OTJB6A-ZJIUU-NCEJ6X.Get("opentm")

Dim oflags As String = OTJB6A-ZJIUU-NCEJ6X.Get("oflags")

Dim reason As String = OTJB6A-ZJIUU-NCEJ6X.Get("reason")

Dim cost As String = OTJB6A-ZJIUU-NCEJ6X.Get("cost")

Dim limitprice As String = OTJB6A-ZJIUU-NCEJ6X.Get("limitprice")

Dim expiretm As Int = OTJB6A-ZJIUU-NCEJ6X.Get("expiretm")

Dim fee As String = OTJB6A-ZJIUU-NCEJ6X.Get("fee")

Dim vol_exec As String = OTJB6A-ZJIUU-NCEJ6X.Get("vol_exec")

Dim starttm As Int = OTJB6A-ZJIUU-NCEJ6X.Get("starttm")

Dim descr As Map = OTJB6A-ZJIUU-NCEJ6X.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OTJB6A-ZJIUU-NCEJ6X.Get("vol")

Dim userref As String = OTJB6A-ZJIUU-NCEJ6X.Get("userref")

Dim price As String = OTJB6A-ZJIUU-NCEJ6X.Get("price")

Dim closetm As Double = OTJB6A-ZJIUU-NCEJ6X.Get("closetm")

Dim refid As String = OTJB6A-ZJIUU-NCEJ6X.Get("refid")

Dim status As String = OTJB6A-ZJIUU-NCEJ6X.Get("status")

Dim stopprice As String = OTJB6A-ZJIUU-NCEJ6X.Get("stopprice")

Dim misc As String = OTJB6A-ZJIUU-NCEJ6X.Get("misc")

Dim O4Y5VG-MAZXY-ZRP6WH As Map = closed.Get("O4Y5VG-MAZXY-ZRP6WH")

Dim opentm As Double = O4Y5VG-MAZXY-ZRP6WH.Get("opentm")

Dim oflags As String = O4Y5VG-MAZXY-ZRP6WH.Get("oflags")

Dim reason As String = O4Y5VG-MAZXY-ZRP6WH.Get("reason")

Dim cost As String = O4Y5VG-MAZXY-ZRP6WH.Get("cost")

Dim limitprice As String = O4Y5VG-MAZXY-ZRP6WH.Get("limitprice")

Dim expiretm As Int = O4Y5VG-MAZXY-ZRP6WH.Get("expiretm")

Dim fee As String = O4Y5VG-MAZXY-ZRP6WH.Get("fee")

Dim vol_exec As String = O4Y5VG-MAZXY-ZRP6WH.Get("vol_exec")

Dim starttm As Int = O4Y5VG-MAZXY-ZRP6WH.Get("starttm")

Dim descr As Map = O4Y5VG-MAZXY-ZRP6WH.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = O4Y5VG-MAZXY-ZRP6WH.Get("vol")

Dim userref As String = O4Y5VG-MAZXY-ZRP6WH.Get("userref")

Dim price As String = O4Y5VG-MAZXY-ZRP6WH.Get("price")

Dim closetm As Double = O4Y5VG-MAZXY-ZRP6WH.Get("closetm")

Dim refid As String = O4Y5VG-MAZXY-ZRP6WH.Get("refid")

Dim status As String = O4Y5VG-MAZXY-ZRP6WH.Get("status")

Dim stopprice As String = O4Y5VG-MAZXY-ZRP6WH.Get("stopprice")

Dim misc As String = O4Y5VG-MAZXY-ZRP6WH.Get("misc")

Dim OKAB4A-T5CZO-NBT4PI As Map = closed.Get("OKAB4A-T5CZO-NBT4PI")

Dim opentm As Double = OKAB4A-T5CZO-NBT4PI.Get("opentm")

Dim oflags As String = OKAB4A-T5CZO-NBT4PI.Get("oflags")

Dim reason As String = OKAB4A-T5CZO-NBT4PI.Get("reason")

Dim cost As String = OKAB4A-T5CZO-NBT4PI.Get("cost")

Dim limitprice As String = OKAB4A-T5CZO-NBT4PI.Get("limitprice")

Dim expiretm As Int = OKAB4A-T5CZO-NBT4PI.Get("expiretm")

Dim fee As String = OKAB4A-T5CZO-NBT4PI.Get("fee")

Dim vol_exec As String = OKAB4A-T5CZO-NBT4PI.Get("vol_exec")

Dim starttm As Int = OKAB4A-T5CZO-NBT4PI.Get("starttm")

Dim descr As Map = OKAB4A-T5CZO-NBT4PI.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OKAB4A-T5CZO-NBT4PI.Get("vol")

Dim userref As String = OKAB4A-T5CZO-NBT4PI.Get("userref")

Dim price As String = OKAB4A-T5CZO-NBT4PI.Get("price")

Dim closetm As Double = OKAB4A-T5CZO-NBT4PI.Get("closetm")

Dim refid As String = OKAB4A-T5CZO-NBT4PI.Get("refid")

Dim status As String = OKAB4A-T5CZO-NBT4PI.Get("status")

Dim stopprice As String = OKAB4A-T5CZO-NBT4PI.Get("stopprice")

Dim misc As String = OKAB4A-T5CZO-NBT4PI.Get("misc")

Dim OWSQDS-5FBGV-ZSL5QP As Map = closed.Get("OWSQDS-5FBGV-ZSL5QP")

Dim opentm As Double = OWSQDS-5FBGV-ZSL5QP.Get("opentm")

Dim oflags As String = OWSQDS-5FBGV-ZSL5QP.Get("oflags")

Dim reason As String = OWSQDS-5FBGV-ZSL5QP.Get("reason")

Dim cost As String = OWSQDS-5FBGV-ZSL5QP.Get("cost")

Dim limitprice As String = OWSQDS-5FBGV-ZSL5QP.Get("limitprice")

Dim expiretm As Int = OWSQDS-5FBGV-ZSL5QP.Get("expiretm")

Dim fee As String = OWSQDS-5FBGV-ZSL5QP.Get("fee")

Dim vol_exec As String = OWSQDS-5FBGV-ZSL5QP.Get("vol_exec")

Dim starttm As Int = OWSQDS-5FBGV-ZSL5QP.Get("starttm")

Dim descr As Map = OWSQDS-5FBGV-ZSL5QP.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OWSQDS-5FBGV-ZSL5QP.Get("vol")

Dim userref As String = OWSQDS-5FBGV-ZSL5QP.Get("userref")

Dim price As String = OWSQDS-5FBGV-ZSL5QP.Get("price")

Dim closetm As Double = OWSQDS-5FBGV-ZSL5QP.Get("closetm")

Dim refid As String = OWSQDS-5FBGV-ZSL5QP.Get("refid")

Dim status As String = OWSQDS-5FBGV-ZSL5QP.Get("status")

Dim stopprice As String = OWSQDS-5FBGV-ZSL5QP.Get("stopprice")

Dim misc As String = OWSQDS-5FBGV-ZSL5QP.Get("misc")

Dim O24STA-P4DF7-ZJP2Y5 As Map = closed.Get("O24STA-P4DF7-ZJP2Y5")

Dim opentm As Double = O24STA-P4DF7-ZJP2Y5.Get("opentm")

Dim oflags As String = O24STA-P4DF7-ZJP2Y5.Get("oflags")

Dim reason As String = O24STA-P4DF7-ZJP2Y5.Get("reason")

Dim cost As String = O24STA-P4DF7-ZJP2Y5.Get("cost")

Dim limitprice As String = O24STA-P4DF7-ZJP2Y5.Get("limitprice")

Dim expiretm As Int = O24STA-P4DF7-ZJP2Y5.Get("expiretm")

Dim fee As String = O24STA-P4DF7-ZJP2Y5.Get("fee")

Dim vol_exec As String = O24STA-P4DF7-ZJP2Y5.Get("vol_exec")

Dim starttm As Int = O24STA-P4DF7-ZJP2Y5.Get("starttm")

Dim descr As Map = O24STA-P4DF7-ZJP2Y5.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = O24STA-P4DF7-ZJP2Y5.Get("vol")

Dim userref As String = O24STA-P4DF7-ZJP2Y5.Get("userref")

Dim price As String = O24STA-P4DF7-ZJP2Y5.Get("price")

Dim closetm As Double = O24STA-P4DF7-ZJP2Y5.Get("closetm")

Dim refid As String = O24STA-P4DF7-ZJP2Y5.Get("refid")

Dim status As String = O24STA-P4DF7-ZJP2Y5.Get("status")

Dim stopprice As String = O24STA-P4DF7-ZJP2Y5.Get("stopprice")

Dim misc As String = O24STA-P4DF7-ZJP2Y5.Get("misc")

Dim OFUJVO-B43D5-L2KW24 As Map = closed.Get("OFUJVO-B43D5-L2KW24")

Dim opentm As Double = OFUJVO-B43D5-L2KW24.Get("opentm")

Dim oflags As String = OFUJVO-B43D5-L2KW24.Get("oflags")

Dim reason As String = OFUJVO-B43D5-L2KW24.Get("reason")

Dim cost As String = OFUJVO-B43D5-L2KW24.Get("cost")

Dim limitprice As String = OFUJVO-B43D5-L2KW24.Get("limitprice")

Dim expiretm As Int = OFUJVO-B43D5-L2KW24.Get("expiretm")

Dim fee As String = OFUJVO-B43D5-L2KW24.Get("fee")

Dim vol_exec As String = OFUJVO-B43D5-L2KW24.Get("vol_exec")

Dim starttm As Int = OFUJVO-B43D5-L2KW24.Get("starttm")

Dim descr As Map = OFUJVO-B43D5-L2KW24.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OFUJVO-B43D5-L2KW24.Get("vol")

Dim userref As String = OFUJVO-B43D5-L2KW24.Get("userref")

Dim price As String = OFUJVO-B43D5-L2KW24.Get("price")

Dim closetm As Double = OFUJVO-B43D5-L2KW24.Get("closetm")

Dim refid As String = OFUJVO-B43D5-L2KW24.Get("refid")

Dim status As String = OFUJVO-B43D5-L2KW24.Get("status")

Dim stopprice As String = OFUJVO-B43D5-L2KW24.Get("stopprice")

Dim misc As String = OFUJVO-B43D5-L2KW24.Get("misc")

Dim O4RI5U-3R6AE-22SR6D As Map = closed.Get("O4RI5U-3R6AE-22SR6D")

Dim opentm As Double = O4RI5U-3R6AE-22SR6D.Get("opentm")

Dim oflags As String = O4RI5U-3R6AE-22SR6D.Get("oflags")

Dim reason As String = O4RI5U-3R6AE-22SR6D.Get("reason")

Dim cost As String = O4RI5U-3R6AE-22SR6D.Get("cost")

Dim limitprice As String = O4RI5U-3R6AE-22SR6D.Get("limitprice")

Dim expiretm As Int = O4RI5U-3R6AE-22SR6D.Get("expiretm")

Dim fee As String = O4RI5U-3R6AE-22SR6D.Get("fee")

Dim vol_exec As String = O4RI5U-3R6AE-22SR6D.Get("vol_exec")

Dim starttm As Int = O4RI5U-3R6AE-22SR6D.Get("starttm")

Dim descr As Map = O4RI5U-3R6AE-22SR6D.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = O4RI5U-3R6AE-22SR6D.Get("vol")

Dim userref As String = O4RI5U-3R6AE-22SR6D.Get("userref")

Dim price As String = O4RI5U-3R6AE-22SR6D.Get("price")

Dim closetm As Double = O4RI5U-3R6AE-22SR6D.Get("closetm")

Dim refid As String = O4RI5U-3R6AE-22SR6D.Get("refid")

Dim status As String = O4RI5U-3R6AE-22SR6D.Get("status")

Dim stopprice As String = O4RI5U-3R6AE-22SR6D.Get("stopprice")

Dim misc As String = O4RI5U-3R6AE-22SR6D.Get("misc")

Dim OGTM7N-7JPMY-DWLMDK As Map = closed.Get("OGTM7N-7JPMY-DWLMDK")

Dim opentm As Double = OGTM7N-7JPMY-DWLMDK.Get("opentm")

Dim oflags As String = OGTM7N-7JPMY-DWLMDK.Get("oflags")

Dim reason As String = OGTM7N-7JPMY-DWLMDK.Get("reason")

Dim cost As String = OGTM7N-7JPMY-DWLMDK.Get("cost")

Dim limitprice As String = OGTM7N-7JPMY-DWLMDK.Get("limitprice")

Dim expiretm As Int = OGTM7N-7JPMY-DWLMDK.Get("expiretm")

Dim fee As String = OGTM7N-7JPMY-DWLMDK.Get("fee")

Dim vol_exec As String = OGTM7N-7JPMY-DWLMDK.Get("vol_exec")

Dim starttm As Int = OGTM7N-7JPMY-DWLMDK.Get("starttm")

Dim descr As Map = OGTM7N-7JPMY-DWLMDK.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OGTM7N-7JPMY-DWLMDK.Get("vol")

Dim userref As String = OGTM7N-7JPMY-DWLMDK.Get("userref")

Dim price As String = OGTM7N-7JPMY-DWLMDK.Get("price")

Dim closetm As Double = OGTM7N-7JPMY-DWLMDK.Get("closetm")

Dim refid As String = OGTM7N-7JPMY-DWLMDK.Get("refid")

Dim status As String = OGTM7N-7JPMY-DWLMDK.Get("status")

Dim stopprice As String = OGTM7N-7JPMY-DWLMDK.Get("stopprice")

Dim misc As String = OGTM7N-7JPMY-DWLMDK.Get("misc")

Dim OHNFLP-O5LDI-DI72OR As Map = closed.Get("OHNFLP-O5LDI-DI72OR")

Dim opentm As Double = OHNFLP-O5LDI-DI72OR.Get("opentm")

Dim oflags As String = OHNFLP-O5LDI-DI72OR.Get("oflags")

Dim reason As String = OHNFLP-O5LDI-DI72OR.Get("reason")

Dim cost As String = OHNFLP-O5LDI-DI72OR.Get("cost")

Dim limitprice As String = OHNFLP-O5LDI-DI72OR.Get("limitprice")

Dim expiretm As Int = OHNFLP-O5LDI-DI72OR.Get("expiretm")

Dim fee As String = OHNFLP-O5LDI-DI72OR.Get("fee")

Dim vol_exec As String = OHNFLP-O5LDI-DI72OR.Get("vol_exec")

Dim starttm As Int = OHNFLP-O5LDI-DI72OR.Get("starttm")

Dim descr As Map = OHNFLP-O5LDI-DI72OR.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OHNFLP-O5LDI-DI72OR.Get("vol")

Dim userref As String = OHNFLP-O5LDI-DI72OR.Get("userref")

Dim price As String = OHNFLP-O5LDI-DI72OR.Get("price")

Dim closetm As Double = OHNFLP-O5LDI-DI72OR.Get("closetm")

Dim refid As String = OHNFLP-O5LDI-DI72OR.Get("refid")

Dim status As String = OHNFLP-O5LDI-DI72OR.Get("status")

Dim stopprice As String = OHNFLP-O5LDI-DI72OR.Get("stopprice")

Dim misc As String = OHNFLP-O5LDI-DI72OR.Get("misc")

Dim O5D5DW-SCKL6-ANERLQ As Map = closed.Get("O5D5DW-SCKL6-ANERLQ")

Dim opentm As Double = O5D5DW-SCKL6-ANERLQ.Get("opentm")

Dim oflags As String = O5D5DW-SCKL6-ANERLQ.Get("oflags")

Dim reason As String = O5D5DW-SCKL6-ANERLQ.Get("reason")

Dim cost As String = O5D5DW-SCKL6-ANERLQ.Get("cost")

Dim limitprice As String = O5D5DW-SCKL6-ANERLQ.Get("limitprice")

Dim expiretm As Int = O5D5DW-SCKL6-ANERLQ.Get("expiretm")

Dim fee As String = O5D5DW-SCKL6-ANERLQ.Get("fee")

Dim vol_exec As String = O5D5DW-SCKL6-ANERLQ.Get("vol_exec")

Dim starttm As Int = O5D5DW-SCKL6-ANERLQ.Get("starttm")

Dim descr As Map = O5D5DW-SCKL6-ANERLQ.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = O5D5DW-SCKL6-ANERLQ.Get("vol")

Dim userref As String = O5D5DW-SCKL6-ANERLQ.Get("userref")

Dim price As String = O5D5DW-SCKL6-ANERLQ.Get("price")

Dim closetm As Double = O5D5DW-SCKL6-ANERLQ.Get("closetm")

Dim refid As String = O5D5DW-SCKL6-ANERLQ.Get("refid")

Dim status As String = O5D5DW-SCKL6-ANERLQ.Get("status")

Dim stopprice As String = O5D5DW-SCKL6-ANERLQ.Get("stopprice")

Dim misc As String = O5D5DW-SCKL6-ANERLQ.Get("misc")

Dim OVRIQA-QETZ4-JYBBIZ As Map = closed.Get("OVRIQA-QETZ4-JYBBIZ")

Dim opentm As Double = OVRIQA-QETZ4-JYBBIZ.Get("opentm")

Dim oflags As String = OVRIQA-QETZ4-JYBBIZ.Get("oflags")

Dim reason As String = OVRIQA-QETZ4-JYBBIZ.Get("reason")

Dim cost As String = OVRIQA-QETZ4-JYBBIZ.Get("cost")

Dim limitprice As String = OVRIQA-QETZ4-JYBBIZ.Get("limitprice")

Dim expiretm As Int = OVRIQA-QETZ4-JYBBIZ.Get("expiretm")

Dim fee As String = OVRIQA-QETZ4-JYBBIZ.Get("fee")

Dim vol_exec As String = OVRIQA-QETZ4-JYBBIZ.Get("vol_exec")

Dim starttm As Int = OVRIQA-QETZ4-JYBBIZ.Get("starttm")

Dim descr As Map = OVRIQA-QETZ4-JYBBIZ.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OVRIQA-QETZ4-JYBBIZ.Get("vol")

Dim userref As String = OVRIQA-QETZ4-JYBBIZ.Get("userref")

Dim price As String = OVRIQA-QETZ4-JYBBIZ.Get("price")

Dim closetm As Double = OVRIQA-QETZ4-JYBBIZ.Get("closetm")

Dim refid As String = OVRIQA-QETZ4-JYBBIZ.Get("refid")

Dim status As String = OVRIQA-QETZ4-JYBBIZ.Get("status")

Dim stopprice As String = OVRIQA-QETZ4-JYBBIZ.Get("stopprice")

Dim misc As String = OVRIQA-QETZ4-JYBBIZ.Get("misc")

Dim OGIY2I-FWCV7-VG5B7Q As Map = closed.Get("OGIY2I-FWCV7-VG5B7Q")

Dim opentm As Double = OGIY2I-FWCV7-VG5B7Q.Get("opentm")

Dim oflags As String = OGIY2I-FWCV7-VG5B7Q.Get("oflags")

Dim reason As String = OGIY2I-FWCV7-VG5B7Q.Get("reason")

Dim cost As String = OGIY2I-FWCV7-VG5B7Q.Get("cost")

Dim limitprice As String = OGIY2I-FWCV7-VG5B7Q.Get("limitprice")

Dim expiretm As Int = OGIY2I-FWCV7-VG5B7Q.Get("expiretm")

Dim fee As String = OGIY2I-FWCV7-VG5B7Q.Get("fee")

Dim vol_exec As String = OGIY2I-FWCV7-VG5B7Q.Get("vol_exec")

Dim starttm As Int = OGIY2I-FWCV7-VG5B7Q.Get("starttm")

Dim descr As Map = OGIY2I-FWCV7-VG5B7Q.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OGIY2I-FWCV7-VG5B7Q.Get("vol")

Dim userref As String = OGIY2I-FWCV7-VG5B7Q.Get("userref")

Dim price As String = OGIY2I-FWCV7-VG5B7Q.Get("price")

Dim closetm As Double = OGIY2I-FWCV7-VG5B7Q.Get("closetm")

Dim refid As String = OGIY2I-FWCV7-VG5B7Q.Get("refid")

Dim status As String = OGIY2I-FWCV7-VG5B7Q.Get("status")

Dim stopprice As String = OGIY2I-FWCV7-VG5B7Q.Get("stopprice")

Dim misc As String = OGIY2I-FWCV7-VG5B7Q.Get("misc")

Dim OIIUH5-PMYI6-HIBKXF As Map = closed.Get("OIIUH5-PMYI6-HIBKXF")

Dim opentm As Double = OIIUH5-PMYI6-HIBKXF.Get("opentm")

Dim oflags As String = OIIUH5-PMYI6-HIBKXF.Get("oflags")

Dim reason As String = OIIUH5-PMYI6-HIBKXF.Get("reason")

Dim cost As String = OIIUH5-PMYI6-HIBKXF.Get("cost")

Dim limitprice As String = OIIUH5-PMYI6-HIBKXF.Get("limitprice")

Dim expiretm As Int = OIIUH5-PMYI6-HIBKXF.Get("expiretm")

Dim fee As String = OIIUH5-PMYI6-HIBKXF.Get("fee")

Dim vol_exec As String = OIIUH5-PMYI6-HIBKXF.Get("vol_exec")

Dim starttm As Int = OIIUH5-PMYI6-HIBKXF.Get("starttm")

Dim descr As Map = OIIUH5-PMYI6-HIBKXF.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OIIUH5-PMYI6-HIBKXF.Get("vol")

Dim userref As String = OIIUH5-PMYI6-HIBKXF.Get("userref")

Dim price As String = OIIUH5-PMYI6-HIBKXF.Get("price")

Dim closetm As Double = OIIUH5-PMYI6-HIBKXF.Get("closetm")

Dim refid As String = OIIUH5-PMYI6-HIBKXF.Get("refid")

Dim status As String = OIIUH5-PMYI6-HIBKXF.Get("status")

Dim stopprice As String = OIIUH5-PMYI6-HIBKXF.Get("stopprice")

Dim misc As String = OIIUH5-PMYI6-HIBKXF.Get("misc")

Dim OSHZOI-QGZ4C-47DT2J As Map = closed.Get("OSHZOI-QGZ4C-47DT2J")

Dim opentm As Double = OSHZOI-QGZ4C-47DT2J.Get("opentm")

Dim oflags As String = OSHZOI-QGZ4C-47DT2J.Get("oflags")

Dim reason As String = OSHZOI-QGZ4C-47DT2J.Get("reason")

Dim cost As String = OSHZOI-QGZ4C-47DT2J.Get("cost")

Dim limitprice As String = OSHZOI-QGZ4C-47DT2J.Get("limitprice")

Dim expiretm As Int = OSHZOI-QGZ4C-47DT2J.Get("expiretm")

Dim fee As String = OSHZOI-QGZ4C-47DT2J.Get("fee")

Dim vol_exec As String = OSHZOI-QGZ4C-47DT2J.Get("vol_exec")

Dim starttm As Int = OSHZOI-QGZ4C-47DT2J.Get("starttm")

Dim descr As Map = OSHZOI-QGZ4C-47DT2J.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OSHZOI-QGZ4C-47DT2J.Get("vol")

Dim userref As String = OSHZOI-QGZ4C-47DT2J.Get("userref")

Dim price As String = OSHZOI-QGZ4C-47DT2J.Get("price")

Dim closetm As Double = OSHZOI-QGZ4C-47DT2J.Get("closetm")

Dim refid As String = OSHZOI-QGZ4C-47DT2J.Get("refid")

Dim status As String = OSHZOI-QGZ4C-47DT2J.Get("status")

Dim stopprice As String = OSHZOI-QGZ4C-47DT2J.Get("stopprice")

Dim misc As String = OSHZOI-QGZ4C-47DT2J.Get("misc")

Dim O4MGVM-34KWJ-5NFV25 As Map = closed.Get("O4MGVM-34KWJ-5NFV25")

Dim opentm As Double = O4MGVM-34KWJ-5NFV25.Get("opentm")

Dim oflags As String = O4MGVM-34KWJ-5NFV25.Get("oflags")

Dim reason As String = O4MGVM-34KWJ-5NFV25.Get("reason")

Dim cost As String = O4MGVM-34KWJ-5NFV25.Get("cost")

Dim limitprice As String = O4MGVM-34KWJ-5NFV25.Get("limitprice")

Dim expiretm As Int = O4MGVM-34KWJ-5NFV25.Get("expiretm")

Dim fee As String = O4MGVM-34KWJ-5NFV25.Get("fee")

Dim vol_exec As String = O4MGVM-34KWJ-5NFV25.Get("vol_exec")

Dim starttm As Int = O4MGVM-34KWJ-5NFV25.Get("starttm")

Dim descr As Map = O4MGVM-34KWJ-5NFV25.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = O4MGVM-34KWJ-5NFV25.Get("vol")

Dim userref As String = O4MGVM-34KWJ-5NFV25.Get("userref")

Dim price As String = O4MGVM-34KWJ-5NFV25.Get("price")

Dim closetm As Double = O4MGVM-34KWJ-5NFV25.Get("closetm")

Dim refid As String = O4MGVM-34KWJ-5NFV25.Get("refid")

Dim status As String = O4MGVM-34KWJ-5NFV25.Get("status")

Dim stopprice As String = O4MGVM-34KWJ-5NFV25.Get("stopprice")

Dim misc As String = O4MGVM-34KWJ-5NFV25.Get("misc")

Dim OJCR7Z-ZRU36-Z4Y5PX As Map = closed.Get("OJCR7Z-ZRU36-Z4Y5PX")

Dim opentm As Double = OJCR7Z-ZRU36-Z4Y5PX.Get("opentm")

Dim oflags As String = OJCR7Z-ZRU36-Z4Y5PX.Get("oflags")

Dim reason As String = OJCR7Z-ZRU36-Z4Y5PX.Get("reason")

Dim cost As String = OJCR7Z-ZRU36-Z4Y5PX.Get("cost")

Dim limitprice As String = OJCR7Z-ZRU36-Z4Y5PX.Get("limitprice")

Dim expiretm As Int = OJCR7Z-ZRU36-Z4Y5PX.Get("expiretm")

Dim fee As String = OJCR7Z-ZRU36-Z4Y5PX.Get("fee")

Dim vol_exec As String = OJCR7Z-ZRU36-Z4Y5PX.Get("vol_exec")

Dim starttm As Int = OJCR7Z-ZRU36-Z4Y5PX.Get("starttm")

Dim descr As Map = OJCR7Z-ZRU36-Z4Y5PX.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OJCR7Z-ZRU36-Z4Y5PX.Get("vol")

Dim userref As String = OJCR7Z-ZRU36-Z4Y5PX.Get("userref")

Dim price As String = OJCR7Z-ZRU36-Z4Y5PX.Get("price")

Dim closetm As Double = OJCR7Z-ZRU36-Z4Y5PX.Get("closetm")

Dim refid As String = OJCR7Z-ZRU36-Z4Y5PX.Get("refid")

Dim status As String = OJCR7Z-ZRU36-Z4Y5PX.Get("status")

Dim stopprice As String = OJCR7Z-ZRU36-Z4Y5PX.Get("stopprice")

Dim misc As String = OJCR7Z-ZRU36-Z4Y5PX.Get("misc")

Dim OL3RU6-6UVZA-CNP2M4 As Map = closed.Get("OL3RU6-6UVZA-CNP2M4")

Dim opentm As Double = OL3RU6-6UVZA-CNP2M4.Get("opentm")

Dim oflags As String = OL3RU6-6UVZA-CNP2M4.Get("oflags")

Dim reason As String = OL3RU6-6UVZA-CNP2M4.Get("reason")

Dim cost As String = OL3RU6-6UVZA-CNP2M4.Get("cost")

Dim limitprice As String = OL3RU6-6UVZA-CNP2M4.Get("limitprice")

Dim expiretm As Int = OL3RU6-6UVZA-CNP2M4.Get("expiretm")

Dim fee As String = OL3RU6-6UVZA-CNP2M4.Get("fee")

Dim vol_exec As String = OL3RU6-6UVZA-CNP2M4.Get("vol_exec")

Dim starttm As Int = OL3RU6-6UVZA-CNP2M4.Get("starttm")

Dim descr As Map = OL3RU6-6UVZA-CNP2M4.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OL3RU6-6UVZA-CNP2M4.Get("vol")

Dim userref As String = OL3RU6-6UVZA-CNP2M4.Get("userref")

Dim price As String = OL3RU6-6UVZA-CNP2M4.Get("price")

Dim closetm As Double = OL3RU6-6UVZA-CNP2M4.Get("closetm")

Dim refid As String = OL3RU6-6UVZA-CNP2M4.Get("refid")

Dim status As String = OL3RU6-6UVZA-CNP2M4.Get("status")

Dim stopprice As String = OL3RU6-6UVZA-CNP2M4.Get("stopprice")

Dim misc As String = OL3RU6-6UVZA-CNP2M4.Get("misc")

Dim OI7QIN-QM6MO-W5DVTU As Map = closed.Get("OI7QIN-QM6MO-W5DVTU")

Dim opentm As Double = OI7QIN-QM6MO-W5DVTU.Get("opentm")

Dim oflags As String = OI7QIN-QM6MO-W5DVTU.Get("oflags")

Dim reason As String = OI7QIN-QM6MO-W5DVTU.Get("reason")

Dim cost As String = OI7QIN-QM6MO-W5DVTU.Get("cost")

Dim limitprice As String = OI7QIN-QM6MO-W5DVTU.Get("limitprice")

Dim expiretm As Int = OI7QIN-QM6MO-W5DVTU.Get("expiretm")

Dim fee As String = OI7QIN-QM6MO-W5DVTU.Get("fee")

Dim vol_exec As String = OI7QIN-QM6MO-W5DVTU.Get("vol_exec")

Dim starttm As Int = OI7QIN-QM6MO-W5DVTU.Get("starttm")

Dim descr As Map = OI7QIN-QM6MO-W5DVTU.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OI7QIN-QM6MO-W5DVTU.Get("vol")

Dim userref As String = OI7QIN-QM6MO-W5DVTU.Get("userref")

Dim price As String = OI7QIN-QM6MO-W5DVTU.Get("price")

Dim closetm As Double = OI7QIN-QM6MO-W5DVTU.Get("closetm")

Dim refid As String = OI7QIN-QM6MO-W5DVTU.Get("refid")

Dim status As String = OI7QIN-QM6MO-W5DVTU.Get("status")

Dim stopprice As String = OI7QIN-QM6MO-W5DVTU.Get("stopprice")

Dim misc As String = OI7QIN-QM6MO-W5DVTU.Get("misc")

Dim O54R2W-P25XQ-ILSUGO As Map = closed.Get("O54R2W-P25XQ-ILSUGO")

Dim opentm As Double = O54R2W-P25XQ-ILSUGO.Get("opentm")

Dim oflags As String = O54R2W-P25XQ-ILSUGO.Get("oflags")

Dim reason As String = O54R2W-P25XQ-ILSUGO.Get("reason")

Dim cost As String = O54R2W-P25XQ-ILSUGO.Get("cost")

Dim limitprice As String = O54R2W-P25XQ-ILSUGO.Get("limitprice")

Dim expiretm As Int = O54R2W-P25XQ-ILSUGO.Get("expiretm")

Dim fee As String = O54R2W-P25XQ-ILSUGO.Get("fee")

Dim vol_exec As String = O54R2W-P25XQ-ILSUGO.Get("vol_exec")

Dim starttm As Int = O54R2W-P25XQ-ILSUGO.Get("starttm")

Dim descr As Map = O54R2W-P25XQ-ILSUGO.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = O54R2W-P25XQ-ILSUGO.Get("vol")

Dim userref As String = O54R2W-P25XQ-ILSUGO.Get("userref")

Dim price As String = O54R2W-P25XQ-ILSUGO.Get("price")

Dim closetm As Double = O54R2W-P25XQ-ILSUGO.Get("closetm")

Dim refid As String = O54R2W-P25XQ-ILSUGO.Get("refid")

Dim status As String = O54R2W-P25XQ-ILSUGO.Get("status")

Dim stopprice As String = O54R2W-P25XQ-ILSUGO.Get("stopprice")

Dim misc As String = O54R2W-P25XQ-ILSUGO.Get("misc")

Dim O2G3QZ-M6OGP-QRMPEE As Map = closed.Get("O2G3QZ-M6OGP-QRMPEE")

Dim opentm As Double = O2G3QZ-M6OGP-QRMPEE.Get("opentm")

Dim oflags As String = O2G3QZ-M6OGP-QRMPEE.Get("oflags")

Dim reason As String = O2G3QZ-M6OGP-QRMPEE.Get("reason")

Dim cost As String = O2G3QZ-M6OGP-QRMPEE.Get("cost")

Dim limitprice As String = O2G3QZ-M6OGP-QRMPEE.Get("limitprice")

Dim expiretm As Int = O2G3QZ-M6OGP-QRMPEE.Get("expiretm")

Dim fee As String = O2G3QZ-M6OGP-QRMPEE.Get("fee")

Dim vol_exec As String = O2G3QZ-M6OGP-QRMPEE.Get("vol_exec")

Dim starttm As Int = O2G3QZ-M6OGP-QRMPEE.Get("starttm")

Dim descr As Map = O2G3QZ-M6OGP-QRMPEE.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = O2G3QZ-M6OGP-QRMPEE.Get("vol")

Dim userref As String = O2G3QZ-M6OGP-QRMPEE.Get("userref")

Dim price As String = O2G3QZ-M6OGP-QRMPEE.Get("price")

Dim closetm As Double = O2G3QZ-M6OGP-QRMPEE.Get("closetm")

Dim refid As String = O2G3QZ-M6OGP-QRMPEE.Get("refid")

Dim status As String = O2G3QZ-M6OGP-QRMPEE.Get("status")

Dim stopprice As String = O2G3QZ-M6OGP-QRMPEE.Get("stopprice")

Dim misc As String = O2G3QZ-M6OGP-QRMPEE.Get("misc")

Dim OPAEGD-XEBTE-WDM4FJ As Map = closed.Get("OPAEGD-XEBTE-WDM4FJ")

Dim opentm As Double = OPAEGD-XEBTE-WDM4FJ.Get("opentm")

Dim oflags As String = OPAEGD-XEBTE-WDM4FJ.Get("oflags")

Dim reason As String = OPAEGD-XEBTE-WDM4FJ.Get("reason")

Dim cost As String = OPAEGD-XEBTE-WDM4FJ.Get("cost")

Dim limitprice As String = OPAEGD-XEBTE-WDM4FJ.Get("limitprice")

Dim expiretm As Int = OPAEGD-XEBTE-WDM4FJ.Get("expiretm")

Dim fee As String = OPAEGD-XEBTE-WDM4FJ.Get("fee")

Dim vol_exec As String = OPAEGD-XEBTE-WDM4FJ.Get("vol_exec")

Dim starttm As Int = OPAEGD-XEBTE-WDM4FJ.Get("starttm")

Dim descr As Map = OPAEGD-XEBTE-WDM4FJ.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OPAEGD-XEBTE-WDM4FJ.Get("vol")

Dim userref As Int = OPAEGD-XEBTE-WDM4FJ.Get("userref")

Dim price As String = OPAEGD-XEBTE-WDM4FJ.Get("price")

Dim closetm As Double = OPAEGD-XEBTE-WDM4FJ.Get("closetm")

Dim refid As String = OPAEGD-XEBTE-WDM4FJ.Get("refid")

Dim status As String = OPAEGD-XEBTE-WDM4FJ.Get("status")

Dim stopprice As String = OPAEGD-XEBTE-WDM4FJ.Get("stopprice")

Dim misc As String = OPAEGD-XEBTE-WDM4FJ.Get("misc")

Dim OB3CZX-BMTX4-WNINVG As Map = closed.Get("OB3CZX-BMTX4-WNINVG")

Dim opentm As Double = OB3CZX-BMTX4-WNINVG.Get("opentm")

Dim oflags As String = OB3CZX-BMTX4-WNINVG.Get("oflags")

Dim reason As String = OB3CZX-BMTX4-WNINVG.Get("reason")

Dim cost As String = OB3CZX-BMTX4-WNINVG.Get("cost")

Dim limitprice As String = OB3CZX-BMTX4-WNINVG.Get("limitprice")

Dim expiretm As Int = OB3CZX-BMTX4-WNINVG.Get("expiretm")

Dim fee As String = OB3CZX-BMTX4-WNINVG.Get("fee")

Dim vol_exec As String = OB3CZX-BMTX4-WNINVG.Get("vol_exec")

Dim starttm As Int = OB3CZX-BMTX4-WNINVG.Get("starttm")

Dim descr As Map = OB3CZX-BMTX4-WNINVG.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OB3CZX-BMTX4-WNINVG.Get("vol")

Dim userref As String = OB3CZX-BMTX4-WNINVG.Get("userref")

Dim price As String = OB3CZX-BMTX4-WNINVG.Get("price")

Dim closetm As Double = OB3CZX-BMTX4-WNINVG.Get("closetm")

Dim refid As String = OB3CZX-BMTX4-WNINVG.Get("refid")

Dim status As String = OB3CZX-BMTX4-WNINVG.Get("status")

Dim stopprice As String = OB3CZX-BMTX4-WNINVG.Get("stopprice")

Dim misc As String = OB3CZX-BMTX4-WNINVG.Get("misc")

Dim OQOPGQ-U4GOH-7ZTWR7 As Map = closed.Get("OQOPGQ-U4GOH-7ZTWR7")

Dim opentm As Double = OQOPGQ-U4GOH-7ZTWR7.Get("opentm")

Dim oflags As String = OQOPGQ-U4GOH-7ZTWR7.Get("oflags")

Dim reason As String = OQOPGQ-U4GOH-7ZTWR7.Get("reason")

Dim cost As String = OQOPGQ-U4GOH-7ZTWR7.Get("cost")

Dim limitprice As String = OQOPGQ-U4GOH-7ZTWR7.Get("limitprice")

Dim expiretm As Int = OQOPGQ-U4GOH-7ZTWR7.Get("expiretm")

Dim fee As String = OQOPGQ-U4GOH-7ZTWR7.Get("fee")

Dim vol_exec As String = OQOPGQ-U4GOH-7ZTWR7.Get("vol_exec")

Dim starttm As Int = OQOPGQ-U4GOH-7ZTWR7.Get("starttm")

Dim descr As Map = OQOPGQ-U4GOH-7ZTWR7.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OQOPGQ-U4GOH-7ZTWR7.Get("vol")

Dim userref As String = OQOPGQ-U4GOH-7ZTWR7.Get("userref")

Dim price As String = OQOPGQ-U4GOH-7ZTWR7.Get("price")

Dim closetm As Double = OQOPGQ-U4GOH-7ZTWR7.Get("closetm")

Dim refid As String = OQOPGQ-U4GOH-7ZTWR7.Get("refid")

Dim status As String = OQOPGQ-U4GOH-7ZTWR7.Get("status")

Dim stopprice As String = OQOPGQ-U4GOH-7ZTWR7.Get("stopprice")

Dim misc As String = OQOPGQ-U4GOH-7ZTWR7.Get("misc")

Dim OFGLSN-34NXM-B4GIIN As Map = closed.Get("OFGLSN-34NXM-B4GIIN")

Dim opentm As Double = OFGLSN-34NXM-B4GIIN.Get("opentm")

Dim oflags As String = OFGLSN-34NXM-B4GIIN.Get("oflags")

Dim reason As String = OFGLSN-34NXM-B4GIIN.Get("reason")

Dim cost As String = OFGLSN-34NXM-B4GIIN.Get("cost")

Dim limitprice As String = OFGLSN-34NXM-B4GIIN.Get("limitprice")

Dim expiretm As Int = OFGLSN-34NXM-B4GIIN.Get("expiretm")

Dim fee As String = OFGLSN-34NXM-B4GIIN.Get("fee")

Dim vol_exec As String = OFGLSN-34NXM-B4GIIN.Get("vol_exec")

Dim starttm As Int = OFGLSN-34NXM-B4GIIN.Get("starttm")

Dim descr As Map = OFGLSN-34NXM-B4GIIN.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OFGLSN-34NXM-B4GIIN.Get("vol")

Dim userref As String = OFGLSN-34NXM-B4GIIN.Get("userref")

Dim price As String = OFGLSN-34NXM-B4GIIN.Get("price")

Dim closetm As Double = OFGLSN-34NXM-B4GIIN.Get("closetm")

Dim refid As String = OFGLSN-34NXM-B4GIIN.Get("refid")

Dim status As String = OFGLSN-34NXM-B4GIIN.Get("status")

Dim stopprice As String = OFGLSN-34NXM-B4GIIN.Get("stopprice")

Dim misc As String = OFGLSN-34NXM-B4GIIN.Get("misc")

Dim OJPOYN-VEYRC-672TCP As Map = closed.Get("OJPOYN-VEYRC-672TCP")

Dim opentm As Double = OJPOYN-VEYRC-672TCP.Get("opentm")

Dim oflags As String = OJPOYN-VEYRC-672TCP.Get("oflags")

Dim reason As String = OJPOYN-VEYRC-672TCP.Get("reason")

Dim cost As String = OJPOYN-VEYRC-672TCP.Get("cost")

Dim limitprice As String = OJPOYN-VEYRC-672TCP.Get("limitprice")

Dim expiretm As Int = OJPOYN-VEYRC-672TCP.Get("expiretm")

Dim fee As String = OJPOYN-VEYRC-672TCP.Get("fee")

Dim vol_exec As String = OJPOYN-VEYRC-672TCP.Get("vol_exec")

Dim starttm As Int = OJPOYN-VEYRC-672TCP.Get("starttm")

Dim descr As Map = OJPOYN-VEYRC-672TCP.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OJPOYN-VEYRC-672TCP.Get("vol")

Dim userref As String = OJPOYN-VEYRC-672TCP.Get("userref")

Dim price As String = OJPOYN-VEYRC-672TCP.Get("price")

Dim closetm As Double = OJPOYN-VEYRC-672TCP.Get("closetm")

Dim refid As String = OJPOYN-VEYRC-672TCP.Get("refid")

Dim status As String = OJPOYN-VEYRC-672TCP.Get("status")

Dim stopprice As String = OJPOYN-VEYRC-672TCP.Get("stopprice")

Dim misc As String = OJPOYN-VEYRC-672TCP.Get("misc")

Dim ON2JH5-UYNRU-QQ2P2H As Map = closed.Get("ON2JH5-UYNRU-QQ2P2H")

Dim opentm As Double = ON2JH5-UYNRU-QQ2P2H.Get("opentm")

Dim oflags As String = ON2JH5-UYNRU-QQ2P2H.Get("oflags")

Dim reason As String = ON2JH5-UYNRU-QQ2P2H.Get("reason")

Dim cost As String = ON2JH5-UYNRU-QQ2P2H.Get("cost")

Dim limitprice As String = ON2JH5-UYNRU-QQ2P2H.Get("limitprice")

Dim expiretm As Int = ON2JH5-UYNRU-QQ2P2H.Get("expiretm")

Dim fee As String = ON2JH5-UYNRU-QQ2P2H.Get("fee")

Dim vol_exec As String = ON2JH5-UYNRU-QQ2P2H.Get("vol_exec")

Dim starttm As Int = ON2JH5-UYNRU-QQ2P2H.Get("starttm")

Dim descr As Map = ON2JH5-UYNRU-QQ2P2H.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = ON2JH5-UYNRU-QQ2P2H.Get("vol")

Dim userref As String = ON2JH5-UYNRU-QQ2P2H.Get("userref")

Dim price As String = ON2JH5-UYNRU-QQ2P2H.Get("price")

Dim closetm As Double = ON2JH5-UYNRU-QQ2P2H.Get("closetm")

Dim refid As String = ON2JH5-UYNRU-QQ2P2H.Get("refid")

Dim status As String = ON2JH5-UYNRU-QQ2P2H.Get("status")

Dim stopprice As String = ON2JH5-UYNRU-QQ2P2H.Get("stopprice")

Dim misc As String = ON2JH5-UYNRU-QQ2P2H.Get("misc")

Dim OVUIFJ-ZN3NU-AR54CD As Map = closed.Get("OVUIFJ-ZN3NU-AR54CD")

Dim opentm As Double = OVUIFJ-ZN3NU-AR54CD.Get("opentm")

Dim oflags As String = OVUIFJ-ZN3NU-AR54CD.Get("oflags")

Dim reason As String = OVUIFJ-ZN3NU-AR54CD.Get("reason")

Dim cost As String = OVUIFJ-ZN3NU-AR54CD.Get("cost")

Dim limitprice As String = OVUIFJ-ZN3NU-AR54CD.Get("limitprice")

Dim expiretm As Int = OVUIFJ-ZN3NU-AR54CD.Get("expiretm")

Dim fee As String = OVUIFJ-ZN3NU-AR54CD.Get("fee")

Dim vol_exec As String = OVUIFJ-ZN3NU-AR54CD.Get("vol_exec")

Dim starttm As Int = OVUIFJ-ZN3NU-AR54CD.Get("starttm")

Dim descr As Map = OVUIFJ-ZN3NU-AR54CD.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OVUIFJ-ZN3NU-AR54CD.Get("vol")

Dim userref As Int = OVUIFJ-ZN3NU-AR54CD.Get("userref")

Dim price As String = OVUIFJ-ZN3NU-AR54CD.Get("price")

Dim closetm As Double = OVUIFJ-ZN3NU-AR54CD.Get("closetm")

Dim refid As String = OVUIFJ-ZN3NU-AR54CD.Get("refid")

Dim status As String = OVUIFJ-ZN3NU-AR54CD.Get("status")

Dim stopprice As String = OVUIFJ-ZN3NU-AR54CD.Get("stopprice")

Dim misc As String = OVUIFJ-ZN3NU-AR54CD.Get("misc")

Dim ON7UE5-E22TQ-W4XJF7 As Map = closed.Get("ON7UE5-E22TQ-W4XJF7")

Dim opentm As Double = ON7UE5-E22TQ-W4XJF7.Get("opentm")

Dim oflags As String = ON7UE5-E22TQ-W4XJF7.Get("oflags")

Dim reason As String = ON7UE5-E22TQ-W4XJF7.Get("reason")

Dim cost As String = ON7UE5-E22TQ-W4XJF7.Get("cost")

Dim limitprice As String = ON7UE5-E22TQ-W4XJF7.Get("limitprice")

Dim expiretm As Int = ON7UE5-E22TQ-W4XJF7.Get("expiretm")

Dim fee As String = ON7UE5-E22TQ-W4XJF7.Get("fee")

Dim vol_exec As String = ON7UE5-E22TQ-W4XJF7.Get("vol_exec")

Dim starttm As Int = ON7UE5-E22TQ-W4XJF7.Get("starttm")

Dim descr As Map = ON7UE5-E22TQ-W4XJF7.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = ON7UE5-E22TQ-W4XJF7.Get("vol")

Dim userref As String = ON7UE5-E22TQ-W4XJF7.Get("userref")

Dim price As String = ON7UE5-E22TQ-W4XJF7.Get("price")

Dim closetm As Double = ON7UE5-E22TQ-W4XJF7.Get("closetm")

Dim refid As String = ON7UE5-E22TQ-W4XJF7.Get("refid")

Dim status As String = ON7UE5-E22TQ-W4XJF7.Get("status")

Dim stopprice As String = ON7UE5-E22TQ-W4XJF7.Get("stopprice")

Dim misc As String = ON7UE5-E22TQ-W4XJF7.Get("misc")

Dim OGQUNI-DHOWB-664I5L As Map = closed.Get("OGQUNI-DHOWB-664I5L")

Dim opentm As Double = OGQUNI-DHOWB-664I5L.Get("opentm")

Dim oflags As String = OGQUNI-DHOWB-664I5L.Get("oflags")

Dim reason As String = OGQUNI-DHOWB-664I5L.Get("reason")

Dim cost As String = OGQUNI-DHOWB-664I5L.Get("cost")

Dim limitprice As String = OGQUNI-DHOWB-664I5L.Get("limitprice")

Dim expiretm As Int = OGQUNI-DHOWB-664I5L.Get("expiretm")

Dim fee As String = OGQUNI-DHOWB-664I5L.Get("fee")

Dim vol_exec As String = OGQUNI-DHOWB-664I5L.Get("vol_exec")

Dim starttm As Int = OGQUNI-DHOWB-664I5L.Get("starttm")

Dim descr As Map = OGQUNI-DHOWB-664I5L.Get("descr")

Dim leverage As String = descr.Get("leverage")

Dim price As String = descr.Get("price")

Dim type As String = descr.Get("type")

Dim close As String = descr.Get("close")

Dim pair As String = descr.Get("pair")

Dim ordertype As String = descr.Get("ordertype")

Dim price2 As String = descr.Get("price2")

Dim order As String = descr.Get("order")

Dim vol As String = OGQUNI-DHOWB-664I5L.Get("vol")

Dim userref As String = OGQUNI-DHOWB-664I5L.Get("userref")

Dim price As String = OGQUNI-DHOWB-664I5L.Get("price")

Dim closetm As Double = OGQUNI-DHOWB-664I5L.Get("closetm")

Dim refid As String = OGQUNI-DHOWB-664I5L.Get("refid")

Dim status As String = OGQUNI-DHOWB-664I5L.Get("status")

Dim stopprice As String = OGQUNI-DHOWB-664I5L.Get("stopprice")

Dim misc As String = OGQUNI-DHOWB-664I5L.Get("misc")

Dim error As List = root.Get("error")