diff --git a/doc/guide/author/topics.xml b/doc/guide/author/topics.xml
index 3787568243..15ba56ae84 100644
--- a/doc/guide/author/topics.xml
+++ b/doc/guide/author/topics.xml
@@ -3538,7 +3538,7 @@ displayed line, and there are no <c>\\</c>s.  Use <c>\amp</c> to mark the alignm
         <subsection xml:id="interactive-program-codelens">
             <title>Interactive Programs, CodeLens</title>
 
-            <p><term>CodeLens</term> is an interactive version of a computer program, which can be visualized by stepping through the code one statement at a time, watching output, variables, and other data structures change.  So it is similar to a debugger, except the reader does not set breakpoints or modify program data on-the-fly.  This is possible automatically for several different languages when your <init>HTML</init> is hosted on a Runestone server (<xref ref="runestone"/>).  This may also be accomplished <q>in browser</q> when hosted on any old generic web server.  The catch is that for a generic server a publisher must generate <term>trace data</term> in advance, typically with the PreTeXt-CLI (<xref ref="processing-CLI"/>).  Place the <tag>interactive</tag> attribute on a <tag>program</tag> element with the value <c>codelens</c> to elect this behavior (<c>no</c> is the default value).  Also, be sure to specify a language from the supported languages: Python, Java, C, and C++.  Consult <xref ref="table-program-interactive"/> below for a summary of various combinations.  When an output format does not support an interactive CodeLens instance, the fallback is a static program listing. The <tag>program</tag> should have an <attr>xml:id</attr> that will be used as a unique identifier for the generated trace file needed by the codelens.</p>
+            <p><term>CodeLens</term> is an interactive version of a computer program, which can be visualized by stepping through the code one statement at a time, watching output, variables, and other data structures change.  So it is similar to a debugger, except the reader does not set breakpoints or modify program data on-the-fly.  This is possible automatically for several different languages when your <init>HTML</init> is hosted on a Runestone server (<xref ref="runestone"/>).  This may also be accomplished <q>in browser</q> when hosted on any old generic web server.  The catch is that for a generic server a publisher must generate <term>trace data</term> in advance, typically with the PreTeXt-CLI (<xref ref="processing-CLI"/>).  Place the <tag>interactive</tag> attribute on a <tag>program</tag> element with the value <c>codelens</c> to elect this behavior (<c>no</c> is the default value).  Also, be sure to specify a language from the supported languages: Python, Java, C, and C++.  Consult <xref ref="table-program-interactive"/> below for a summary of various combinations.  When an output format does not support an interactive CodeLens instance, the fallback is a static program listing, possibly with a link to the interactive version (see <xref ref="interactive-program-activecode"/> for how to configure the links). The <tag>program</tag> should have an <attr>xml:id</attr> that will be used as a unique identifier for the generated trace file needed by the codelens.</p>
 
             <p>Sometimes, there is uninteresting setup to get through before the portion of the program the author wants to illustrate. The author can use <attr>starting-step</attr> to specify the instruction number that the interactive should start at. Code before that will be fast-forwarded through and execution will begin at the indicted step. Note that <attr>starting-step</attr> is a <q>Step</q> number in the execution sequence, not a line number in the source code. You may have to run the Codelens once to find the right step to start at.</p>
 
@@ -3554,7 +3554,9 @@ displayed line, and there are no <c>\\</c>s.  Use <c>\amp</c> to mark the alignm
 
             <p><term>ActiveCode</term> is an interactive environment where a reader may work on code through repeated edit-compile-test cycles.  Code can be provided by an author as a complete program to be modified, a partial program to be completed, or nothing at all.  One good example is that maybe header files, import statement, and similar are provided, and a skeleton of a main entry-point procedure is also provided.  Then a reader can concentrate on the more conceptual parts of the programming.  Some languages will be executable <q>in browser</q> on any old generic web server, while others must be on a Runestone server (<xref ref="runestone"/>) where a <url href="https://github.com/trampgeek/jobe" visual="github.com/trampgeek/jobe">Jobe Server</url> is running to support the execution.</p>
 
