<html>
<!-- -------------------- w4partn.jsp ---------------- -->
<head>
<%@ taglib uri="http://cav.co.il/taglibs/mumps" prefix="m" %>
<m:session namespace="USER">
<%@ include file="w1jbarg.jsp" %>
<m:exec expr='D ^%W1ARG I $G(%ARG("FIRST")) D KILL^%W1PRM("PARTNCUR")' />
<m:if expr='+$G(%ARG("JB"))=0' >
 <m:setSessionId expr='$$^%W1SsID("W4PARTN")' />
</m:if>
<m:exec expr='D ^W3CSS' />

<head>
<script>
<%@ include file="w1proc.jsp" %>
<%@ include file="w4procl.jsp" %>

var oldtdid=""

function OnClickTr(trid) 
{
 //alert("trid="+trid)
 var tdid=GetId(trid+"n")
 if ( tdid !== null && tdid !== undefined )
 {
  if ( oldtdid !== "" ) GetId(oldtdid).style.border=""
  tdid.style.border="2px solid brown"
  oldtdid=trid+"n"
 }

 var prm="w4dlkp.OnclickTr-c;"+trid
 var c=<m:serverExec expr='S PRM=$$^W4PRMSRV(PRM) D PUT^%W1PRM("PARTNCUR",PRM) W 1' varName='PRM' varValue='prm' />
 
 var par=ParseTxt(trid,"n",1,1)
 var org=ParseTxt(trid,"n",2,2)
 var sugd=ParseTxt(trid,"n",3,3)
 var nomd=ParseTxt(trid,"n",4,4)


 var hrf=HrefWithoutFirst(self)
 //alert("hrf="+hrf)
 prm="w4partn.OnclickTr;"+escape(hrf)

 SaveScrollY(self,"SCRY")

 if ( sugd.substr(0,1) == 'I' )
  {
    ShowSupplInvoice(org,nomd,'ifr',sugd,'1',par)
    return
  }

 if ( sugd == 'TM' ) nomd=nomd+'T'
 if ( sugd == 'HBZ' || sugd == 'TZ' ) nomd=nomd+'Z'

 if ( sugd == 'ORD' )  {ShowOrder(nomd,'ifr','1') ; return } 

 if ( sugd == 'HMK' )
 {
  nomd=nomd+'HMK'
  ShowArmInvoice(nomd,org,'ifr','1') 
  return
 }

 ShowItemsInvoice(nomd,org,'ifr','1','1',par) 
}

function Show(dat)
{
 var winifr=false
 var hrf=self.location.href
 if ( hrf.indexOf("WIN=IFR") >-1 ) winifr=true
 var to="w4partn.jsp?JB="+GetJB()+"&PAR=<m:out expr='$G(%ARG("PAR"))' />"
 to=to+"&MEDAT="+GetVl("MEDAT:D")+"&ADDAT="+dat
 if (winifr ) to=to+"&WIN=IFR"
 //alert("to="+to)
 self.location.replace(to)
}

function Print()
{
 GetId("divbut").style.visibility="hidden"
 self.print()

 setTimeout(function(){Back()},PRINTDELAY)
}

function Back()
{
 <m:if expr='$G(%ARG("WIN"))="IFR"' >
  parent.ifrHide("MUST")
  return
 </m:if>

 if ( BackHref("HRFPT") ) return ;

 self.location.replace("w4partnask.jsp?JB="+GetJB())
}

function OnLoad()
{
 SetScrollY("SCRY")
}

</script>
</head>
<body onLoad="OnLoad()" >

 <div align="center">
  <table class="hdvw" style="font-size:<m:out expr='$$^W3FSZ(16)' />" width="100%" border="1">
  <tr>
   <td dir="<m:out expr="$$^%W1DIR" />">

     <span style="color:white"><m:out expr='$$H2U^%L1FRM($$^W3MSDG($$GET^%W1PRM("MSD")))' /> : </span>
     <m:out expr='$$^%W1DICT("PARTNHZG")' />

   </td>
  </tr>
  </table>
 </div>

 <m:exec expr='D ^W4PARTN($G(%ARG("PAR")),$G(%ARG("MEDAT")),$G(%ARG("ADDAT")))' />

 <iframe name="cwindow" id="ifr" class="ifr"></iframe>

</body>
</m:session>
</html>


















































































































































































