2018-01-02 18:12:05 +01:00
// Copyright (c) 2011-2017 The Bitcoin Core developers
2014-12-13 05:09:33 +01:00
// Distributed under the MIT software license, see the accompanying
2013-11-04 16:20:43 +01:00
// file COPYING or http://www.opensource.org/licenses/mit-license.php.
2017-11-10 01:57:53 +01:00
# include <qt/transactiondesc.h>
2011-06-10 15:05:51 +02:00
2017-11-10 01:57:53 +01:00
# include <qt/bitcoinunits.h>
# include <qt/guiutil.h>
# include <qt/paymentserver.h>
# include <qt/transactionrecord.h>
2013-04-13 07:13:08 +02:00
2017-11-10 01:57:53 +01:00
# include <consensus/consensus.h>
2018-04-07 09:42:02 +02:00
# include <interfaces/node.h>
2017-09-20 03:12:25 +02:00
# include <key_io.h>
2017-11-10 01:57:53 +01:00
# include <validation.h>
# include <script/script.h>
# include <timedata.h>
# include <util.h>
# include <wallet/db.h>
# include <wallet/wallet.h>
2018-03-01 21:55:01 +01:00
# include <policy/policy.h>
2011-06-10 15:05:51 +02:00
2013-04-13 07:13:08 +02:00
# include <stdint.h>
2013-01-23 21:51:02 +01:00
# include <string>
2018-04-07 09:42:02 +02:00
QString TransactionDesc : : FormatTxStatus ( const interfaces : : WalletTx & wtx , const interfaces : : WalletTxStatus & status , bool inMempool , int numBlocks , int64_t adjustedTime )
2011-06-10 15:05:51 +02:00
{
2017-04-18 22:42:30 +02:00
if ( ! status . is_final )
2011-06-10 15:05:51 +02:00
{
2016-11-12 01:54:51 +01:00
if ( wtx . tx - > nLockTime < LOCKTIME_THRESHOLD )
2017-04-18 22:42:30 +02:00
return tr ( " Open for %n more block(s) " , " " , wtx.tx->nLockTime - numBlocks) ;
2011-06-10 15:05:51 +02:00
else
2016-11-12 01:54:51 +01:00
return tr ( " Open until %1 " ) . arg ( GUIUtil : : dateTimeStr ( wtx . tx - > nLockTime ) ) ;
2011-06-10 15:05:51 +02:00
}
else
{
2017-04-18 22:42:30 +02:00
int nDepth = status . depth_in_main_chain ;
2014-02-12 19:43:07 +01:00
if ( nDepth < 0 )
2015-11-30 16:15:15 +01:00
return tr ( " conflicted with a transaction with %1 confirmations " ) . arg ( - nDepth ) ;
2017-04-18 22:42:30 +02:00
else if ( adjustedTime - status . time_received > 2 * 60 & & status . request_count = = 0 )
2012-07-03 14:37:51 +02:00
return tr ( " %1/offline " ) . arg ( nDepth ) ;
2015-11-30 16:15:15 +01:00
else if ( nDepth = = 0 )
2017-04-18 22:42:30 +02:00
return tr ( " 0/unconfirmed, %1 " ) . arg ( ( inMempool ? tr ( " in memory pool " ) : tr ( " not in memory pool " ) ) ) + ( status . is_abandoned ? " , " + tr ( " abandoned " ) : " " ) ;
2011-06-10 15:05:51 +02:00
else if ( nDepth < 6 )
2011-08-08 17:38:17 +02:00
return tr ( " %1/unconfirmed " ) . arg ( nDepth ) ;
2011-06-10 15:05:51 +02:00
else
2011-08-08 17:38:17 +02:00
return tr ( " %1 confirmations " ) . arg ( nDepth ) ;
2011-06-10 15:05:51 +02:00
}
}
2018-04-07 09:42:02 +02:00
QString TransactionDesc : : toHTML ( interfaces : : Node & node , interfaces : : Wallet & wallet , TransactionRecord * rec , int unit )
2011-06-10 15:05:51 +02:00
{
2017-04-18 22:42:30 +02:00
int numBlocks ;
int64_t adjustedTime ;
2018-04-07 09:42:02 +02:00
interfaces : : WalletTxStatus status ;
interfaces : : WalletOrderForm orderForm ;
2017-04-18 22:42:30 +02:00
bool inMempool ;
2018-04-07 09:42:02 +02:00
interfaces : : WalletTx wtx = wallet . getWalletTxDetails ( rec - > hash , status , orderForm , inMempool , numBlocks , adjustedTime ) ;
2017-04-18 22:42:30 +02:00
2011-08-08 17:38:17 +02:00
QString strHTML ;
2012-04-06 18:39:12 +02:00
2014-04-15 17:38:25 +02:00
strHTML . reserve ( 4000 ) ;
strHTML + = " <html><font face='verdana, arial, helvetica, sans-serif'> " ;
2017-04-18 22:42:30 +02:00
int64_t nTime = wtx . time ;
CAmount nCredit = wtx . credit ;
CAmount nDebit = wtx . debit ;
2014-04-23 00:46:19 +02:00
CAmount nNet = nCredit - nDebit ;
2014-04-15 17:38:25 +02:00
2017-04-18 22:42:30 +02:00
strHTML + = " <b> " + tr ( " Status " ) + " :</b> " + FormatTxStatus ( wtx , status , inMempool , numBlocks , adjustedTime ) ;
int nRequests = status . request_count ;
2014-04-15 17:38:25 +02:00
if ( nRequests ! = - 1 )
2011-06-10 15:05:51 +02:00
{
2014-04-15 17:38:25 +02:00
if ( nRequests = = 0 )
strHTML + = tr ( " , has not been successfully broadcast yet " ) ;
else if ( nRequests > 0 )
strHTML + = tr ( " , broadcast through %n node(s) " , " " , nRequests ) ;
}
strHTML + = " <br> " ;
2011-06-10 15:05:51 +02:00
2014-04-15 17:38:25 +02:00
strHTML + = " <b> " + tr ( " Date " ) + " :</b> " + ( nTime ? GUIUtil : : dateTimeStr ( nTime ) : " " ) + " <br> " ;
2011-06-10 15:05:51 +02:00
2014-04-15 17:38:25 +02:00
//
// From
//
2017-04-18 22:42:30 +02:00
if ( wtx . is_coinbase )
2014-04-15 17:38:25 +02:00
{
strHTML + = " <b> " + tr ( " Source " ) + " :</b> " + tr ( " Generated " ) + " <br> " ;
}
2017-04-18 22:42:30 +02:00
else if ( wtx . value_map . count ( " from " ) & & ! wtx . value_map [ " from " ] . empty ( ) )
2014-04-15 17:38:25 +02:00
{
// Online transaction
2017-04-18 22:42:30 +02:00
strHTML + = " <b> " + tr ( " From " ) + " :</b> " + GUIUtil : : HtmlEscape ( wtx . value_map [ " from " ] ) + " <br> " ;
2014-04-15 17:38:25 +02:00
}
else
{
// Offline transaction
if ( nNet > 0 )
2011-06-10 15:05:51 +02:00
{
2014-04-15 17:38:25 +02:00
// Credit
2017-09-06 22:44:33 +02:00
CTxDestination address = DecodeDestination ( rec - > address ) ;
if ( IsValidDestination ( address ) ) {
2017-04-18 22:42:30 +02:00
std : : string name ;
isminetype ismine ;
if ( wallet . getAddress ( address , & name , & ismine ) )
2011-06-10 15:05:51 +02:00
{
2014-06-19 01:42:39 +02:00
strHTML + = " <b> " + tr ( " From " ) + " :</b> " + tr ( " unknown " ) + " <br> " ;
strHTML + = " <b> " + tr ( " To " ) + " :</b> " ;
strHTML + = GUIUtil : : HtmlEscape ( rec - > address ) ;
2017-04-18 22:42:30 +02:00
QString addressOwned = ismine = = ISMINE_SPENDABLE ? tr ( " own address " ) : tr ( " watch-only " ) ;
if ( ! name . empty ( ) )
strHTML + = " ( " + addressOwned + " , " + tr ( " label " ) + " : " + GUIUtil : : HtmlEscape ( name ) + " ) " ;
2014-06-19 01:42:39 +02:00
else
strHTML + = " ( " + addressOwned + " ) " ;
strHTML + = " <br> " ;
2011-06-10 15:05:51 +02:00
}
}
}
2014-04-15 17:38:25 +02:00
}
//
// To
//
2017-04-18 22:42:30 +02:00
if ( wtx . value_map . count ( " to " ) & & ! wtx . value_map [ " to " ] . empty ( ) )
2014-04-15 17:38:25 +02:00
{
// Online transaction
2017-04-18 22:42:30 +02:00
std : : string strAddress = wtx . value_map [ " to " ] ;
2014-04-15 17:38:25 +02:00
strHTML + = " <b> " + tr ( " To " ) + " :</b> " ;
2017-08-23 03:02:33 +02:00
CTxDestination dest = DecodeDestination ( strAddress ) ;
2017-04-18 22:42:30 +02:00
std : : string name ;
if ( wallet . getAddress ( dest , & name ) & & ! name . empty ( ) )
strHTML + = GUIUtil : : HtmlEscape ( name ) + " " ;
2014-04-15 17:38:25 +02:00
strHTML + = GUIUtil : : HtmlEscape ( strAddress ) + " <br> " ;
}
2011-06-10 15:05:51 +02:00
2014-04-15 17:38:25 +02:00
//
// Amount
//
2017-04-18 22:42:30 +02:00
if ( wtx . is_coinbase & & nCredit = = 0 )
2014-04-15 17:38:25 +02:00
{
2011-06-10 15:05:51 +02:00
//
2014-04-15 17:38:25 +02:00
// Coinbase
2011-06-10 15:05:51 +02:00
//
2014-04-23 00:46:19 +02:00
CAmount nUnmatured = 0 ;
2017-06-02 03:18:57 +02:00
for ( const CTxOut & txout : wtx . tx - > vout )
2017-04-18 22:42:30 +02:00
nUnmatured + = wallet . getCredit ( txout , ISMINE_ALL ) ;
2014-04-15 17:38:25 +02:00
strHTML + = " <b> " + tr ( " Credit " ) + " :</b> " ;
2017-04-18 22:42:30 +02:00
if ( status . is_in_main_chain )
strHTML + = BitcoinUnits : : formatHtmlWithUnit ( unit , nUnmatured ) + " ( " + tr ( " matures in %n more block(s) " , " " , status . blocks_to_maturity ) + " ) " ;
2014-04-15 17:38:25 +02:00
else
strHTML + = " ( " + tr ( " not accepted " ) + " ) " ;
strHTML + = " <br> " ;
}
else if ( nNet > 0 )
{
2011-06-10 15:05:51 +02:00
//
2014-04-15 17:38:25 +02:00
// Credit
2011-06-10 15:05:51 +02:00
//
2014-05-10 00:50:09 +02:00
strHTML + = " <b> " + tr ( " Credit " ) + " :</b> " + BitcoinUnits : : formatHtmlWithUnit ( unit , nNet ) + " <br> " ;
2014-04-15 17:38:25 +02:00
}
else
{
2014-07-01 11:00:22 +02:00
isminetype fAllFromMe = ISMINE_SPENDABLE ;
2017-04-18 22:42:30 +02:00
for ( isminetype mine : wtx . txin_is_mine )
2014-03-29 05:15:28 +01:00
{
if ( fAllFromMe > mine ) fAllFromMe = mine ;
}
2014-04-15 17:38:25 +02:00
2014-07-01 11:00:22 +02:00
isminetype fAllToMe = ISMINE_SPENDABLE ;
2017-04-18 22:42:30 +02:00
for ( isminetype mine : wtx . txout_is_mine )
2014-03-29 05:15:28 +01:00
{
if ( fAllToMe > mine ) fAllToMe = mine ;
}
2014-04-15 17:38:25 +02:00
if ( fAllFromMe )
2011-06-10 15:05:51 +02:00
{
2015-06-10 08:36:36 +02:00
if ( fAllFromMe & ISMINE_WATCH_ONLY )
2014-03-29 05:15:28 +01:00
strHTML + = " <b> " + tr ( " From " ) + " :</b> " + tr ( " watch-only " ) + " <br> " ;
2011-06-10 15:05:51 +02:00
//
2014-04-15 17:38:25 +02:00
// Debit
2011-06-10 15:05:51 +02:00
//
2017-04-18 22:42:30 +02:00
auto mine = wtx . txout_is_mine . begin ( ) ;
2017-06-02 03:18:57 +02:00
for ( const CTxOut & txout : wtx . tx - > vout )
2011-06-10 15:05:51 +02:00
{
2014-03-29 05:15:28 +01:00
// Ignore change
2017-04-18 22:42:30 +02:00
isminetype toSelf = * ( mine + + ) ;
2014-07-01 11:00:22 +02:00
if ( ( toSelf = = ISMINE_SPENDABLE ) & & ( fAllFromMe = = ISMINE_SPENDABLE ) )
2014-04-15 17:38:25 +02:00
continue ;
2011-06-10 15:05:51 +02:00
2017-04-18 22:42:30 +02:00
if ( ! wtx . value_map . count ( " to " ) | | wtx . value_map [ " to " ] . empty ( ) )
2014-04-15 17:38:25 +02:00
{
// Offline transaction
CTxDestination address ;
if ( ExtractDestination ( txout . scriptPubKey , address ) )
2011-06-10 15:05:51 +02:00
{
2014-04-15 17:38:25 +02:00
strHTML + = " <b> " + tr ( " To " ) + " :</b> " ;
2017-04-18 22:42:30 +02:00
std : : string name ;
if ( wallet . getAddress ( address , & name ) & & ! name . empty ( ) )
strHTML + = GUIUtil : : HtmlEscape ( name ) + " " ;
2017-08-23 03:02:33 +02:00
strHTML + = GUIUtil : : HtmlEscape ( EncodeDestination ( address ) ) ;
2014-07-01 11:00:22 +02:00
if ( toSelf = = ISMINE_SPENDABLE )
2014-03-29 05:15:28 +01:00
strHTML + = " (own address) " ;
2015-06-10 08:36:36 +02:00
else if ( toSelf & ISMINE_WATCH_ONLY )
2014-03-29 05:15:28 +01:00
strHTML + = " (watch-only) " ;
2014-04-15 17:38:25 +02:00
strHTML + = " <br> " ;
2011-06-10 15:05:51 +02:00
}
}
2014-05-10 00:50:09 +02:00
strHTML + = " <b> " + tr ( " Debit " ) + " :</b> " + BitcoinUnits : : formatHtmlWithUnit ( unit , - txout . nValue ) + " <br> " ;
2014-03-29 05:15:28 +01:00
if ( toSelf )
2014-07-07 23:06:21 +02:00
strHTML + = " <b> " + tr ( " Credit " ) + " :</b> " + BitcoinUnits : : formatHtmlWithUnit ( unit , txout . nValue ) + " <br> " ;
2011-06-10 15:05:51 +02:00
}
2014-04-15 17:38:25 +02:00
if ( fAllToMe )
2011-06-10 15:05:51 +02:00
{
2014-04-15 17:38:25 +02:00
// Payment to self
2017-04-18 22:42:30 +02:00
CAmount nChange = wtx . change ;
2014-04-23 00:46:19 +02:00
CAmount nValue = nCredit - nChange ;
2014-07-07 23:06:21 +02:00
strHTML + = " <b> " + tr ( " Total debit " ) + " :</b> " + BitcoinUnits : : formatHtmlWithUnit ( unit , - nValue ) + " <br> " ;
strHTML + = " <b> " + tr ( " Total credit " ) + " :</b> " + BitcoinUnits : : formatHtmlWithUnit ( unit , nValue ) + " <br> " ;
2011-06-10 15:05:51 +02:00
}
2014-04-15 17:38:25 +02:00
2016-11-12 01:54:51 +01:00
CAmount nTxFee = nDebit - wtx . tx - > GetValueOut ( ) ;
2014-04-15 17:38:25 +02:00
if ( nTxFee > 0 )
2014-05-10 00:50:09 +02:00
strHTML + = " <b> " + tr ( " Transaction fee " ) + " :</b> " + BitcoinUnits : : formatHtmlWithUnit ( unit , - nTxFee ) + " <br> " ;
2011-06-10 15:05:51 +02:00
}
2014-04-15 17:38:25 +02:00
else
{
//
// Mixed debit transaction
//
2017-04-18 22:42:30 +02:00
auto mine = wtx . txin_is_mine . begin ( ) ;
for ( const CTxIn & txin : wtx . tx - > vin ) {
if ( * ( mine + + ) ) {
strHTML + = " <b> " + tr ( " Debit " ) + " :</b> " + BitcoinUnits : : formatHtmlWithUnit ( unit , - wallet . getDebit ( txin , ISMINE_ALL ) ) + " <br> " ;
}
}
mine = wtx . txout_is_mine . begin ( ) ;
for ( const CTxOut & txout : wtx . tx - > vout ) {
if ( * ( mine + + ) ) {
strHTML + = " <b> " + tr ( " Credit " ) + " :</b> " + BitcoinUnits : : formatHtmlWithUnit ( unit , wallet . getCredit ( txout , ISMINE_ALL ) ) + " <br> " ;
}
}
2014-04-15 17:38:25 +02:00
}
}
2011-06-10 15:05:51 +02:00
2014-05-10 00:50:09 +02:00
strHTML + = " <b> " + tr ( " Net amount " ) + " :</b> " + BitcoinUnits : : formatHtmlWithUnit ( unit , nNet , true ) + " <br> " ;
2011-06-10 15:05:51 +02:00
2014-04-15 17:38:25 +02:00
//
// Message
//
2017-04-18 22:42:30 +02:00
if ( wtx . value_map . count ( " message " ) & & ! wtx . value_map [ " message " ] . empty ( ) )
strHTML + = " <br><b> " + tr ( " Message " ) + " :</b><br> " + GUIUtil : : HtmlEscape ( wtx . value_map [ " message " ] , true ) + " <br> " ;
if ( wtx . value_map . count ( " comment " ) & & ! wtx . value_map [ " comment " ] . empty ( ) )
strHTML + = " <br><b> " + tr ( " Comment " ) + " :</b><br> " + GUIUtil : : HtmlEscape ( wtx . value_map [ " comment " ] , true ) + " <br> " ;
2011-06-10 15:05:51 +02:00
2018-03-06 21:22:50 +01:00
strHTML + = " <b> " + tr ( " Transaction ID " ) + " :</b> " + rec - > getTxHash ( ) + " <br> " ;
2016-11-12 01:54:51 +01:00
strHTML + = " <b> " + tr ( " Transaction total size " ) + " :</b> " + QString : : number ( wtx . tx - > GetTotalSize ( ) ) + " bytes<br> " ;
2018-03-01 21:55:01 +01:00
strHTML + = " <b> " + tr ( " Transaction virtual size " ) + " :</b> " + QString : : number ( GetVirtualTransactionSize ( * wtx . tx ) ) + " bytes<br> " ;
2016-03-29 11:17:47 +02:00
strHTML + = " <b> " + tr ( " Output index " ) + " :</b> " + QString : : number ( rec - > getOutputIndex ( ) ) + " <br> " ;
2012-01-10 19:25:02 +01:00
2014-04-15 17:38:25 +02:00
// Message from normal bitcoin:URI (bitcoin:123...?message=example)
2017-04-18 22:42:30 +02:00
for ( const std : : pair < std : : string , std : : string > & r : orderForm )
2014-04-15 17:38:25 +02:00
if ( r . first = = " Message " )
strHTML + = " <br><b> " + tr ( " Message " ) + " :</b><br> " + GUIUtil : : HtmlEscape ( r . second , true ) + " <br> " ;
2014-01-21 23:39:29 +01:00
2014-04-15 17:38:25 +02:00
//
// PaymentRequest info:
//
2017-04-18 22:42:30 +02:00
for ( const std : : pair < std : : string , std : : string > & r : orderForm )
2014-04-15 17:38:25 +02:00
{
if ( r . first = = " PaymentRequest " )
2013-07-22 08:50:39 +02:00
{
2014-04-15 17:38:25 +02:00
PaymentRequestPlus req ;
req . parse ( QByteArray : : fromRawData ( r . second . data ( ) , r . second . size ( ) ) ) ;
QString merchant ;
if ( req . getMerchant ( PaymentServer : : getCertStore ( ) , merchant ) )
strHTML + = " <b> " + tr ( " Merchant " ) + " :</b> " + GUIUtil : : HtmlEscape ( merchant ) + " <br> " ;
2013-07-22 08:50:39 +02:00
}
2014-04-15 17:38:25 +02:00
}
2013-07-22 08:50:39 +02:00
2017-04-18 22:42:30 +02:00
if ( wtx . is_coinbase )
2014-04-15 17:38:25 +02:00
{
quint32 numBlocksToMaturity = COINBASE_MATURITY + 1 ;
strHTML + = " <br> " + tr ( " Generated coins must mature %1 blocks before they can be spent. When you generated this block, it was broadcast to the network to be added to the block chain. If it fails to get into the chain, its state will change to \" not accepted \" and it won't be spendable. This may occasionally happen if another node generates a block within a few seconds of yours. " ) . arg ( QString : : number ( numBlocksToMaturity ) ) + " <br> " ;
}
2011-06-10 15:05:51 +02:00
2014-04-15 17:38:25 +02:00
//
// Debug view
//
2017-04-18 22:42:30 +02:00
if ( node . getLogCategories ( ) ! = BCLog : : NONE )
2014-04-15 17:38:25 +02:00
{
strHTML + = " <hr><br> " + tr ( " Debug information " ) + " <br><br> " ;
2017-06-02 03:18:57 +02:00
for ( const CTxIn & txin : wtx . tx - > vin )
2017-04-18 22:42:30 +02:00
if ( wallet . txinIsMine ( txin ) )
strHTML + = " <b> " + tr ( " Debit " ) + " :</b> " + BitcoinUnits : : formatHtmlWithUnit ( unit , - wallet . getDebit ( txin , ISMINE_ALL ) ) + " <br> " ;
2017-06-02 03:18:57 +02:00
for ( const CTxOut & txout : wtx . tx - > vout )
2017-04-18 22:42:30 +02:00
if ( wallet . txoutIsMine ( txout ) )
strHTML + = " <b> " + tr ( " Credit " ) + " :</b> " + BitcoinUnits : : formatHtmlWithUnit ( unit , wallet . getCredit ( txout , ISMINE_ALL ) ) + " <br> " ;
2014-04-15 17:38:25 +02:00
strHTML + = " <br><b> " + tr ( " Transaction " ) + " :</b><br> " ;
2016-11-12 01:54:51 +01:00
strHTML + = GUIUtil : : HtmlEscape ( wtx . tx - > ToString ( ) , true ) ;
2011-06-10 15:05:51 +02:00
2014-04-15 17:38:25 +02:00
strHTML + = " <br><b> " + tr ( " Inputs " ) + " :</b> " ;
strHTML + = " <ul> " ;
2011-06-10 15:05:51 +02:00
2017-06-02 03:18:57 +02:00
for ( const CTxIn & txin : wtx . tx - > vin )
2014-04-15 17:38:25 +02:00
{
COutPoint prevout = txin . prevout ;
2012-04-06 18:39:12 +02:00
2017-04-25 20:29:39 +02:00
Coin prev ;
2017-04-18 22:42:30 +02:00
if ( node . getUnspentOutput ( prevout , prev ) )
2011-06-10 15:05:51 +02:00
{
{
2014-04-15 17:38:25 +02:00
strHTML + = " <li> " ;
2017-04-25 20:29:39 +02:00
const CTxOut & vout = prev . out ;
2014-04-15 17:38:25 +02:00
CTxDestination address ;
if ( ExtractDestination ( vout . scriptPubKey , address ) )
2011-06-10 15:05:51 +02:00
{
2017-04-18 22:42:30 +02:00
std : : string name ;
if ( wallet . getAddress ( address , & name ) & & ! name . empty ( ) )
strHTML + = GUIUtil : : HtmlEscape ( name ) + " " ;
2017-08-23 03:02:33 +02:00
strHTML + = QString : : fromStdString ( EncodeDestination ( address ) ) ;
2011-06-10 15:05:51 +02:00
}
2014-05-10 00:50:09 +02:00
strHTML = strHTML + " " + tr ( " Amount " ) + " = " + BitcoinUnits : : formatHtmlWithUnit ( unit , vout . nValue ) ;
2017-04-18 22:42:30 +02:00
strHTML = strHTML + " IsMine= " + ( wallet . txoutIsMine ( vout ) & ISMINE_SPENDABLE ? tr ( " true " ) : tr ( " false " ) ) + " </li> " ;
strHTML = strHTML + " IsWatchOnly= " + ( wallet . txoutIsMine ( vout ) & ISMINE_WATCH_ONLY ? tr ( " true " ) : tr ( " false " ) ) + " </li> " ;
2011-06-10 15:05:51 +02:00
}
}
}
2014-04-15 17:38:25 +02:00
strHTML + = " </ul> " ;
2011-06-10 15:05:51 +02:00
}
2014-04-15 17:38:25 +02:00
strHTML + = " </font></html> " ;
2011-06-10 15:05:51 +02:00
return strHTML ;
}
