<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic JSL OLE: Display Legend in Bivariant in SAS Procedures</title>
    <link>https://communities.sas.com/t5/SAS-Procedures/JSL-OLE-Display-Legend-in-Bivariant/m-p/30751#M7309</link>
    <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;I can't figure out how to display a legend in my bivariant chart through OLE.&amp;nbsp; There is very little documentation in JSL OLE (I'm I the only one doing this?).&amp;nbsp; Can someone point me in the right direction?&amp;nbsp; In it's current state, it will display the graph and color code by column.&amp;nbsp; All I need to do is display the legend. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Here is my code (VBscript):&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;'Initialize JMP&lt;BR /&gt;Dim MyJMP, JMPDoc, DT, DT2, WidthTable, FrameBox&lt;BR /&gt;Set MyJMP = CreateObject("JMP.Application")&lt;BR /&gt;MyJMP.Visible = true&lt;BR /&gt;Set JMPDoc = MyJMP.OpenDocument("MyFile.csv")&lt;/P&gt;&lt;P&gt;'Convert document to datatable&lt;BR /&gt;Set DT = JMPDoc.GetDataTable&lt;/P&gt;&lt;P&gt;'Select the width data (High and Low)&lt;BR /&gt;DT.SelectRowsWhere "CHART_SUBSET",rowSelectEquals, rowSelectExtendCurrent,"TARGET=HIGH"&lt;BR /&gt;DT.SelectRowsWhere "CHART_SUBSET",rowSelectEquals, rowSelectExtendCurrent,"TARGET=LOW"&lt;/P&gt;&lt;P&gt;Set WidthTable = DT.subset&lt;BR /&gt;WidthTable.ColorByColumn("SPC_ENTITY")&lt;BR /&gt;WidthTable.MarkerByColumn("SPC_ENTITY")&lt;/P&gt;&lt;P&gt;'*************************&lt;/P&gt;&lt;P&gt;'Create Bivariant Chart&lt;/P&gt;&lt;P&gt;'*************************&lt;BR /&gt;Dim Biv&lt;BR /&gt;Set Biv = WidthTable.Document.CreateBivariate&lt;BR /&gt;Biv.LaunchAddY("SPC_CHART_VALUE")&lt;BR /&gt;Biv.LaunchAddX("SPC_TXN_DATE")&lt;BR /&gt;Biv.LaunchAddBy("SPC_CHART_SUBSET")&lt;/P&gt;&lt;P&gt;Biv.FitLine&lt;BR /&gt;Biv.Launch&lt;/P&gt;&lt;P&gt;FrameBox = Biv.GetGraphicItemByType("frame box", 1)&lt;/P&gt;&lt;P&gt;&lt;BR /&gt;Biv.FrameBoxAddGraphicsScript 1, "Row Legend(:SPC_ENTITY)"&lt;BR /&gt;Biv.FrameBoxSetMarkerSize 1, 4&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
    <pubDate>Tue, 18 Oct 2011 21:55:32 GMT</pubDate>
    <dc:creator>maltman</dc:creator>
    <dc:date>2011-10-18T21:55:32Z</dc:date>
    <item>
      <title>JSL OLE: Display Legend in Bivariant</title>
      <link>https://communities.sas.com/t5/SAS-Procedures/JSL-OLE-Display-Legend-in-Bivariant/m-p/30751#M7309</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;I can't figure out how to display a legend in my bivariant chart through OLE.&amp;nbsp; There is very little documentation in JSL OLE (I'm I the only one doing this?).&amp;nbsp; Can someone point me in the right direction?&amp;nbsp; In it's current state, it will display the graph and color code by column.&amp;nbsp; All I need to do is display the legend. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Here is my code (VBscript):&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;'Initialize JMP&lt;BR /&gt;Dim MyJMP, JMPDoc, DT, DT2, WidthTable, FrameBox&lt;BR /&gt;Set MyJMP = CreateObject("JMP.Application")&lt;BR /&gt;MyJMP.Visible = true&lt;BR /&gt;Set JMPDoc = MyJMP.OpenDocument("MyFile.csv")&lt;/P&gt;&lt;P&gt;'Convert document to datatable&lt;BR /&gt;Set DT = JMPDoc.GetDataTable&lt;/P&gt;&lt;P&gt;'Select the width data (High and Low)&lt;BR /&gt;DT.SelectRowsWhere "CHART_SUBSET",rowSelectEquals, rowSelectExtendCurrent,"TARGET=HIGH"&lt;BR /&gt;DT.SelectRowsWhere "CHART_SUBSET",rowSelectEquals, rowSelectExtendCurrent,"TARGET=LOW"&lt;/P&gt;&lt;P&gt;Set WidthTable = DT.subset&lt;BR /&gt;WidthTable.ColorByColumn("SPC_ENTITY")&lt;BR /&gt;WidthTable.MarkerByColumn("SPC_ENTITY")&lt;/P&gt;&lt;P&gt;'*************************&lt;/P&gt;&lt;P&gt;'Create Bivariant Chart&lt;/P&gt;&lt;P&gt;'*************************&lt;BR /&gt;Dim Biv&lt;BR /&gt;Set Biv = WidthTable.Document.CreateBivariate&lt;BR /&gt;Biv.LaunchAddY("SPC_CHART_VALUE")&lt;BR /&gt;Biv.LaunchAddX("SPC_TXN_DATE")&lt;BR /&gt;Biv.LaunchAddBy("SPC_CHART_SUBSET")&lt;/P&gt;&lt;P&gt;Biv.FitLine&lt;BR /&gt;Biv.Launch&lt;/P&gt;&lt;P&gt;FrameBox = Biv.GetGraphicItemByType("frame box", 1)&lt;/P&gt;&lt;P&gt;&lt;BR /&gt;Biv.FrameBoxAddGraphicsScript 1, "Row Legend(:SPC_ENTITY)"&lt;BR /&gt;Biv.FrameBoxSetMarkerSize 1, 4&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Tue, 18 Oct 2011 21:55:32 GMT</pubDate>
      <guid>https://communities.sas.com/t5/SAS-Procedures/JSL-OLE-Display-Legend-in-Bivariant/m-p/30751#M7309</guid>
      <dc:creator>maltman</dc:creator>
      <dc:date>2011-10-18T21:55:32Z</dc:date>
    </item>
    <item>
      <title>Re: JSL OLE: Display Legend in Bivariant</title>
      <link>https://communities.sas.com/t5/SAS-Procedures/JSL-OLE-Display-Legend-in-Bivariant/m-p/30752#M7310</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;To attract the proper audience try posting you question in the forum for JMP software.&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Wed, 19 Oct 2011 15:16:57 GMT</pubDate>
      <guid>https://communities.sas.com/t5/SAS-Procedures/JSL-OLE-Display-Legend-in-Bivariant/m-p/30752#M7310</guid>
      <dc:creator>FriedEgg</dc:creator>
      <dc:date>2011-10-19T15:16:57Z</dc:date>
    </item>
  </channel>
</rss>

