<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=us-ascii">
<meta name="Generator" content="Microsoft Word 15 (filtered medium)">
<style><!--
/* Font Definitions */
@font-face
{font-family:"Cambria Math";
panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0in;
margin-bottom:.0001pt;
font-size:11.0pt;
font-family:"Calibri",sans-serif;}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:#0563C1;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{mso-style-priority:99;
color:#954F72;
text-decoration:underline;}
span.EmailStyle17
{mso-style-type:personal-compose;
font-family:"Calibri",sans-serif;
color:windowtext;}
.MsoChpDefault
{mso-style-type:export-only;
font-family:"Calibri",sans-serif;}
@page WordSection1
{size:8.5in 11.0in;
margin:1.0in 1.0in 1.0in 1.0in;}
div.WordSection1
{page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->
</head>
<body lang="EN-US" link="#0563C1" vlink="#954F72">
<div class="WordSection1">
<p class="MsoNormal"><span style="font-size:14.0pt">Allen,<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">If you receive errors in processing a traveler, please let me know so I can see if my new changes caused the errors or something the author did.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">Thanks!<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">Megan/David,<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">I have updated the following files:<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">Travelerization.pl<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">TemplateDataFooter.txt<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">TemplateDataFooterPgN.txt<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">The DataFooter files received the code: &SNType=#url.sntype#<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">Added to the <CFLOCATION> tag.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">The Perl Script:<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">I modified the processDataFiles area<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">Lines 826-835:<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">sub processDataFiles<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">{<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> #==================================<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> # add processing for SN on page 1<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> # mysn / myct / mysnset added<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> # VDB 03May2022<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> #==================================<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> $mysn='';<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> $myct='';<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> $mysnset=0;<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">Lines 923-936 where the SNs are processed:<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> elsif($ct =~ m/SN$/)
<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> { print(DATAFILE "<CFIF isdefined(\'form.$arraylabels[$i]\') ><o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> $arraylabels[$i]='#form.$arraylabels[$i]#',</CFIF> \n");
<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> #==================================<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> # add processing for SN on page 1<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> # mysn / myct / mysnset added<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> # VDB 03May2022<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> #==================================<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> if ($pg == 1 && $mysnset == 0) {<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> $mysn = "$arraylabels[$i]";<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> $myct = "$ct";<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> $mysnset = 1;<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> } <o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> }<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">Lines 1136-1147 where it writes before the CFLOCATION tag:<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> <o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> #==================================<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> # add processing for SN on page 1<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> # mysn / myct / mysnset added<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> # VDB 03May2022<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> #==================================<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> if ($pg == 1 && $mysnset == 1) {<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> print(DATAFILE "<CFIF isdefined(\'form.$mysn\') > \n");<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> print(DATAFILE "<CFSET url.serialnum = \"#form.$mysn#\"/> \n");<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> print(DATAFILE "<CFSET url.sntype = \"$myct\"/> \n");<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> print(DATAFILE "</CFIF> \n");<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> }<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"> <o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">I ran 2 test cases with files in newhtmfiles area and it appears to work.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">You can look through my changes and let me know if you see any errors.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">Thanks!<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">Valerie Bookwalter<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">Jefferson Lab, SRF Department<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">Pansophy Team<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:14.0pt">1-757-269-5802 (OFFICE – currently working offsite)<o:p></o:p></span></p>
<p class="MsoNormal"><o:p> </o:p></p>
</div>
</body>
</html>