-            <p>Place the <attr>interactive</attr> attribute on a <tag>program</tag> element with the value <c>activecode</c> to elect this behavior (<c>no</c> is the default value).  Also, be sure to specify a language from the supported languages.  Consult <xref ref="table-program-interactive"/> below for a summary of various combinations.  When an output format does not support an interactive ActiveCode instance, the fallback is a static program listing.</p>
+            <p>Place the <attr>interactive</attr> attribute on a <tag>program</tag> element with the value <c>activecode</c> to elect this behavior (<c>no</c> is the default value).  Also, be sure to specify a language from the supported languages.  Consult <xref ref="table-program-interactive"/> below for a summary of various combinations.</p>
+
+            <p>When an output format does not support an interactive ActiveCode instance, the fallback is a static program listing. The static listing is possibly supplemented with a link and QR code to access an HTML version. To get these links, you must specify a base <init>URL</init> (see <xref ref="online-baseurl"/>). If you have a base <init>URL</init> and want to disable the QR codes, you can set the <attr>static-qrcodes</attr> attribute to no <c>"no"</c> in the publisher variable <c>common/program</c>.</p>
 
             <warning>
                 <title>Labels and XML IDs</title>
diff --git a/pretext/lib/pretext.py b/pretext/lib/pretext.py
index fdb774327a..6b2df71cfb 100644
--- a/pretext/lib/pretext.py
+++ b/pretext/lib/pretext.py
@@ -2644,7 +2644,7 @@ def qrcode(xml_source, pub_file, stringparams, xmlid_root, dest_dir):
         # Simple version: qr_image = qrcode.make(url), has border
         if has_image:
             # error correction up to 25%
-            error_correction = qrcode.constants.ERROR_CORRECT_Q
+            error_correction = qrcode.constants.ERROR_CORRECT_H
         else:
             # error correction up to 7%
             error_correction = qrcode.constants.ERROR_CORRECT_L
diff --git a/xsl/entities.ent b/xsl/entities.ent
index a22791eb0e..cb4b8e6ef9 100644
--- a/xsl/entities.ent
+++ b/xsl/entities.ent
@@ -145,3 +145,6 @@
 <!-- are added, then this need not change                              -->
 <!-- Typical use: self::exercise and boolean(&INLINE-EXERCISE-FILTER;) -->
 <!ENTITY INLINE-EXERCISE-FILTER "parent::article|parent::paragraphs|parent::chapter|parent::section|parent::subsection|parent::subsubsection|parent::handout">
+
+<!-- interactive elements that need a QR code generated -->
+<!ENTITY QRCODE-INTERACTIVES "audio[@source|@href]|video[@source|@href|@youtube|@youtubeplaylist|@vimeo]|interactive|program[@interactive != '' and @interactive != 'no']">
diff --git a/xsl/extract-qrcode.xsl b/xsl/extract-qrcode.xsl
index b5aef2a47c..1a41d4aca0 100644
--- a/xsl/extract-qrcode.xsl
+++ b/xsl/extract-qrcode.xsl
@@ -19,6 +19,11 @@ You should have received a copy of the GNU General Public License
 along with MathBook XML.  If not, see <http://www.gnu.org/licenses/>.
 *********************************************************************-->
 
+<!DOCTYPE xsl:stylesheet [
+    <!ENTITY % entities SYSTEM "entities.ent">
+    %entities;
+]>
+
 <!-- This stylesheet locates video/@youtube elements and -->
 <!-- prepares a Python dictionary necessary to extract a -->
 <!-- thumbnail for each video from the YouTube servers   -->
@@ -36,6 +41,9 @@ along with MathBook XML.  If not, see <http://www.gnu.org/licenses/>.
 <xsl:import href="./pretext-assembly.xsl"/>
 <xsl:import href="./pretext-common.xsl"/>
 
+<!-- Need pretext-html to set up chunking for containing-filename -->
+<xsl:import href="./pretext-html.xsl"/>
+
 <!-- Get a "subtree" xml:id value   -->
 <!-- Then walk the XML source tree  -->
 <!-- applying specializations below -->
