[* $dataref = $param[0]; $site_url = $param[1]; $vendor_id = $param[2]; $recarr = $param[3]; $escmode = 0; *] [+ $dataref->{HEADER} +] [+$dataref->{'leftNavVendor'}+] [* $entry_type = ''; if($dataref->{'network_id'} == 3) { if($dataref->{'noe'} eq 'new') { $entry_type = qq~ ~; } elsif($dataref->{'noe'} eq 'existing') { $entry_type = qq~ ~; } else { $entry_type = qq~ ~; } $entry_type = qq~ ~; } *]
 

[+$dataref->{'title'}+]


 
[+ $entry_type +]
From -   
 
[* $html = ''; foreach $ha (@$recarr) { $ha->{BASIC_AMT} = sprintf "%.2f", $ha->{BASIC_AMT}; $ha->{BONUS_AMT} = sprintf "%.2f", $ha->{BONUS_AMT}; $ha->{TOTAL_AMT} = sprintf "%.2f", $ha->{TOTAL_AMT}; $dataref->{'from_date'} = $dataref->{'from_date'} || ''; $dataref->{'to_date'} = $dataref->{'to_date'} || ''; $html .= qq~ $ha->{OPERATOR_NAME} ~; if($ha->{TENTRY_CNT}) { $html .= qq~$ha->{TENTRY_CNT}~; } else { $html .= qq~0~; } if($ha->{AENTRY_CNT}) { $html .= qq~$ha->{AENTRY_CNT}~; } else { $html .= qq~0~; } if($ha->{PENTRY_CNT}) { $html .= qq~$ha->{PENTRY_CNT}~; } else { $html .= qq~0~; } if($ha->{RENTRY_CNT}) { $html .= qq~$ha->{RENTRY_CNT}~; } else { $html .= qq~0~; } if($ha->{BENTRY_CNT}) { $html .= qq~$ha->{BENTRY_CNT}~; } else { $html .= qq~0~; } if($ha->{SENTRY_CNT}) { $html .= qq~$ha->{SENTRY_CNT}~; } else { $html .= qq~0~; } if($ha->{BASIC_AMT}) { $html .= qq~$ha->{BASIC_AMT}~; } else { $html .= qq~0~; } if($ha->{BONUS_AMT}) { $html .= qq~$ha->{BONUS_AMT}~; } else { $html .= qq~0~; } if($ha->{TOTAL_AMT}) { $html .= qq~$ha->{TOTAL_AMT}~; } else { $html .= qq~0~; } $html .= qq~~; $total->{TENTRY_CNT} += $ha->{TENTRY_CNT} || 0; $total->{AENTRY_CNT} += $ha->{AENTRY_CNT} || 0; $total->{PENTRY_CNT} += $ha->{PENTRY_CNT} || 0; $total->{RENTRY_CNT} += $ha->{RENTRY_CNT} || 0; $total->{BENTRY_CNT} += $ha->{BENTRY_CNT} || 0; $total->{SENTRY_CNT} += $ha->{SENTRY_CNT} || 0; $total->{BASIC_AMT} += $ha->{BASIC_AMT} || 0; $total->{BONUS_AMT} += $ha->{BONUS_AMT} || 0; $total->{TOTAL_AMT} += $ha->{TOTAL_AMT} || 0; $total->{VENDOR_CURRENCY_NAME}= $ha->{VENDOR_CURRENCY_NAME} || ''; } *] [* if($html ne '') { $html .= qq~ Total~; $total->{BASIC_AMT} = sprintf "%.2f", $total->{BASIC_AMT}; $total->{BONUS_AMT} = sprintf "%.2f", $total->{BONUS_AMT}; $total->{TOTAL_AMT} = sprintf "%.2f", $total->{TOTAL_AMT}; if($total->{TENTRY_CNT}) { $html .= qq~$total->{TENTRY_CNT}~; } else { $html .= qq~0~; } if($total->{AENTRY_CNT}) { $html .= qq~$total->{AENTRY_CNT}~; } else { $html .= qq~0~; } if($total->{PENTRY_CNT}) { $html .= qq~$total->{PENTRY_CNT}~; } else { $html .= qq~0~; } if($total->{RENTRY_CNT}) { $html .= qq~$total->{RENTRY_CNT}~; } else { $html .= qq~0~; } if($total->{BENTRY_CNT}) { $html .= qq~$total->{BENTRY_CNT}~; } else { $html .= qq~0~; } if($total->{SENTRY_CNT}) { $html .= qq~$total->{SENTRY_CNT}~; } else { $html .= qq~0~; } if($total->{BASIC_AMT}) { $html .= qq~$total->{BASIC_AMT}~; } else { $html .= qq~0~; } if($total->{BONUS_AMT}) { $html .= qq~$total->{BONUS_AMT}~; } else { $html .= qq~0~; } if($total->{TOTAL_AMT}) { $html .= qq~$total->{TOTAL_AMT}~; } else { $html .= qq~0~; } $html .= qq~~; *] [+ $html +]
Operator Name Records Amount Total Pay
T A P R B S Basic Bonus
[* } else { *] Record Not Found. [* } *]
 
 
 
[+ $dataref->{FOOTER} +]