<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=utf-8">
<meta name="Generator" content="Microsoft Word 14 (filtered medium)">
<!--[if !mso]><style>v\:* {behavior:url(#default#VML);}
o\:* {behavior:url(#default#VML);}
w\:* {behavior:url(#default#VML);}
.shape {behavior:url(#default#VML);}
</style><![endif]--><style><!--
/* Font Definitions */
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
{font-family:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;}
@font-face
{font-family:Garamond;
panose-1:2 2 4 4 3 3 1 1 8 3;}
/* 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:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{mso-style-priority:99;
color:purple;
text-decoration:underline;}
p.MsoAcetate, li.MsoAcetate, div.MsoAcetate
{mso-style-priority:99;
mso-style-link:"Balloon Text Char";
margin:0in;
margin-bottom:.0001pt;
font-size:8.0pt;
font-family:"Tahoma","sans-serif";}
span.EmailStyle17
{mso-style-type:personal-compose;
font-family:"Garamond","serif";
color:windowtext;
font-weight:normal;
font-style:normal;
text-decoration:none none;}
span.BalloonTextChar
{mso-style-name:"Balloon Text Char";
mso-style-priority:99;
mso-style-link:"Balloon Text";
font-family:"Tahoma","sans-serif";}
.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="blue" vlink="purple">
<div class="WordSection1">
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">Hi,<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">Powerhouse 710.E6<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">Oracle RDB 7.0-1<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">Recently moved from GS160 & VMS 7.3-1 to ES47 & VMS 7.3-2<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">I have a QTP program that I can’t figure out why it does what it does!?!?!?<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">This program seems to execute fine but it terminates my session as opposed to returning me to the DCL prompt.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">What’s even stranger is that it only does this if the source RMS file that it reads has no data/records in it. If there is data/records it does not terminate my session and I’m
returned to the DCL prompt.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">The QTP program stillborn_interface.qts<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">==========================================================<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">RUN Stillborn_Interface &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> USERS INCLUDE ABS_MANAGER<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">GLOBAL TEMPORARY USERNAME CHAR*12 INITIAL LOGONID<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">GLOBAL TEMPORARY TODAY DATE INITIAL SYSDATE<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">REQUEST LOAD_ABSTRACT_DETAILS &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> INPUT NOLIMIT &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> PROCESS NOLIMIT<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">DISPLAY "Load Abstract Detail Request"<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">ACCESS Stillborn_Interface ALIAS Still &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> LINK Claim_NO &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> TO ATD_Claim_NO OF Abstract_Details IN Abstracting ALIAS Dtls &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> OPTIONAL &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> AND Claim_NO &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> TO ATD_Claim_NO OF Encounter_Details IN Abstracting ALIAS Enc &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> OPTIONAL<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">DISPLAY "Abstract Details Output Phase"<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">OUTPUT Abstract_Details IN Abstracting ADD &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> IF NOT RECORD Dtls EXIST &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> ON ERROR REPORT<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> ITEM ABS_Patient_NO OF Abstract_Details = Patient_NUM OF Still<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> ….and other item statements<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">DISPLAY "Abstract Details Failure Output Phase"<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">SUBFILE ABS_DAT:Still_Intrfc_Dtls_Fail ALIAS Fail1 KEEP &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> IF RECORD Dtls EXIST &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> INCLUDE &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> Patient_NUM OF Still, &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> Encounter_NUM OF Still, &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> Claim_NO OF Still<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">DISPLAY "Abstract Details Success Output Phase"<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">SUBFILE ABS_DAT:Still_Intrfc_Dtls_Success ALIAS Success1 KEEP &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> IF NOT RECORD Dtls EXIST &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> INCLUDE &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> Patient_NUM OF Still, &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> Encounter_NUM OF Still, &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> Claim_NO OF Still, &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> Attending_Physician_No OF Still<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">DISPLAY "Encounter Details Output Phase"<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">OUTPUT Encounter_Details IN Abstracting ADD &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> IF NOT RECORD Enc EXIST &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> ON ERROR REPORT<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> ITEM ATD_Stillbirth_Order_Cd OF Encounter_Details = &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> Stillbirth_Order_Cd OF Still<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> …. And other itme statements<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">OUTPUT Still DELETE &<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> IF RECORD Still EXISTS<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">==========================================================<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">At the dcl prompt $qtp auto=abs_qts:stillborn_interface.qtc<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">This is what displays on the screen and then my session is terminated.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">Executing request LOAD_ABSTRACT_DETAILS ...<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> Load Abstract Detail Request<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> Abstract Details Output Phase<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> Abstract Details Failure Output Phase<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> Abstract Details Success Output Phase<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> Encounter Details Output Phase<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">------------------------------------------------------------------------------<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">The permanent subfile will be overwritten.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> File: ABS_DAT:STILL_INTRFC_DTLS_FAIL<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">------------------------------------------------------------------------------<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">The permanent subfile will be overwritten.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""> File: ABS_DAT:STILL_INTRFC_DTLS_SUCCESS<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">------------------------------------------------------------------------------<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">Records read:<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">STILL 0<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">DTLS 0<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">ENC 0<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">Transactions processed: 0<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">Records processed: Added Updated Unchanged Deleted<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">STILL 0 0 0 0<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">ABSTRACT_DETAILS 0 0 0 0<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">FAIL1 0 0 0 0<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">SUCCESS1 0 0 0 0<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">ENCOUNTER_DETAILS 0 0 0 0<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">Finished.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif"">==========================================================<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Garamond","serif""><o:p> </o:p></span></p>
<p class="MsoNormal">Thanx<o:p></o:p></p>
<table class="MsoNormalTable" border="0" cellspacing="0" cellpadding="0" style="border-collapse:collapse">
<tbody>
<tr>
<td width="248" valign="top" style="width:185.75pt;padding:0in 5.75pt 0in 5.75pt">
<p class="MsoNormal">Lorry Litman, <span lang="EN-CA" style="font-family:"Tahoma","sans-serif"">
<o:p></o:p></span></p>
<p class="MsoNormal">Application Management<o:p></o:p></p>
<p class="MsoNormal"><a href="mailto:llitman@manitoba-ehealth.ca"><span style="color:blue">llitman@manitoba-ehealth.ca</span></a><o:p></o:p></p>
<p class="MsoNormal">(204) 926-9076<o:p></o:p></p>
<p class="MsoNormal"><span lang="EN-CA" style="font-family:"Tahoma","sans-serif""><o:p> </o:p></span></p>
</td>
<td width="288" valign="top" style="width:3.0in;padding:0in 5.75pt 0in 5.75pt">
<p class="MsoNormal">300-355 Portage Avenue<span lang="EN-CA" style="font-family:"Tahoma","sans-serif""><o:p></o:p></span></p>
<p class="MsoNormal">Winnipeg, Manitoba<o:p></o:p></p>
<p class="MsoNormal">R3B 0J6<o:p></o:p></p>
<p class="MsoNormal"><a href="http://www.manitoba-ehealth.ca/"><span style="color:blue">www.manitoba-ehealth.ca</span></a><span lang="EN-CA" style="font-family:"Tahoma","sans-serif""><o:p></o:p></span></p>
</td>
</tr>
<tr>
<td width="248" valign="top" style="width:185.75pt;padding:0in 5.75pt 0in 5.75pt">
<p class="MsoNormal"><img border="0" width="133" height="57" id="Picture_x0020_1" src="cid:image002.jpg@01CEF4B8.D37BD170" alt="Description: eHealth_emailsig"><span lang="EN-CA" style="font-family:"Tahoma","sans-serif""><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-CA" style="font-family:"Tahoma","sans-serif""><o:p> </o:p></span></p>
</td>
<td width="288" valign="top" style="width:3.0in;padding:0in 5.75pt 0in 5.75pt">
<p class="MsoNormal"><span lang="EN-CA" style="font-family:"Tahoma","sans-serif""><o:p> </o:p></span></p>
</td>
</tr>
</tbody>
</table>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
</div>
<p>This email and/or any documents in this transmission is intended for the<br>
addressee(s) only and may contain legally privileged or confidential information. Any unauthorized use, disclosure, distribution, copying or dissemination is strictly prohibited. If you receive this transmission in error, please notify the sender immediately and return the original.</p>
<p>Ce courriel et tout document dans cette transmission est destiné à la personne ou aux personnes à qui il est adressé. Il peut contenir des informations privilégiées ou confidentielles. Toute utilisation, divulgation, distribution, copie, ou diffusion non autorisée est strictement défendue. Si vous n'êtes pas le destinataire de ce message, veuillez en informer l'expéditeur immédiatement et lui remettre l'original.</p></body>
</html>