@@ -46,18 +54,70 @@ along with MathBook XML.  If not, see <http://www.gnu.org/licenses/>.
 <!-- Avoid Catch-22: default assembly/pre-processor providews output     -->
 <!-- for a conversion to a static format, but that format will *replace* -->
 <!-- "audio", "video", "interactive"  by a static version (a             -->
-<!-- "sidebyside") and it will not beavailable for extraction.           -->
+<!-- "sidebyside") and it will not be available for extraction.           -->
 <xsl:variable name="exercise-style" select="'dynamic'"/>
 
-<!-- Are filters here irrelevant?  Just for the implementation of "static-url"? -->
-<xsl:template match="audio[@source|@href]|video[@source|@href|@youtube|@youtubeplaylist|@vimeo]|interactive" mode="extraction">
+<!-- Make sure url's are generated with .html extension -->
+<xsl:variable name="file-extension" select="'.html'"/>
+
+<!-- Override extraction-wrapper so we can provide single error and not attempt -->
+<!-- to write files if no base URL is defined.                                  -->
+<xsl:template match="*" mode="extraction-wrapper">
+    <xsl:choose>
+        <xsl:when test="$b-has-baseurl">
+            <xsl:message>PTX:INFO:   Writing qrcode-urls.txt</xsl:message>
+            <xsl:apply-templates select="." mode="extraction"/>
+        </xsl:when>
+        <xsl:otherwise>
+            <xsl:message>PTX:ERROR:   Base URL must be specified to generate QR codes</xsl:message>
+        </xsl:otherwise>
+    </xsl:choose>
+</xsl:template>
+
+<!-- Standard traversal generates temp text file for python qrcode generation   -->
+<xsl:template match="&QRCODE-INTERACTIVES;" mode="extraction">
+    <!-- Each line of the text file is a URL, space, assembly-id -->
     <xsl:apply-templates select="." mode="static-url"/>
     <!-- Do not use a comma, since a YouTube playlist has      -->
     <!-- commas as separators, and they show up in the URL.    -->
     <!-- So a space instead.  See comments in Python consumer. -->
     <xsl:text> </xsl:text>
-    <xsl:apply-templates select="." mode="visible-id" />
+    <xsl:variable name="assembly-id">
+        <xsl:apply-templates select="." mode="assembly-id"/>
+    </xsl:variable>
+    <xsl:value-of select="$assembly-id"/>
     <xsl:text>&#xa;</xsl:text>
+
+    <!-- Also generate a sidecar XML file with name based on assembly-id    -->
+    <!-- File will contain the URL for this interactive.                    -->
+    <!-- For URLs within the book, static outputs will not be able to use   -->
+    <!-- mode="static-url" directly, as it depends on the chunking set by   -->
+    <!-- the HTML conversion.  So generate now and save to file.            -->
+    <exsl:document href="{$generated-directory-source}qrcode/{$assembly-id}-url.xml" method="xml" indent="yes" encoding="UTF-8">
+        <interactive-url>
+            <xsl:attribute name="url">
+                <xsl:apply-templates select="." mode="static-url"/>
+            </xsl:attribute>
+        </interactive-url>
+    </exsl:document>
+</xsl:template>
+
+<!-- Second traversal to generate XML file with URLS that is part of final product -->
+<xsl:template match="@*|node()" mode="url-extraction">
+    <xsl:apply-templates select="@*|node()" mode="url-extraction"/>
+</xsl:template>
+
+<xsl:template match="&QRCODE-INTERACTIVES;" mode="url-extraction">
+    <interactive-url>
+      <xsl:attribute name="url">
+        <xsl:apply-templates select="." mode="static-url"/>
+      </xsl:attribute>
+      <!-- need to use assembly-id as the value will be read during representations -->
+      <!-- pass of assembly before visible-id is available                          -->
+      <xsl:attribute name="id">
+        <xsl:apply-templates select="." mode="assembly-id" />
+      </xsl:attribute>
+    </interactive-url>
 </xsl:template>
 
 </xsl:stylesheet>
diff --git a/xsl/localizations/af-ZA.xml b/xsl/localizations/af-ZA.xml
index d89ab40f22..bfed1edefb 100644
--- a/xsl/localizations/af-ZA.xml
+++ b/xsl/localizations/af-ZA.xml
@@ -200,6 +200,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- <localization string-id='query'>Query</localization> -->
     <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/bg-BG.xml b/xsl/localizations/bg-BG.xml
