interface/billing/edit_payment.php

   1 <?php
   2 // +-----------------------------------------------------------------------------+
   3 // Copyright (C) 2010 Z&H Consultancy Services Private Limited <sam@zhservices.com>
   4 //
   5 //
   6 // This program is free software; you can redistribute it and/or
   7 // modify it under the terms of the GNU General Public License
   8 // as published by the Free Software Foundation; either version 2
   9 // of the License, or (at your option) any later version.
  10 //
  11 //
  12 // This program is distributed in the hope that it will be useful,
  13 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 // GNU General Public License for more details.
  16 //
  17 //
  18 // A copy of the GNU General Public License is included along with this program:
  19 // openemr/interface/login/GnuGPL.html
  20 // For more information write to the Free Software
  21 // Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  22 //
  23 // Author:   Eldho Chacko <eldho@zhservices.com>
  24 //           Paul Simon K <paul@zhservices.com>
  25 //
  26 // +------------------------------------------------------------------------------+
  27 //===============================================================================
  28 //Payments can be edited here.It includes deletion of an allocation,modifying the
  29 //same or adding a new allocation.Log is kept for the deleted ones.
  30 //===============================================================================
  31 require_once("../globals.php");
  32 require_once("$srcdir/log.inc");
  33 require_once("$srcdir/invoice_summary.inc.php");
  34 require_once("$srcdir/sl_eob.inc.php");
  35 require_once("$srcdir/parse_era.inc.php");
  36 require_once("../../library/acl.inc");
  37 require_once("$srcdir/sql.inc");
  38 require_once("$srcdir/auth.inc");
  39 require_once("$srcdir/formdata.inc.php");
  40 require_once("../../custom/code_types.inc.php");
  41 require_once("$srcdir/patient.inc");
  42 require_once("$srcdir/billrep.inc");
  43 require_once(dirname(__FILE__) . "/../../library/classes/OFX.class.php");
  44 require_once(dirname(__FILE__) . "/../../library/classes/X12Partner.class.php");
  45 require_once("$srcdir/options.inc.php");
  46 require_once("$srcdir/formatting.inc.php");
  47 require_once("$srcdir/payment.inc.php");
  48 //===============================================================================
  49         $screen='edit_payment';
  50 //===============================================================================
  51 // deletion of payment distribution code
  52 //===============================================================================
  53 if (isset($_POST["mode"]))
  54  {
  55   if ($_POST["mode"] == "DeletePaymentDistribution")
  56    {
  57     $DeletePaymentDistributionId=trim(formData('DeletePaymentDistributionId' ));
  58         $DeletePaymentDistributionIdArray=split('_',$DeletePaymentDistributionId);
  59         $payment_id=$DeletePaymentDistributionIdArray[0];
  60         $PId=$DeletePaymentDistributionIdArray[1];
  61         $Encounter=$DeletePaymentDistributionIdArray[2];
  62         $Code=$DeletePaymentDistributionIdArray[3];
  63         $Modifier=$DeletePaymentDistributionIdArray[4];
  64         //delete and log that action
  65         row_delete("ar_activity", "session_id ='$payment_id' and  pid ='$PId' AND " .
  66           "encounter='$Encounter' and  code='$Code' and modifier='$Modifier'");
  67         $Message='Delete';
  68         //------------------
  69     $_POST["mode"] = "searchdatabase";
  70    }
  71  }
  72 //===============================================================================
  73 //Modify Payment Code.
  74 //===============================================================================
  75 if (isset($_POST["mode"]))
  76  {
  77   if ($_POST["mode"] == "ModifyPayments" || $_POST["mode"] == "FinishPayments")
  78    {
  79         $payment_id=$_REQUEST['payment_id'];
  80         //ar_session Code
  81         //===============================================================================
  82         if(trim(formData('type_name'   ))=='insurance')
  83          {
  84                 $QueryPart="payer_id = '"       . trim(formData('hidden_type_code' )) .
  85                 "', patient_id = '"   . 0 ;
  86          }
  87         elseif(trim(formData('type_name'   ))=='patient')
  88          {
  89                 $QueryPart="payer_id = '"       . 0 .
  90                 "', patient_id = '"   . trim(formData('hidden_type_code'   )) ;
  91          }
  92       $user_id=$_SESSION['authUserID'];
  93           $closed=0;
  94           $modified_time = date('Y-m-d H:i:s');
  95           $check_date=DateToYYYYMMDD(formData('check_date'));
  96           $deposit_date=DateToYYYYMMDD(formData('deposit_date'));
  97           $post_to_date=DateToYYYYMMDD(formData('post_to_date'));
  98           if($post_to_date=='')
  99            $post_to_date=date('Y-m-d');
 100           if(formData('deposit_date')=='')
 101            $deposit_date=$post_to_date;
 102
 103           sqlStatement("update ar_session set "    .
 104                 $QueryPart .
 105         "', user_id = '"     . trim($user_id                  )  .
 106         "', closed = '"      . trim($closed                   )  .
 107         "', reference = '"   . trim(formData('check_number'   )) .
 108         "', check_date = '"  . trim($check_date                                 ) .
 109         "', deposit_date = '" . trim($deposit_date            )  .
 110         "', pay_total = '"    . trim(formData('payment_amount')) .
 111         "', modified_time = '" . trim($modified_time            )  .
 112         "', payment_type = '"   . trim(formData('type_name'   )) .
 113         "', description = '"   . trim(formData('description'   )) .
 114         "', adjustment_code = '"   . trim(formData('adjustment_code'   )) .
 115         "', post_to_date = '" . trim($post_to_date            )  .
 116         "', payment_method = '"   . trim(formData('payment_method'   )) .
 117         "'      where session_id='$payment_id'");
 118 //===============================================================================
 119         $CountIndexAbove=$_REQUEST['CountIndexAbove'];
 120         $CountIndexBelow=$_REQUEST['CountIndexBelow'];
 121         $hidden_patient_code=$_REQUEST['hidden_patient_code'];
 122         $user_id=$_SESSION['authUserID'];
 123         $created_time = date('Y-m-d H:i:s');
 124         //==================================================================
 125         //UPDATION
 126         //It is done with out deleting any old entries.
 127         //==================================================================
 128         for($CountRow=1;$CountRow<=$CountIndexAbove;$CountRow++)
 129          {
 130           if (isset($_POST["HiddenEncounter$CountRow"]))
 131            {
 132                   if (isset($_POST["Payment$CountRow"]) && $_POST["Payment$CountRow"]*1>0)
 133                    {
 134                                 if(trim(formData('type_name'   ))=='insurance')
 135                                  {
 136                                   if(trim(formData("HiddenIns$CountRow"   ))==1)
 137                                    {
 138                                           $AccountCode="IPP";
 139                                    }
 140                                   if(trim(formData("HiddenIns$CountRow"   ))==2)
 141                                    {
 142                                           $AccountCode="ISP";
 143                                    }
 144                                   if(trim(formData("HiddenIns$CountRow"   ))==3)
 145                                    {
 146                                           $AccountCode="ITP";
 147                                    }
 148                                  }
 149                                 elseif(trim(formData('type_name'   ))=='patient')
 150                                  {
 151                                   $AccountCode="PP";
 152                                  }
 153                                 $resPayment = sqlStatement("SELECT  * from ar_activity " .
 154                                         " where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 155                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 156                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 157                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 158                                         "' and pay_amount>0");
 159                                 if(sqlNumRows($resPayment)>0)
 160                                  {
 161                                   sqlStatement("update ar_activity set "    .
 162                                         "   post_user = '" . trim($user_id            )  .
 163                                         "', modified_time = '"  . trim($created_time                                    ) .
 164                                         "', pay_amount = '" . trim(formData("Payment$CountRow"   ))  .
 165                                         "', account_code = '" . "$AccountCode"  .
 166                                         "', payer_type = '"   . trim(formData("HiddenIns$CountRow"   )) .
 167                                     "', reason_code = '"   . trim(formData("ReasonCode$CountRow"   )) .
 168                                         "' where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 169                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 170                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 171                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 172                                         "' and pay_amount>0");
 173                                  }
 174                                 else
 175                                  {
 176                                   sqlStatement("insert into ar_activity set "    .
 177                                         "pid = '"       . trim(formData("HiddenPId$CountRow"   )) .
 178                                         "', encounter = '"     . trim(formData("HiddenEncounter$CountRow"   ))  .
 179                                         "', code = '"      . trim(formData("HiddenCode$CountRow"   ))  .
 180                                         "', modifier = '"      . trim(formData("HiddenModifier$CountRow"   ))  .
 181                                         "', payer_type = '"   . trim(formData("HiddenIns$CountRow"   )) .
 182                                     "', reason_code = '"   . trim(formData("ReasonCode$CountRow"   )) .
 183                                         "', post_time = '"  . trim($created_time                                        ) .
 184                                         "', post_user = '" . trim($user_id            )  .
 185                                         "', session_id = '"    . trim(formData('payment_id')) .
 186                                         "', modified_time = '"  . trim($created_time                                    ) .
 187                                         "', pay_amount = '" . trim(formData("Payment$CountRow"   ))  .
 188                                         "', adj_amount = '"    . 0 .
 189                                         "', account_code = '" . "$AccountCode"  .
 190                                         "'");
 191                                  }
 192                    }
 193                   else
 194                    {
 195                     sqlStatement("delete from ar_activity " .
 196                                         " where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 197                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 198                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 199                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 200                                         "' and pay_amount>0");
 201                    }
 202 //==============================================================================================================================
 203                   if (isset($_POST["AdjAmount$CountRow"]) && $_POST["AdjAmount$CountRow"]*1!=0)
 204                    {
 205                                 if(trim(formData('type_name'   ))=='insurance')
 206                                  {
 207                                   $AdjustString="Ins adjust Ins".trim(formData("HiddenIns$CountRow"   ));
 208                                   $AccountCode="IA";
 209                                  }
 210                                 elseif(trim(formData('type_name'   ))=='patient')
 211                                  {
 212                                   $AdjustString="Pt adjust";
 213                                   $AccountCode="PA";
 214                                  }
 215                                 $resPayment = sqlStatement("SELECT  * from ar_activity " .
 216                                         " where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 217                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 218                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 219                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 220                                         "' and adj_amount!=0");
 221                                 if(sqlNumRows($resPayment)>0)
 222                                  {
 223                                   sqlStatement("update ar_activity set "    .
 224                                         "   post_user = '" . trim($user_id            )  .
 225                                         "', modified_time = '"  . trim($created_time                                    ) .
 226                                         "', adj_amount = '"    . trim(formData("AdjAmount$CountRow"   )) .
 227                                         "', memo = '" . "$AdjustString"  .
 228                                         "', account_code = '" . "$AccountCode"  .
 229                                         "', payer_type = '"   . trim(formData("HiddenIns$CountRow"   )) .
 230                                         "' where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 231                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 232                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 233                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 234                                         "' and adj_amount!=0");
 235                                  }
 236                                 else
 237                                  {
 238                                   sqlStatement("insert into ar_activity set "    .
 239                                         "pid = '"       . trim(formData("HiddenPId$CountRow" )) .
 240                                         "', encounter = '"     . trim(formData("HiddenEncounter$CountRow"   ))  .
 241                                         "', code = '"      . trim(formData("HiddenCode$CountRow"   ))  .
 242                                         "', modifier = '"      . trim(formData("HiddenModifier$CountRow"   ))  .
 243                                         "', payer_type = '"   . trim(formData("HiddenIns$CountRow"   )) .
 244                                         "', post_time = '"  . trim($created_time                                        ) .
 245                                         "', post_user = '" . trim($user_id            )  .
 246                                         "', session_id = '"    . trim(formData('payment_id')) .
 247                                         "', modified_time = '"  . trim($created_time                                    ) .
 248                                         "', pay_amount = '" . 0  .
 249                                         "', adj_amount = '"    . trim(formData("AdjAmount$CountRow"   )) .
 250                                         "', memo = '" . "$AdjustString"  .
 251                                         "', account_code = '" . "$AccountCode"  .
 252                                         "'");
 253                                  }
 254
 255                    }
 256                   else
 257                    {
 258                     sqlStatement("delete from ar_activity " .
 259                                         " where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 260                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 261                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 262                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 263                                         "' and adj_amount!=0");
 264                    }
 265 //==============================================================================================================================
 266                   if (isset($_POST["Deductible$CountRow"]) && $_POST["Deductible$CountRow"]*1>0)
 267                    {
 268                                 $resPayment = sqlStatement("SELECT  * from ar_activity " .
 269                                         " where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 270                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 271                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 272                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 273                                         "' and memo like 'Deductable%'");
 274                                 if(sqlNumRows($resPayment)>0)
 275                                  {
 276                                   sqlStatement("update ar_activity set "    .
 277                                         "   post_user = '" . trim($user_id            )  .
 278                                         "', modified_time = '"  . trim($created_time                                    ) .
 279                                         "', memo = '"    . "Deductable $".trim(formData("Deductible$CountRow"   )) .
 280                                         "', account_code = '" . "Deduct"  .
 281                                         "', payer_type = '"   . trim(formData("HiddenIns$CountRow"   )) .
 282                                         "' where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 283                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 284                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 285                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 286                                         "' and memo like 'Deductable%'");
 287                                  }
 288                                 else
 289                                  {
 290                                   sqlStatement("insert into ar_activity set "    .
 291                                         "pid = '"       . trim(formData("HiddenPId$CountRow" )) .
 292                                         "', encounter = '"     . trim(formData("HiddenEncounter$CountRow"   ))  .
 293                                         "', code = '"      . trim(formData("HiddenCode$CountRow"   ))  .
 294                                         "', modifier = '"      . trim(formData("HiddenModifier$CountRow"   ))  .
 295                                         "', payer_type = '"   . trim(formData("HiddenIns$CountRow"   )) .
 296                                         "', post_time = '"  . trim($created_time                                        ) .
 297                                         "', post_user = '" . trim($user_id            )  .
 298                                         "', session_id = '"    . trim(formData('payment_id')) .
 299                                         "', modified_time = '"  . trim($created_time                                    ) .
 300                                         "', pay_amount = '" . 0  .
 301                                         "', adj_amount = '"    . 0 .
 302                                         "', memo = '"    . "Deductable $".trim(formData("Deductible$CountRow"   )) .
 303                                         "', account_code = '" . "Deduct"  .
 304                                         "'");
 305                                  }
 306                    }
 307                   else
 308                    {
 309                     sqlStatement("delete from ar_activity " .
 310                                         " where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 311                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 312                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 313                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 314                                         "' and memo like 'Deductable%'");
 315                    }
 316 //==============================================================================================================================
 317                   if (isset($_POST["Takeback$CountRow"]) && $_POST["Takeback$CountRow"]*1>0)
 318                    {
 319                                 $resPayment = sqlStatement("SELECT  * from ar_activity " .
 320                                         " where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 321                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 322                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 323                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 324                                         "' and pay_amount < 0");
 325                                 if(sqlNumRows($resPayment)>0)
 326                                  {
 327                                   sqlStatement("update ar_activity set "    .
 328                                         "   post_user = '" . trim($user_id            )  .
 329                                         "', modified_time = '"  . trim($created_time                                    ) .
 330                                         "', pay_amount = '" . trim(formData("Takeback$CountRow"   ))*-1  .
 331                                         "', account_code = '" . "Takeback"  .
 332                                         "', payer_type = '"   . trim(formData("HiddenIns$CountRow"   )) .
 333                                         "' where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 334                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 335                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 336                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 337                                         "' and pay_amount < 0");
 338                                  }
 339                                 else
 340                                  {
 341                                   sqlStatement("insert into ar_activity set "    .
 342                                         "pid = '"       . trim(formData("HiddenPId$CountRow" )) .
 343                                         "', encounter = '"     . trim(formData("HiddenEncounter$CountRow"   ))  .
 344                                         "', code = '"      . trim(formData("HiddenCode$CountRow"   ))  .
 345                                         "', modifier = '"      . trim(formData("HiddenModifier$CountRow"   ))  .
 346                                         "', payer_type = '"   . trim(formData("HiddenIns$CountRow"   )) .
 347                                         "', post_time = '"  . trim($created_time                                        ) .
 348                                         "', post_user = '" . trim($user_id            )  .
 349                                         "', session_id = '"    . trim(formData('payment_id')) .
 350                                         "', modified_time = '"  . trim($created_time                                    ) .
 351                                         "', pay_amount = '" . trim(formData("Takeback$CountRow"   ))*-1  .
 352                                         "', adj_amount = '"    . 0 .
 353                                         "', account_code = '" . "Takeback"  .
 354                                         "'");
 355                                  }
 356                    }
 357                   else
 358                    {
 359                     sqlStatement("delete from ar_activity " .
 360                                         " where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 361                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 362                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 363                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 364                                         "' and pay_amount < 0");
 365                    }
 366 //==============================================================================================================================
 367                   if (isset($_POST["FollowUp$CountRow"]) && $_POST["FollowUp$CountRow"]=='y')
 368                    {
 369                                 $resPayment = sqlStatement("SELECT  * from ar_activity " .
 370                                         " where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 371                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 372                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 373                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 374                                         "' and follow_up ='y'");
 375                                 if(sqlNumRows($resPayment)>0)
 376                                  {
 377                                   sqlStatement("update ar_activity set "    .
 378                                         "   post_user = '" . trim($user_id            )  .
 379                                         "', modified_time = '"  . trim($created_time                                    ) .
 380                                         "', follow_up = '"    . "y" .
 381                                         "', follow_up_note = '"    . trim(formData("FollowUpReason$CountRow"   )) .
 382                                         "', payer_type = '"   . trim(formData("HiddenIns$CountRow"   )) .
 383                                         "' where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 384                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 385                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 386                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 387                                         "' and follow_up ='y'");
 388                                  }
 389                                 else
 390                                  {
 391                                   sqlStatement("insert into ar_activity set "    .
 392                                         "pid = '"       . trim(formData("HiddenPId$CountRow" )) .
 393                                         "', encounter = '"     . trim(formData("HiddenEncounter$CountRow"   ))  .
 394                                         "', code = '"      . trim(formData("HiddenCode$CountRow"   ))  .
 395                                         "', modifier = '"      . trim(formData("HiddenModifier$CountRow"   ))  .
 396                                         "', payer_type = '"   . trim(formData("HiddenIns$CountRow"   )) .
 397                                         "', post_time = '"  . trim($created_time                                        ) .
 398                                         "', post_user = '" . trim($user_id            )  .
 399                                         "', session_id = '"    . trim(formData('payment_id')) .
 400                                         "', modified_time = '"  . trim($created_time                                    ) .
 401                                         "', pay_amount = '" . 0  .
 402                                         "', adj_amount = '"    . 0 .
 403                                         "', follow_up = '"    . "y" .
 404                                         "', follow_up_note = '"    . trim(formData("FollowUpReason$CountRow"   )) .
 405                                         "'");
 406                                  }
 407                    }
 408                   else
 409                    {
 410                     sqlStatement("delete from ar_activity " .
 411                                         " where  session_id ='$payment_id' and pid ='" . trim(formData("HiddenPId$CountRow"   ))  .
 412                                         "' and  encounter  ='" . trim(formData("HiddenEncounter$CountRow"   ))  .
 413                                         "' and  code  ='" . trim(formData("HiddenCode$CountRow"   ))  .
 414                                         "' and  modifier  ='" . trim(formData("HiddenModifier$CountRow"   ))  .
 415                                         "' and follow_up ='y'");
 416                    }
 417 //==============================================================================================================================
 418            }
 419           else
 420            break;
 421          }
 422         //=========
 423         //INSERTION of new entries,continuation of modification.
 424         //=========
 425         for($CountRow=$CountIndexAbove+1;$CountRow<=$CountIndexAbove+$CountIndexBelow;$CountRow++)
 426          {
 427           if (isset($_POST["HiddenEncounter$CountRow"]))
 428            {
 429             DistributionInsert($CountRow,$created_time,$user_id);
 430            }
 431           else
 432            break;
 433          }
 434         if($_REQUEST['global_amount']=='yes')
 435                 sqlStatement("update ar_session set global_amount=".trim(formData("HidUnappliedAmount"   ))*1 ." where session_id ='$payment_id'");
 436         if($_POST["mode"]=="FinishPayments")
 437          {
 438           $Message='Finish';
 439          }
 440     $_POST["mode"] = "searchdatabase";
 441         $Message='Modify';
 442    }
 443  }
 444 //==============================================================================
 445 //Search Code
 446 //===============================================================================
 447 $payment_id=$payment_id*1 > 0 ? $payment_id : $_REQUEST['payment_id'];
 448 $ResultSearchSub = sqlStatement("SELECT  distinct encounter,code,modifier, pid from ar_activity where  session_id ='$payment_id' order by pid,encounter,code,modifier");
 449 //==============================================================================
 450 $DateFormat=DateFormatRead();
 451 //==============================================================================
 452 //===============================================================================
 453 ?>
 454
 455 <html>
 456 <head>
 457 <?php if (function_exists('html_header_show')) html_header_show(); ?>
 458
 459 <link rel="stylesheet" href="<?php echo $css_header;?>" type="text/css">
 460
 461 <!-- supporting javascript code -->
 462
 463 <script type="text/javascript" src="<?php echo $GLOBALS['webroot'] ?>/library/dialog.js"></script>
 464
 465
 466
 467 <link rel="stylesheet" href="<?php echo $css_header;?>" type="text/css">
 468 <link rel="stylesheet" type="text/css" href="../../library/js/fancybox/jquery.fancybox-1.2.6.css" media="screen" />
 469 <style type="text/css">@import url(../../library/dynarch_calendar.css);</style>
 470 <script type="text/javascript" src="../../library/textformat.js"></script>
 471 <script type="text/javascript" src="../../library/dynarch_calendar.js"></script>
 472 <?php include_once("{$GLOBALS['srcdir']}/dynarch_calendar_en.inc.php"); ?>
 473 <script type="text/javascript" src="../../library/dynarch_calendar_setup.js"></script>
 474 <script type="text/javascript" src="../../library/dialog.js"></script>
 475 <script type="text/javascript" src="../../library/js/jquery.1.3.2.js"></script>
 476 <script type="text/javascript" src="../../library/js/fancybox/jquery.fancybox-1.2.6.js"></script>
 477 <script language='JavaScript'>
 478  var mypcc = '1';
 479 </script>
 480 <?php include_once("{$GLOBALS['srcdir']}/payment_jav.inc.php"); ?>
 481 <?php include_once("{$GLOBALS['srcdir']}/ajax/payment_ajax_jav.inc.php"); ?>
 482 <script type="text/javascript" src="../../library/js/common.js"></script>
 483 <script LANGUAGE="javascript" TYPE="text/javascript">
 484 function ModifyPayments()
 485  {//Used while modifying the allocation
 486         if(!FormValidations())//FormValidations contains the form checks
 487          {
 488           return false;
 489          }
 490         if(CompletlyBlankAbove())//The distribution rows already in the database are checked.
 491          {
 492           alert("<?php echo htmlspecialchars( xl('None of the Top Distribution Row Can be Completly Blank.'), ENT_QUOTES);echo htmlspecialchars('\n');echo htmlspecialchars( xl('Use Delete Option to Remove.'), ENT_QUOTES) ?>")
 493           return false;
 494          }
 495         if(!CheckPayingEntityAndDistributionPostFor())//Ensures that Insurance payment is distributed under Ins1,Ins2,Ins3 and Patient paymentat under Pat.
 496          {
 497           return false;
 498          }
 499         if(CompletlyBlankBelow())//The newly added distribution rows are checked.
 500          {
 501           alert("<?php echo htmlspecialchars( xl('Fill any of the Below Row.'), ENT_QUOTES) ?>")
 502           return false;
 503          }
 504         PostValue=CheckUnappliedAmount();//Decides TdUnappliedAmount >0, or <0 or =0
 505         if(PostValue==1)
 506          {
 507           alert("<?php echo htmlspecialchars( xl('Cannot Modify Payments.Undistributed is Negative.'), ENT_QUOTES) ?>")
 508           return false;
 509          }
 510         if(confirm("<?php echo htmlspecialchars( xl('Would you like to Modify Payments?'), ENT_QUOTES) ?>"))
 511          {
 512                 document.getElementById('mode').value='ModifyPayments';
 513                 top.restoreSession();
 514                 document.forms[0].submit();
 515          }
 516         else
 517          return false;
 518  }
 519 function FinishPayments()
 520  {
 521         if(!FormValidations())//FormValidations contains the form checks
 522          {
 523           return false;
 524          }
 525         if(CompletlyBlankAbove())//The distribution rows already in the database are checked.
 526          {
 527           alert("<?php echo htmlspecialchars( xl('None of the Top Distribution Row Can be Completly Blank.'), ENT_QUOTES);echo htmlspecialchars('\n');echo htmlspecialchars( xl('Use Delete Option to Remove.'), ENT_QUOTES) ?>")
 528           return false;
 529          }
 530         if(!CheckPayingEntityAndDistributionPostFor())//Ensures that Insurance payment is distributed under Ins1,Ins2,Ins3 and Patient paymentat under Pat.
 531          {
 532           return false;
 533          }
 534         if(CompletlyBlankBelow())//The newly added distribution rows are checked.
 535          {
 536           alert("<?php echo htmlspecialchars( xl('Fill any of the Below Row.'), ENT_QUOTES) ?>")
 537           return false;
 538          }
 539         PostValue=CheckUnappliedAmount();//Decides TdUnappliedAmount >0, or <0 or =0
 540         if(PostValue==1)
 541          {
 542           alert("<?php echo htmlspecialchars( xl('Cannot Modify Payments.Undistributed is Negative.'), ENT_QUOTES) ?>")
 543           return false;
 544          }
 545         if(PostValue==2)
 546          {
 547                 if(confirm("<?php echo htmlspecialchars( xl('Would you like to Modify and Finish Payments?'), ENT_QUOTES) ?>"))
 548                  {
 549                         UnappliedAmount=document.getElementById('TdUnappliedAmount').innerHTML*1;
 550                         if(confirm("<?php echo htmlspecialchars( xl('Undistributed is'), ENT_QUOTES) ?>" + ' ' + UnappliedAmount + '.' + "<?php echo htmlspecialchars('\n');echo htmlspecialchars( xl('Would you like the balance amount to apply to Global Account?'), ENT_QUOTES) ?>"))
 551                          {
 552                                 document.getElementById('mode').value='FinishPayments';
 553                                 document.getElementById('global_amount').value='yes';
 554                                 top.restoreSession();
 555                                 document.forms[0].submit();
 556                          }
 557                         else
 558                          {
 559                                 document.getElementById('mode').value='FinishPayments';
 560                                 top.restoreSession();
 561                                 document.forms[0].submit();
 562                          }
 563                  }
 564                 else
 565                  return false;
 566          }
 567         else
 568          {
 569                 if(confirm("<?php echo htmlspecialchars( xl('Would you like to Modify and Finish Payments?'), ENT_QUOTES) ?>"))
 570                  {
 571                         document.getElementById('mode').value='FinishPayments';
 572                         top.restoreSession();
 573                         document.forms[0].submit();
 574                  }
 575                 else
 576                  return false;
 577          }
 578
 579  }
 580 function CompletlyBlankAbove()
 581  {//The distribution rows already in the database are checked.
 582  //It is not allowed to be made completly empty.If needed delete option need to be used.
 583   CountIndexAbove=document.getElementById('CountIndexAbove').value*1;
 584   for(RowCount=1;RowCount<=CountIndexAbove;RowCount++)
 585    {
 586    if(document.getElementById('Allowed'+RowCount).value=='' && document.getElementById('Payment'+RowCount).value=='' && document.getElementById('AdjAmount'+RowCount).value=='' && document.getElementById('Deductible'+RowCount).value=='' && document.getElementById('Takeback'+RowCount).value=='' && document.getElementById('FollowUp'+RowCount).checked==false)
 587         {
 588          return true;
 589         }
 590    }
 591   return false;
 592  }
 593 function CompletlyBlankBelow()
 594  {//The newly added distribution rows are checked.
 595  //It is not allowed to be made completly empty.
 596   CountIndexAbove=document.getElementById('CountIndexAbove').value*1;
 597   CountIndexBelow=document.getElementById('CountIndexBelow').value*1;
 598   if(CountIndexBelow==0)
 599    return false;
 600   for(RowCount=CountIndexAbove+1;RowCount<=CountIndexAbove+CountIndexBelow;RowCount++)
 601    {
 602    if(document.getElementById('Allowed'+RowCount).value=='' && document.getElementById('Payment'+RowCount).value=='' && document.getElementById('AdjAmount'+RowCount).value=='' && document.getElementById('Deductible'+RowCount).value=='' && document.getElementById('Takeback'+RowCount).value=='' && document.getElementById('FollowUp'+RowCount).checked==false)
 603         {
 604
 605         }
 606         else
 607          return false;
 608    }
 609   return true;
 610  }
 611 function OnloadAction()
 612  {//Displays message while loading after some action.
 613   after_value=document.getElementById('ActionStatus').value;
 614   if(after_value=='Delete')
 615    {
 616     alert("<?php echo htmlspecialchars( xl('Successfully Deleted'), ENT_QUOTES) ?>")
 617         return true;
 618    }
 619   if(after_value=='Modify' || after_value=='Finish')
 620    {
 621     alert("<?php echo htmlspecialchars( xl('Successfully Modified'), ENT_QUOTES) ?>")
 622         return true;
 623    }
 624   after_value=document.getElementById('after_value').value;
 625   payment_id=document.getElementById('payment_id').value;
 626   if(after_value=='distribute')
 627    {
 628    }
 629   else if(after_value=='new_payment')
 630    {
 631         if(document.getElementById('TablePatientPortion'))
 632          {
 633                 document.getElementById('TablePatientPortion').style.display='none';
 634          }
 635         if(confirm("<?php echo htmlspecialchars( xl('Successfully Saved.Would you like to Distribute?'), ENT_QUOTES) ?>"))
 636          {
 637                 if(document.getElementById('TablePatientPortion'))
 638                  {
 639                         document.getElementById('TablePatientPortion').style.display='';
 640                  }
 641          }
 642    }
 643
 644  }
 645 function DeletePaymentDistribution(DeleteId)
 646  {//Confirms deletion of payment distribution.
 647         if(confirm("<?php echo htmlspecialchars( xl('Would you like to Delete Payment Distribution?'), ENT_QUOTES) ?>"))
 648          {
 649                 document.getElementById('mode').value='DeletePaymentDistribution';
 650                 document.getElementById('DeletePaymentDistributionId').value=DeleteId;
 651                 top.restoreSession();
 652                 document.forms[0].submit();
 653          }
 654         else
 655          return false;
 656  }
 657 //========================================================================================
 658 </script>
 659 <script language="javascript" type="text/javascript">
 660 document.onclick=HideTheAjaxDivs;
 661 </script>
 662 <style>
 663 .class1{width:125px;}
 664 .class2{width:250px;}
 665 .class3{width:100px;}
 666 .bottom{border-bottom:1px solid black;}
 667 .top{border-top:1px solid black;}
 668 .left{border-left:1px solid black;}
 669 .right{border-right:1px solid black;}
 670 #ajax_div_insurance {
 671         position: absolute;
 672         z-index:10;
 673         /*
 674         left: 20px;
 675         top: 300px;
 676         */
 677         background-color: #FBFDD0;
 678         border: 1px solid #ccc;
 679         padding: 10px;
 680 }
 681 #ajax_div_patient {
 682         position: absolute;
 683         z-index:10;
 684         /*
 685         left: 20px;
 686         top: 300px;
 687         */
 688         background-color: #FBFDD0;
 689         border: 1px solid #ccc;
 690         padding: 10px;
 691 }
 692 </style>
 693 <link rel="stylesheet" href="<?php echo $css_header; ?>" type="text/css">
 694 </head>
 695 <body class="body_top" onLoad="OnloadAction()"  >
 696 <form name='new_payment' method='post'  action="edit_payment.php" onsubmit='
 697 <?php
 698  if($payment_id*1==0)
 699   {
 700   ?>
 701 top.restoreSession();return SavePayment();
 702 <?php
 703   }
 704  else
 705   {
 706   ?>
 707 return false;
 708 <?php
 709   }
 710   ?>
 711 ' style="display:inline" >
 712 <table width="1024" border="0"  cellspacing="0" cellpadding="0">
 713 <?php
 714   if($_REQUEST['ParentPage']=='new_payment')
 715   {
 716   ?>
 717   <tr>
 718     <td colspan="3" align="left"><b><?php echo htmlspecialchars( xl('Payments'), ENT_QUOTES) ?></b></td>
 719   </tr>
 720   <tr height="15">
 721     <td colspan="3" align="left" ></td>
 722   </tr>
 723   <tr>
 724     <td colspan="3" align="left">
 725                 <ul class="tabNav">
 726                  <li class='current'><a href='new_payment.php'><?php echo htmlspecialchars( xl('New Payment'), ENT_QUOTES) ?></a></li>
 727                  <li><a href='search_payments.php'><?php echo htmlspecialchars( xl('Search Payment'), ENT_QUOTES) ?></a></li>
 728                  <li><a href='era_payments.php'><?php echo htmlspecialchars( xl('ERA Posting'), ENT_QUOTES) ?></a></li>
 729                 </ul>   </td>
 730   </tr>
 731 <?php
 732   }
 733  else
 734   {
 735   ?>
 736   <tr height="5">
 737     <td colspan="3" align="left" ></td>
 738   </tr>
 739 <?php
 740   }
 741   ?>
 742   <tr>
 743     <td colspan="3" align="left" >
 744
 745 <?php
 746  if($payment_id*1>0)
 747   {
 748   ?>
 749     <?php
 750         require_once("payment_master.inc.php");  //Check/cash details are entered here.
 751         ?>
 752 <?php
 753 }
 754 ?>
 755         </td>
 756   </tr>
 757 </table>
 758
 759
 760
 761 <?php
 762  if($payment_id*1>0)
 763   {//Distribution rows already in the database are displayed.
 764   ?>
 765
 766 <table width="1024" border="0" cellspacing="0" cellpadding="10" bgcolor="#DEDEDE"><tr><td>
 767         <table width="1004" border="0" cellspacing="0" cellpadding="0">
 768
 769                   <tr>
 770                         <td colspan="13" align="left" >
 771
 772                                 <?php //
 773                                 $resCount = sqlStatement("SELECT distinct encounter,code,modifier from ar_activity where  session_id ='$payment_id' ");
 774                                 $TotalRows=sqlNumRows($resCount);
 775                                 $CountPatient=0;
 776                                 $CountIndex=0;
 777                                 $CountIndexAbove=0;
 778                                 $paymenttot=0;
 779                                 $adjamttot=0;
 780                                 $deductibletot=0;
 781                                 $takebacktot=0;
 782                                 $allowedtot=0;
 783                                 if($RowSearchSub = sqlFetchArray($ResultSearchSub))
 784                                  {
 785                                         do
 786                                          {
 787                                                 $CountPatient++;
 788                                                 $PId=$RowSearchSub['pid'];
 789                                                 $EncounterMaster=$RowSearchSub['encounter'];
 790                                                 $CodeMaster=$RowSearchSub['code'];
 791                                                 $ModifierMaster=$RowSearchSub['modifier'];
 792                                                 $res = sqlStatement("SELECT fname,lname,mname FROM patient_data where pid ='$PId'");
 793                                                 $row = sqlFetchArray($res);
 794                                                 $fname=$row['fname'];
 795                                                 $lname=$row['lname'];
 796                                                 $mname=$row['mname'];
 797                                                 $NameDB=$lname.' '.$fname.' '.$mname;
 798                                                 $ResultSearch = sqlStatement("SELECT billing.id,last_level_closed,billing.encounter,form_encounter.`date`,billing.code,billing.modifier,fee
 799                                                  FROM billing ,form_encounter
 800                                                  where billing.encounter=form_encounter.encounter and billing.pid=form_encounter.pid and
 801                                                  code_type!='ICD9' and  code_type!='COPAY' and billing.activity!=0 and
 802                                                  form_encounter.pid ='$PId' and billing.pid ='$PId' and billing.encounter ='$EncounterMaster'
 803                                                   and billing.code ='$CodeMaster'
 804                                                    and billing.modifier ='$ModifierMaster'
 805                                                  ORDER BY form_encounter.`date`,form_encounter.encounter,billing.code,billing.modifier");
 806                                                 if(sqlNumRows($ResultSearch)>0)
 807                                                  {
 808                                                 if($CountPatient==1)
 809                                                  {
 810                                                  $Table='yes';
 811                                                 ?>
 812                                                 <table width="1004"  border="0" cellpadding="0" cellspacing="0" align="center" id="TableDistributePortion">
 813                                                   <tr class="text" bgcolor="#dddddd">
 814                                                     <td width="25" class="left top" >&nbsp;</td>
 815                                                     <td width="144" class="left top" ><?php echo htmlspecialchars( xl('Patient Name'), ENT_QUOTES) ?></td>
 816                                                         <td width="55" class="left top" ><?php echo htmlspecialchars( xl('Post For'), ENT_QUOTES) ?></td>
 817                                                         <td width="70" class="left top" ><?php echo htmlspecialchars( xl('Srv Date'), ENT_QUOTES) ?></td>
 818                                                         <td width="50" class="left top" ><?php echo htmlspecialchars( xl('Encnter'), ENT_QUOTES) ?></td>
 819                                                         <td width="65" class="left top" ><?php echo htmlspecialchars( xl('CPT Code'), ENT_QUOTES) ?></td>
 820                                                         <td width="50" class="left top" ><?php echo htmlspecialchars( xl('Charge'), ENT_QUOTES) ?></td>
 821                                                         <td width="40" class="left top" ><?php echo htmlspecialchars( xl('Copay'), ENT_QUOTES) ?></td>
 822                                                         <td width="40" class="left top" ><?php echo htmlspecialchars( xl('Remdr'), ENT_QUOTES) ?></td>
 823                                                         <td width="60" class="left top" ><?php echo htmlspecialchars( xl('Allowed(c)'), ENT_QUOTES) ?></td><!-- (c) means it is calculated.Not stored one. -->
 824                                                         <td width="60" class="left top" ><?php echo htmlspecialchars( xl('Payment'), ENT_QUOTES) ?></td>
 825                                                         <td width="70" class="left top" ><?php echo htmlspecialchars( xl('Adj Amount'), ENT_QUOTES) ?></td>
 826                                                         <td width="60" class="left top" ><?php echo htmlspecialchars( xl('Deductible'), ENT_QUOTES) ?></td>
 827                                                         <td width="60" class="left top" ><?php echo htmlspecialchars( xl('Takeback'), ENT_QUOTES) ?></td>
 828                                                         <td width="60" class="left top" ><?php echo htmlspecialchars( xl('MSP Code'), ENT_QUOTES) ?></td>
 829                                                         <td width="40" class="left top" ><?php echo htmlspecialchars( xl('Resn'), ENT_QUOTES) ?></td>
 830                                                         <td width="110" class="left top right" ><?php echo htmlspecialchars( xl('Follow Up Reason'), ENT_QUOTES) ?></td>
 831                                                   </tr>
 832                                                   <?php
 833                                                   }
 834                                                         while ($RowSearch = sqlFetchArray($ResultSearch))
 835                                                          {
 836                                                                 $CountIndex++;
 837                                                                 $CountIndexAbove++;
 838                                                                 $ServiceDateArray=split(' ',$RowSearch['date']);
 839                                                                 $ServiceDate=oeFormatShortDate($ServiceDateArray[0]);
 840                                                                 $Code=$RowSearch['code'];
 841                                                                 $Modifier =$RowSearch['modifier'];
 842                                                                 if($Modifier!='')
 843                                                                  $ModifierString=", $Modifier";
 844                                                                 else
 845                                                                  $ModifierString="";
 846                                                                 $Fee=$RowSearch['fee'];
 847                                                                 $Encounter=$RowSearch['encounter'];
 848
 849                                                                 $resPayer = sqlStatement("SELECT  payer_type from ar_activity where  session_id ='$payment_id' and
 850                                                                 pid ='$PId' and  encounter  ='$Encounter' and  code='$Code' and modifier='$Modifier' ");
 851                                                                 $rowPayer = sqlFetchArray($resPayer);
 852                                                                 $Ins=$rowPayer['payer_type'];
 853
 854                                                                 //Always associating the copay to a particular charge.
 855                                                                 $BillingId=$RowSearch['id'];
 856                                                                 $resId = sqlStatement("SELECT id  FROM billing where code_type!='ICD9' and  code_type!='COPAY'  and
 857                                                                 pid ='$PId' and  encounter  ='$Encounter' and billing.activity!=0 order by id");
 858                                                                 $rowId = sqlFetchArray($resId);
 859                                                                 $Id=$rowId['id'];
 860
 861                                                                 if($BillingId!=$Id)//multiple cpt in single encounter
 862                                                                  {
 863                                                                         $Copay=0.00;
 864                                                                  }
 865                                                                 else
 866                                                                  {
 867                                                                         $resCopay = sqlStatement("SELECT sum(fee) as copay FROM billing where
 868                                                                         code_type='COPAY' and  pid ='$PId' and  encounter  ='$Encounter' and billing.activity!=0");
 869                                                                         $rowCopay = sqlFetchArray($resCopay);
 870                                                                         $Copay=$rowCopay['copay']*-1;
 871
 872                                                                         $resMoneyGot = sqlStatement("SELECT sum(pay_amount) as PatientPay FROM ar_activity where
 873                                                                         pid ='$PId'  and  encounter  ='$Encounter' and  payer_type=0 and account_code='PCP'");//new fees screen copay gives account_code='PCP'
 874                                                                         $rowMoneyGot = sqlFetchArray($resMoneyGot);
 875                                                                         $PatientPay=$rowMoneyGot['PatientPay'];
 876
 877                                                                         $Copay=$Copay+$PatientPay;
 878                                                                  }
 879
 880                                                                         //For calculating Remainder
 881                                                                         if($Ins==0)
 882                                                                          {//Fetch all values
 883                                                                                 $resMoneyGot = sqlStatement("SELECT sum(pay_amount) as MoneyGot FROM ar_activity where
 884                                                                                 pid ='$PId' and  code='$Code' and modifier='$Modifier'  and  encounter  ='$Encounter' and  !(payer_type=0 and
 885                                                                                 account_code='PCP')");
 886                                                                                 //new fees screen copay gives account_code='PCP'
 887                                                                                 $rowMoneyGot = sqlFetchArray($resMoneyGot);
 888                                                                                 $MoneyGot=$rowMoneyGot['MoneyGot'];
 889
 890                                                                                 $resMoneyAdjusted = sqlStatement("SELECT sum(adj_amount) as MoneyAdjusted FROM ar_activity where
 891                                                                                 pid ='$PId' and  code='$Code' and modifier='$Modifier'  and  encounter  ='$Encounter'");
 892                                                                                 $rowMoneyAdjusted = sqlFetchArray($resMoneyAdjusted);
 893                                                                                 $MoneyAdjusted=$rowMoneyAdjusted['MoneyAdjusted'];
 894                                                                          }
 895                                                                         else//Fetch till that much got
 896                                                                          {
 897                                                                                 //Fetch the HIGHEST sequence_no till this session.
 898                                                                                 //Used maily in  the case if primary/others pays once more.
 899                                                                                 $resSequence = sqlStatement("SELECT  sequence_no from ar_activity where  session_id ='$payment_id' and
 900                                                                                 pid ='$PId' and  encounter  ='$Encounter' order by sequence_no desc ");
 901                                                                                 $rowSequence = sqlFetchArray($resSequence);
 902                                                                                 $Sequence=$rowSequence['sequence_no'];
 903
 904                                                                                 $resMoneyGot = sqlStatement("SELECT sum(pay_amount) as MoneyGot FROM ar_activity where
 905                                                                                 pid ='$PId' and  code='$Code' and modifier='$Modifier'  and  encounter  ='$Encounter' and
 906                                                                                 payer_type > 0 and payer_type <='$Ins' and sequence_no<='$Sequence'");
 907                                                                                 $rowMoneyGot = sqlFetchArray($resMoneyGot);
 908                                                                                 $MoneyGot=$rowMoneyGot['MoneyGot'];
 909
 910                                                                                 $resMoneyAdjusted = sqlStatement("SELECT sum(adj_amount) as MoneyAdjusted FROM ar_activity where
 911                                                                                 pid ='$PId' and  code='$Code' and modifier='$Modifier'   and  encounter  ='$Encounter' and
 912                                                                                 payer_type > 0 and payer_type <='$Ins' and sequence_no<='$Sequence'");
 913                                                                                 $rowMoneyAdjusted = sqlFetchArray($resMoneyAdjusted);
 914                                                                                 $MoneyAdjusted=$rowMoneyAdjusted['MoneyAdjusted'];
 915                                                                          }
 916                                                                         $Remainder=$Fee-$Copay-$MoneyGot-$MoneyAdjusted;
 917
 918                                                                         //For calculating RemainderJS.Used while restoring back the values.
 919                                                                         if($Ins==0)
 920                                                                          {//Got just before Patient
 921                                                                                 $resMoneyGot = sqlStatement("SELECT sum(pay_amount) as MoneyGot FROM ar_activity where
 922                                                                                 pid ='$PId' and  code='$Code' and modifier='$Modifier'  and  encounter  ='$Encounter' and  payer_type !=0");
 923                                                                                 $rowMoneyGot = sqlFetchArray($resMoneyGot);
 924                                                                                 $MoneyGot=$rowMoneyGot['MoneyGot'];
 925
 926                                                                                 $resMoneyAdjusted = sqlStatement("SELECT sum(adj_amount) as MoneyAdjusted FROM ar_activity where
 927                                                                                 pid ='$PId' and  code='$Code' and modifier='$Modifier'  and  encounter  ='$Encounter' and payer_type !=0");
 928                                                                                 $rowMoneyAdjusted = sqlFetchArray($resMoneyAdjusted);
 929                                                                                 $MoneyAdjusted=$rowMoneyAdjusted['MoneyAdjusted'];
 930                                                                          }
 931                                                                         else
 932                                                                          {//Got just before the previous
 933                                                                                 //Fetch the LOWEST sequence_no till this session.
 934                                                                                 //Used maily in  the case if primary/others pays once more.
 935                                                                                 $resSequence = sqlStatement("SELECT  sequence_no from ar_activity where  session_id ='$payment_id' and
 936                                                                                 pid ='$PId' and  encounter  ='$Encounter' order by sequence_no  ");
 937                                                                                 $rowSequence = sqlFetchArray($resSequence);
 938                                                                                 $Sequence=$rowSequence['sequence_no'];
 939
 940                                                                                 $resMoneyGot = sqlStatement("SELECT sum(pay_amount) as MoneyGot FROM ar_activity where
 941                                                                                 pid ='$PId' and  code='$Code' and modifier='$Modifier'   and  encounter  ='$Encounter'
 942                                                                                 and payer_type > 0  and payer_type <='$Ins' and sequence_no<'$Sequence'");
 943                                                                                 $rowMoneyGot = sqlFetchArray($resMoneyGot);
 944                                                                                 $MoneyGot=$rowMoneyGot['MoneyGot'];
 945
 946                                                                                 $resMoneyAdjusted = sqlStatement("SELECT sum(adj_amount) as MoneyAdjusted FROM ar_activity where
 947                                                                                 pid ='$PId' and  code='$Code' and modifier='$Modifier'   and  encounter  ='$Encounter'
 948                                                                                 and payer_type <='$Ins' and sequence_no<'$Sequence' ");
 949                                                                                 $rowMoneyAdjusted = sqlFetchArray($resMoneyAdjusted);
 950                                                                                 $MoneyAdjusted=$rowMoneyAdjusted['MoneyAdjusted'];
 951                                                                          }
 952                                                                         //Stored in hidden so that can be used while restoring back the values.
 953                                                                         $RemainderJS=$Fee-$Copay-$MoneyGot-$MoneyAdjusted;
 954
 955                                                                         $resPayment = sqlStatement("SELECT  pay_amount from ar_activity where  session_id ='$payment_id' and
 956                                                                         pid ='$PId' and  encounter  ='$Encounter' and  code='$Code' and modifier='$Modifier'  and pay_amount>0");
 957                                                                         $rowPayment = sqlFetchArray($resPayment);
 958                                                                         $PaymentDB=$rowPayment['pay_amount']*1;
 959                                                                         $PaymentDB=$PaymentDB == 0 ? '' : $PaymentDB;
 960
 961                                                                         $resPayment = sqlStatement("SELECT  pay_amount from ar_activity where  session_id ='$payment_id' and
 962                                                                         pid ='$PId' and  encounter  ='$Encounter' and  code='$Code' and modifier='$Modifier'  and pay_amount<0");
 963                                                                         $rowPayment = sqlFetchArray($resPayment);
 964                                                                         $TakebackDB=$rowPayment['pay_amount']*-1;
 965                                                                         $TakebackDB=$TakebackDB == 0 ? '' : $TakebackDB;
 966
 967                                                                         $resPayment = sqlStatement("SELECT  adj_amount from ar_activity where  session_id ='$payment_id' and
 968                                                                         pid ='$PId' and  encounter  ='$Encounter' and  code='$Code' and modifier='$Modifier'  and adj_amount!=0");
 969                                                                         $rowPayment = sqlFetchArray($resPayment);
 970                                                                         $AdjAmountDB=$rowPayment['adj_amount']*1;
 971                                                                         $AdjAmountDB=$AdjAmountDB == 0 ? '' : $AdjAmountDB;
 972
 973                                                                         $resPayment = sqlStatement("SELECT  memo from ar_activity where  session_id ='$payment_id' and
 974                                                                         pid ='$PId' and  encounter  ='$Encounter' and  code='$Code' and modifier='$Modifier'  and memo like 'Deductable%'");
 975                                                                         $rowPayment = sqlFetchArray($resPayment);
 976                                                                         $DeductibleDB=$rowPayment['memo'];
 977                                                                         $DeductibleDB=str_replace('Deductable $','',$DeductibleDB);
 978
 979                                                                         $resPayment = sqlStatement("SELECT  follow_up,follow_up_note from ar_activity where  session_id ='$payment_id' and
 980                                                                         pid ='$PId' and  encounter  ='$Encounter' and  code='$Code' and modifier='$Modifier'  and follow_up = 'y'");
 981                                                                         $rowPayment = sqlFetchArray($resPayment);
 982                                                                         $FollowUpDB=$rowPayment['follow_up'];
 983                                                                         $FollowUpReasonDB=$rowPayment['follow_up_note'];
 984
 985                                                                         $resPayment = sqlStatement("SELECT reason_code from ar_activity where  session_id ='$payment_id' and
 986                                                                         pid ='$PId' and  encounter  ='$Encounter' and  code='$Code' and modifier='$Modifier'");
 987                                                                         $rowPayment = sqlFetchArray($resPayment);
 988                                                                         $ReasonCodeDB=$rowPayment['reason_code'];
 989
 990                                                                         if($Ins==1)
 991                                                                          {
 992                                                                                 $AllowedDB=number_format($Fee-$AdjAmountDB,2);
 993                                                                          }
 994                                                                         else
 995                                                                          {
 996                                                                                 $AllowedDB = 0;
 997                                                                          }
 998                                                                         $AllowedDB=$AllowedDB == 0 ? '' : $AllowedDB;
 999
1000                                                                 if($CountIndex==$TotalRows)
1001                                                                  {
1002                                                                         $StringClass=' bottom left top ';
1003                                                                  }
1004                                                                 else
1005                                                                  {
1006                                                                         $StringClass=' left top ';
1007                                                                  }
1008
1009                                                                 if($Ins==1)
1010                                                                  {
1011                                                                         $bgcolor='#ddddff';
1012                                                                  }
1013                                                                 elseif($Ins==2)
1014                                                                  {
1015                                                                         $bgcolor='#ffdddd';
1016                                                                  }
1017                                                                 elseif($Ins==3)
1018                                                                  {
1019                                                                         $bgcolor='#F2F1BC';
1020                                                                  }
1021                                                                 elseif($Ins==0)
1022                                                                  {
1023                                                                         $bgcolor='#AAFFFF';
1024                                                                  }
1025                                                                  $paymenttot=$paymenttot+$PaymentDB;
1026                                                                  $adjamttot=$adjamttot+$AdjAmountDB;
1027                                                                  $deductibletot=$deductibletot+$DeductibleDB;
1028                                                                  $takebacktot=$takebacktot+$TakebackDB;
1029                                                                  $allowedtot=$allowedtot+$AllowedDB;
1030                                                   ?>
1031                                                   <tr class="text"  bgcolor='<?php echo $bgcolor; ?>' id="trCharges<?php echo $CountIndex; ?>">
1032                                                     <td align="left" class="<?php echo $StringClass; ?>" ><a href="#" onClick="javascript:return DeletePaymentDistribution('<?php echo  htmlspecialchars($payment_id.'_'.$PId.'_'.$Encounter.'_'.$Code.'_'.$Modifier); ?>');" ><img src="../pic/Delete.gif" border="0"/></a></td>
1033                                                     <td align="left" class="<?php echo $StringClass; ?>" ><?php echo htmlspecialchars($NameDB); ?><input name="HiddenPId<?php echo $CountIndex; ?>" value="<?php echo htmlspecialchars($PId); ?>" type="hidden"/></td>
1034                                                         <td align="left" class="<?php echo $StringClass; ?>" ><input name="HiddenIns<?php echo $CountIndex; ?>" id="HiddenIns<?php echo $CountIndex; ?>"  value="<?php echo htmlspecialchars($Ins); ?>" type="hidden"/><?php echo generate_select_list("payment_ins$CountIndex", "payment_ins", "$Ins", "Insurance/Patient",'','','ActionOnInsPat("'.$CountIndex.'")'); ?></td>
1035                                                         <td class="<?php echo $StringClass; ?>" ><?php echo htmlspecialchars($ServiceDate); ?></td>
1036                                                         <td align="right" class="<?php echo $StringClass; ?>" ><input name="HiddenEncounter<?php echo $CountIndex; ?>" value="<?php echo htmlspecialchars($Encounter); ?>" type="hidden"/><?php echo htmlspecialchars($Encounter); ?></td>
1037                                                         <td class="<?php echo $StringClass; ?>" ><input name="HiddenCode<?php echo $CountIndex; ?>" value="<?php echo htmlspecialchars($Code); ?>" type="hidden"/><?php echo htmlspecialchars($Code.$ModifierString); ?><input name="HiddenModifier<?php echo $CountIndex; ?>" value="<?php echo htmlspecialchars($Modifier); ?>" type="hidden"/></td>
1038                                                         <td align="right" class="<?php echo $StringClass; ?>" ><input name="HiddenChargeAmount<?php echo $CountIndex; ?>" id="HiddenChargeAmount<?php echo $CountIndex; ?>"  value="<?php echo htmlspecialchars($Fee); ?>" type="hidden"/><?php echo htmlspecialchars($Fee); ?></td>
1039                                                         <td align="right" class="<?php echo $StringClass; ?>" ><input name="HiddenCopayAmount<?php echo $CountIndex; ?>" id="HiddenCopayAmount<?php echo $CountIndex; ?>"  value="<?php echo htmlspecialchars($Copay); ?>" type="hidden"/><?php echo htmlspecialchars(number_format($Copay,2)); ?></td>
1040                                                         <td align="right"   id="RemainderTd<?php echo $CountIndex; ?>"  class="<?php echo $StringClass; ?>" ><?php echo htmlspecialchars(round($Remainder,2)); ?></td>
1041                                                         <input name="HiddenRemainderTd<?php echo $CountIndex; ?>" id="HiddenRemainderTd<?php echo $CountIndex; ?>"  value="<?php echo htmlspecialchars(round($RemainderJS,2)); ?>" type="hidden"/>
1042                                                         <td class="<?php echo $StringClass; ?>" ><input  name="Allowed<?php echo $CountIndex; ?>" id="Allowed<?php echo $CountIndex; ?>"  onKeyDown="PreventIt(event)"  autocomplete="off"  value="<?php echo htmlspecialchars($AllowedDB); ?>"  onChange="ValidateNumeric(this);ScreenAdjustment(this,<?php echo $CountIndex; ?>);UpdateTotalValues(1,<?php echo $TotalRows; ?>,'Allowed','allowtotal');UpdateTotalValues(1,<?php echo $TotalRows; ?>,'Payment','paymenttotal');UpdateTotalValues(1,<?php echo $TotalRows; ?>,'AdjAmount','AdjAmounttotal');RestoreValues(<?php echo $CountIndex; ?>)"   type="text"   style="width:60px;text-align:right; font-size:12px" /></td>
1043                                                         <td class="<?php echo $StringClass; ?>" ><input   type="text"  name="Payment<?php echo $CountIndex; ?>"  onKeyDown="PreventIt(event)"   autocomplete="off"  id="Payment<?php echo $CountIndex; ?>" value="<?php echo htmlspecialchars($PaymentDB); ?>"  onChange="ValidateNumeric(this);ScreenAdjustment(this,<?php echo $CountIndex; ?>);UpdateTotalValues(1,<?php echo $TotalRows; ?>,'Payment','paymenttotal');RestoreValues(<?php echo $CountIndex; ?>)"  style="width:60px;text-align:right; font-size:12px" /></td>
1044                                                         <td class="<?php echo $StringClass; ?>" ><input  name="AdjAmount<?php echo $CountIndex; ?>"  onKeyDown="PreventIt(event)"   autocomplete="off"  id="AdjAmount<?php echo $CountIndex; ?>"  value="<?php echo htmlspecialchars($AdjAmountDB); ?>"   onChange="ValidateNumeric(this);ScreenAdjustment(this,<?php echo $CountIndex; ?>);UpdateTotalValues(1,<?php echo $TotalRows; ?>,'AdjAmount','AdjAmounttotal');RestoreValues(<?php echo $CountIndex; ?>)"  type="text"   style="width:70px;text-align:right; font-size:12px" /></td>
1045                                                         <td class="<?php echo $StringClass; ?>" ><input  name="Deductible<?php echo $CountIndex; ?>"  id="Deductible<?php echo $CountIndex; ?>"  onKeyDown="PreventIt(event)"  onChange="ValidateNumeric(this);UpdateTotalValues(1,<?php echo $TotalRows; ?>,'Deductible','deductibletotal');"  value="<?php echo htmlspecialchars($DeductibleDB); ?>"   autocomplete="off"   type="text"   style="width:60px;text-align:right; font-size:12px" /></td>
1046                                                         <td class="<?php echo $StringClass; ?>" ><input  name="Takeback<?php echo $CountIndex; ?>"  onKeyDown="PreventIt(event)"   autocomplete="off"   id="Takeback<?php echo $CountIndex; ?>"   value="<?php echo htmlspecialchars($TakebackDB); ?>"   onChange="ValidateNumeric(this);ScreenAdjustment(this,<?php echo $CountIndex; ?>);UpdateTotalValues(1,<?php echo $TotalRows; ?>,'Takeback','takebacktotal');RestoreValues(<?php echo $CountIndex; ?>)"   type="text"   style="width:60px;text-align:right; font-size:12px" /></td>
1047                                                         <td align="left" class="<?php echo $StringClass; ?>" ><input name="HiddenReasonCode<?php echo $CountIndex; ?>" id="HiddenReasonCode<?php echo $CountIndex; ?>"  value="<?php echo htmlspecialchars($ReasonCodeDB); ?>" type="hidden"/><?php echo generate_select_list( "ReasonCode$CountIndex", "msp_remit_codes", "$ReasonCodeDB", "MSP Code" ); ?></td>
1048                                                         <td align="center" class="<?php echo $StringClass; ?>" ><input type="checkbox" id="FollowUp<?php echo $CountIndex; ?>"  name="FollowUp<?php echo $CountIndex; ?>" value="y" onClick="ActionFollowUp(<?php echo $CountIndex; ?>)" <?php echo $FollowUpDB=='y' ? ' checked ' : ''; ?> /></td>
1049                                                         <td class="<?php echo $StringClass; ?> right" ><input  onKeyDown="PreventIt(event)" id="FollowUpReason<?php echo $CountIndex; ?>"    name="FollowUpReason<?php echo $CountIndex; ?>"  <?php echo $FollowUpDB=='y' ? '' : ' readonly '; ?>  type="text"  value="<?php echo htmlspecialchars($FollowUpReasonDB); ?>"    style="width:110px;font-size:12px" /></td>
1050                                                   </tr>
1051                                                 <?php
1052
1053
1054                                                          }//while ($RowSearch = sqlFetchArray($ResultSearch))
1055                                                 ?>
1056                                                 <?php
1057                                                  }//if(sqlNumRows($ResultSearch)>0)
1058
1059                                                  }while ($RowSearchSub = sqlFetchArray($ResultSearchSub));
1060                                                 if($Table=='yes')
1061                                                  {
1062                                                 ?>
1063                                                  <tr class="text">
1064                                                     <td align="left" colspan="9">&nbsp;</td>
1065                                                 <td class="left bottom" bgcolor="#6699FF" id="allowtotal" align="right" ><?php echo htmlspecialchars(number_format($allowedtot,2)); ?></td>
1066                                                 <td class="left bottom" bgcolor="#6699FF" id="paymenttotal" align="right" ><?php echo htmlspecialchars(number_format($paymenttot,2)); ?></td>
1067                                                         <td class="left bottom" bgcolor="#6699FF" id="AdjAmounttotal" align="right" ><?php echo htmlspecialchars(number_format($adjamttot,2)); ?></td>
1068                                                 <td class="left bottom" bgcolor="#6699FF" id="deductibletotal" align="right"><?php echo htmlspecialchars(number_format($deductibletot,2)); ?></td>
1069                                                     <td class="left bottom right" bgcolor="#6699FF" id="takebacktotal" align="right"><?php echo htmlspecialchars(number_format($takebacktot,2)); ?></td>
1070                                                     <td  align="center">&nbsp;</td>
1071                                                     <td  align="center">&nbsp;</td>
1072                                           </tr>
1073                                                 </table>
1074                                                 <?php
1075                                                 }
1076                                                 ?>
1077                                                 <?php
1078
1079                                                 echo '<br/>';
1080
1081                                 }//if($RowSearchSub = sqlFetchArray($ResultSearchSub))
1082                                 ?>                  </td>
1083                   </tr>
1084                   <tr>
1085                     <td colspan="13" align="left" >
1086                                 <?php
1087                                 require_once("payment_pat_sel.inc.php"); //Patient ajax section and listing of charges.
1088                                 ?>
1089                         </td>
1090               </tr>
1091                   <tr>
1092                         <td colspan="13" align="left" >
1093                                 <table border="0" cellspacing="0" cellpadding="0" width="217" align="center">
1094                                   <tr height="5">
1095                                         <td ></td>
1096                                         <td ></td>
1097                                         <td></td>
1098                                   </tr>
1099                                   <tr>
1100                                         <td width="110"><a href="#" onClick="javascript:return ModifyPayments();"  class="css_button"><span><?php echo htmlspecialchars( xl('Modify Payments'), ENT_QUOTES);?></span></a>
1101                                         </td>
1102                                         <td width="107"><a href="#" onClick="javascript:return FinishPayments();"  class="css_button"><span><?php echo htmlspecialchars( xl('Finish Payments'), ENT_QUOTES);?></span></a>
1103                                         </td>
1104                                   </tr>
1105                                 </table>
1106
1107                 <?php
1108                  }//if($payment_id*1>0)
1109                 ?>              </td>
1110           </tr>
1111         </table>
1112         </td></tr></table>
1113
1114 <input type="hidden" name="hidden_patient_code" id="hidden_patient_code" value="<?php echo htmlspecialchars($hidden_patient_code);?>"/>
1115 <input type='hidden' name='mode' id='mode' value='' />
1116 <input type='hidden' name='ajax_mode' id='ajax_mode' value='' />
1117 <input type="hidden" name="after_value" id="after_value" value="<?php echo htmlspecialchars($_POST["mode"]);?>"/>
1118 <input type="hidden" name="payment_id" id="payment_id" value="<?php echo htmlspecialchars($payment_id);?>"/>
1119 <input type="hidden" name="hidden_type_code" id="hidden_type_code" value="<?php echo htmlspecialchars($TypeCode);?>"/>
1120 <input type='hidden' name='global_amount' id='global_amount' value='' />
1121 <input type='hidden' name='DeletePaymentDistributionId' id='DeletePaymentDistributionId' value='' />
1122 <input type="hidden" name="ActionStatus" id="ActionStatus" value="<?php echo htmlspecialchars($Message);?>"/>
1123 <input type='hidden' name='CountIndexAbove' id='CountIndexAbove' value='<?php echo htmlspecialchars($CountIndexAbove*1);?>' />
1124 <input type='hidden' name='CountIndexBelow' id='CountIndexBelow' value='<?php echo htmlspecialchars($CountIndexBelow*1);?>' />
1125 <input type="hidden" name="ParentPage" id="ParentPage" value="<?php echo htmlspecialchars($_REQUEST['ParentPage']);?>"/>
1126 </form>
1127
1128 </body>
1129 </html>