index cdbe7f2612..4953e61bd0 100644
--- a/xsl/localizations/bg-BG.xml
+++ b/xsl/localizations/bg-BG.xml
@@ -218,6 +218,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- <localization string-id='query'>Query</localization> -->
     <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/ca-ES.xml b/xsl/localizations/ca-ES.xml
index 6fe97d19bb..82807ae2e0 100644
--- a/xsl/localizations/ca-ES.xml
+++ b/xsl/localizations/ca-ES.xml
@@ -204,6 +204,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- <localization string-id='query'>Query</localization> -->
     <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/cs-CZ.xml b/xsl/localizations/cs-CZ.xml
index abd4342d85..b343d39f63 100644
--- a/xsl/localizations/cs-CZ.xml
+++ b/xsl/localizations/cs-CZ.xml
@@ -199,6 +199,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- <localization string-id='uncategorized'>Uncategorized</localization> -->
     <!-- <localization string-id='query'>Query</localization> -->    <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/de-DE.xml b/xsl/localizations/de-DE.xml
index b98c54696a..546205a998 100644
--- a/xsl/localizations/de-DE.xml
+++ b/xsl/localizations/de-DE.xml
@@ -204,6 +204,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- <localization string-id='query'>Query</localization> -->
     <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/en-US.xml b/xsl/localizations/en-US.xml
index bcc8a4f3ec..3539c75e0c 100644
--- a/xsl/localizations/en-US.xml
+++ b/xsl/localizations/en-US.xml
@@ -236,6 +236,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- and so really *should not* be translated.            -->
     <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <localization string-id='program-interactive-available'>Interactive program</localization>
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/es-ES.xml b/xsl/localizations/es-ES.xml
index 6c337bce24..2edb48d5f2 100644
--- a/xsl/localizations/es-ES.xml
+++ b/xsl/localizations/es-ES.xml
@@ -205,6 +205,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- <localization string-id='query'>Query</localization> -->
     <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/fi-FI.xml b/xsl/localizations/fi-FI.xml
index 72378912fc..2814aeed37 100644
--- a/xsl/localizations/fi-FI.xml
+++ b/xsl/localizations/fi-FI.xml
@@ -210,6 +210,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- <localization string-id='query'>Query</localization> -->
     <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/fr-CA.xml b/xsl/localizations/fr-CA.xml
index 8ef7883859..58d296e31f 100644
--- a/xsl/localizations/fr-CA.xml
+++ b/xsl/localizations/fr-CA.xml
@@ -197,6 +197,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- <localization string-id='query'>Query</localization> -->
     <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/fr-FR.xml b/xsl/localizations/fr-FR.xml
index 790d07931d..599807a3ca 100644
--- a/xsl/localizations/fr-FR.xml
+++ b/xsl/localizations/fr-FR.xml
@@ -199,6 +199,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- <localization string-id='query'>Query</localization> -->
     <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/hu-HU.xml b/xsl/localizations/hu-HU.xml
index 12cecd72b7..23e7c2b658 100644
--- a/xsl/localizations/hu-HU.xml
+++ b/xsl/localizations/hu-HU.xml
@@ -200,6 +200,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- <localization string-id='query'>Query</localization> -->
     <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/it-IT.xml b/xsl/localizations/it-IT.xml
index 3f5db03d90..b9cbd79ccb 100644
--- a/xsl/localizations/it-IT.xml
+++ b/xsl/localizations/it-IT.xml
@@ -194,6 +194,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <localization string-id='program'>Programma</localization>
     <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/ku-CKB.xml b/xsl/localizations/ku-CKB.xml
index 6c4cb120ae..3589846ee6 100644
--- a/xsl/localizations/ku-CKB.xml
+++ b/xsl/localizations/ku-CKB.xml
@@ -221,6 +221,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- and so really *should not* be translated.            -->
     <localization string-id='program-activecode'>کۆد-چالاکردن</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/nl-NL.xml b/xsl/localizations/nl-NL.xml
index cacd5aebbb..f19ea1ba19 100644
--- a/xsl/localizations/nl-NL.xml
+++ b/xsl/localizations/nl-NL.xml
@@ -233,8 +233,8 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- and so really *should not* be translated.            -->
     <!--
     <localization string-id='program-activecode'>ActiveCode</localization>
-    <localization string-id='program-codelens'>CodeLens</localization>
-    -->
+    <localization string-id='program-codelens'>CodeLens</localization> -->
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/pt-BR.xml b/xsl/localizations/pt-BR.xml
index 41583978d0..9f4492dc94 100644
--- a/xsl/localizations/pt-BR.xml
+++ b/xsl/localizations/pt-BR.xml
@@ -202,6 +202,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <localization string-id='program'>Programa</localization>
     <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/pt-PT.xml b/xsl/localizations/pt-PT.xml
index 8252e2a1d0..ff927601c2 100644
--- a/xsl/localizations/pt-PT.xml
+++ b/xsl/localizations/pt-PT.xml
@@ -209,6 +209,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- <localization string-id='query'>Query</localization> -->
     <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/localizations/zh-HANS.xml b/xsl/localizations/zh-HANS.xml
index f8df076c9f..6e11479548 100644
--- a/xsl/localizations/zh-HANS.xml
+++ b/xsl/localizations/zh-HANS.xml
@@ -229,6 +229,7 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <!-- and so really *should not* be translated.            -->
     <localization string-id='program-activecode'>ActiveCode</localization>
     <localization string-id='program-codelens'>CodeLens</localization>
+    <!-- <localization string-id='program-interactive-available'>Interactive program</localization> -->
     <!-- Back matter components -->
     <!-- index-part is deprecated, but not abandoned          -->
     <!-- NB: repurpose translations, maybe move appendix here -->
diff --git a/xsl/pretext-assembly.xsl b/xsl/pretext-assembly.xsl
index 8f4341ce19..aad32624fc 100644
--- a/xsl/pretext-assembly.xsl
+++ b/xsl/pretext-assembly.xsl
@@ -1911,6 +1911,10 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <xsl:value-of select="@assembly-id"/>
 </xsl:template>
 
+<xsl:template match="program[@interactive]" mode="assembly-id">
+    <xsl:value-of select="@assembly-id"/>
+</xsl:template>
+
 <xsl:template match="datafile" mode="assembly-id">
     <xsl:value-of select="@assembly-id"/>
 </xsl:template>
@@ -3225,11 +3229,11 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
 <!-- Form a PreTeXt side-by-side with an image, a QR code and links -->
 
 <xsl:template match="audio|video|interactive[not(static)]" mode="representations">
-    <xsl:variable name="the-url">
-        <xsl:apply-templates select="." mode="static-url"/>
-    </xsl:variable>
     <xsl:choose>
         <xsl:when test="$exercise-style = 'static'">
+            <xsl:variable name="the-url">
+                <xsl:apply-templates select="." mode="get-interactive-url-from-file"/>
+            </xsl:variable>
             <!-- panel widths are experimental -->
             <sidebyside margins="7.5% 7.5%" widths="47% 21%" valign="top" halign="center">
                 <xsl:choose>
@@ -3535,6 +3539,12 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <xsl:apply-templates select="@source" />
 </xsl:template>
 
+<!-- interactive programs need to point to page in book -->
+<xsl:template match="program[@interactive = 'codelens' or @interactive = 'activecode']" mode="static-url">
+    <xsl:value-of select="$baseurl"/>
+    <xsl:apply-templates select="." mode="containing-filename" />
+</xsl:template>
+
 <!-- The contents of a datafile may be encoded as text in an XML   -->
 <!-- file within the generated/datafile directory.  The filename   -->
 <!-- has this construction, even if we do not always consult it.   -->
@@ -3581,4 +3591,55 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     </xsl:choose>
 </xsl:template>
 
+<!-- Get interactive URL from sidecar file produced with QRcode image -->
+<xsl:template match="&QRCODE-INTERACTIVES;" mode="get-interactive-url-from-file">
+    <xsl:variable name="interactive-url-file" select="concat($generated-directory-source,'qrcode/', @assembly-id, '-url.xml')"/>
+    <xsl:value-of select="document($interactive-url-file, $original)/interactive-url/@url"/>
+</xsl:template>
+
+<xsl:template match="program[@interactive = 'codelens' or @interactive = 'activecode']" mode="representations">
+    <xsl:choose>
+        <xsl:when test="$exercise-style = 'static'">
+            <!-- first the static program -->
+            <xsl:copy>
+                <xsl:apply-templates select="node()|@*" mode="representations"/>
+            </xsl:copy>
+            <!-- then a qr assemblage if desired -->
+            <xsl:if test="$b-program-static-qrcodes">
+                <xsl:variable name="static-url">
+                    <xsl:apply-templates select="." mode="get-interactive-url-from-file"/>
+                </xsl:variable>
+                <assemblage>
+                    <title>
+                        <xsl:element name="pi:localize">
+                            <xsl:attribute name="string-id">program-interactive-available</xsl:attribute>
+                        </xsl:element>
+                    </title>
+                    <sidebyside margins="0%" widths="70% 25%" valign="top" halign="center">
+                        <p>
+                            <!-- Kill the automatic footnote    -->
+                            <url href="{$static-url}" visual="">
+                                <xsl:value-of select="$static-url"/>
+                            </url>
+                        </p>
+                        <image>
+                            <xsl:attribute name="pi:generated">
+                                <xsl:text>qrcode/</xsl:text>
+                                <xsl:apply-templates select="." mode="assembly-id"/>
+                                <xsl:text>.png</xsl:text>
+                            </xsl:attribute>
+                        </image>
+                    </sidebyside>
+                </assemblage>
+            </xsl:if>
+        </xsl:when>
+        <xsl:when test="($exercise-style = 'dynamic')">
+            <!-- duplicate authored content for the non-static conversions -->
+            <xsl:copy>
+                <xsl:apply-templates select="node()|@*" mode="representations"/>
+            </xsl:copy>
+        </xsl:when>
+    </xsl:choose>
+</xsl:template>
+
 </xsl:stylesheet>
diff --git a/xsl/pretext-runestone-static.xsl b/xsl/pretext-runestone-static.xsl
index f254b3eb7c..a92fc679f0 100644
--- a/xsl/pretext-runestone-static.xsl
+++ b/xsl/pretext-runestone-static.xsl
@@ -1339,7 +1339,8 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
         <!-- duplicate the authored prompt/statement -->
         <xsl:copy-of select="statement/node()"/>
         <!-- bring up the program as part of the problem statement -->
-        <xsl:copy-of select="program"/>
+        <!-- copy via representations to get possible qrcode       -->
+        <xsl:apply-templates select="program" mode="representations"/>
     </statement>
     <xsl:copy-of select="hint"/>
     <xsl:copy-of select="answer"/>
diff --git a/xsl/publisher-variables.xsl b/xsl/publisher-variables.xsl
index f53f402e8c..bdfe11851f 100644
--- a/xsl/publisher-variables.xsl
+++ b/xsl/publisher-variables.xsl
@@ -152,6 +152,12 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
     <xsl:apply-templates select="$publisher-attribute-options/common/qrcode/pi:pub-attribute[@name='image']" mode="set-pubfile-variable"/>
 </xsl:variable>
 
+<!-- Should QR codes be built for program[@interactive]s in static -->
+<xsl:variable name="program-static-qrcodes">
+    <xsl:apply-templates select="$publisher-attribute-options/common/program/pi:pub-attribute[@name='static-qrcodes']" mode="set-pubfile-variable"/>
+</xsl:variable>
+<xsl:variable name="b-program-static-qrcodes" select="$program-static-qrcodes = 'yes'"/>
+
 <!-- Em dash Width -->
 
 <xsl:variable name="emdash-space">
@@ -3209,6 +3215,9 @@ along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
         <qrcode>
             <pi:pub-attribute name="image" default="" freeform="yes"/>
         </qrcode>
+        <program>
+            <pi:pub-attribute name="static-qrcodes" default="yes" options="no"/>
+        </program>
         <mermaid>
             <pi:pub-attribute name="theme" default="default" options="dark forest light"/>
         </mermaid>