project QadFinancials > class TReportStrings > method Main6

Description

extension of the Main method


Parameters


ihTranslationHandleinputhandle
oiReturnStatusoutputintegerReturn status of the method.


Internal usage


QadFinancials
method TReportStrings.Main


program code (program1/treportstrings.p)


create tReportStrings. 
assign tReportStrings.tcStringText = #T-2'Tax Number Declarant':255(733702133)T-2#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "VATYearlyListingBE":U
       tReportStrings.tcStringCode = "YTLTaxNumberDeclarant":U.

create tReportStrings. 
assign tReportStrings.tcStringText = #T-4'Year':255(73422370)T-4#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "VATYearlyListingBE":U
       tReportStrings.tcStringCode = "YTLYear":U.

create tReportStrings. 
assign tReportStrings.tcStringText = #T-7'Page':255(413914712)T-7#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "VATYearlyListingBE":U
       tReportStrings.tcStringCode = "YTLPage":U.

create tReportStrings. 
assign tReportStrings.tcStringText = #T-9'of':255(591237675)T-9#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "VATYearlyListingBE":U
       tReportStrings.tcStringCode = "YTLOF":U.

create tReportStrings. 
assign tReportStrings.tcStringText = #T-11'Declaration Date':255(332018031)T-11#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "VATYearlyListingBE":U
       tReportStrings.tcStringCode = "YTLDeclarationDate":U.

create tReportStrings. 
assign tReportStrings.tcStringText = #T-13'Name and Address of Declarant':255(227600511)T-13#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "VATYearlyListingBE":U
       tReportStrings.tcStringCode = "YTLNameAddrDeclarant":U.

create tReportStrings. 
assign tReportStrings.tcStringText = #T-15'Signature(s)':255(825469700)T-15#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "VATYearlyListingBE":U
       tReportStrings.tcStringCode = "YTLSignature":U.

create tReportStrings. 
assign tReportStrings.tcStringText = #T-17'Total Turnover':20(4115)T-17#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "VATYearlyListingBE":U
       tReportStrings.tcStringCode = "YTLTotalTurnover":U.

create tReportStrings. 
assign tReportStrings.tcStringText = #T-19'List of Customers':255(583941247)T-19#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "VATYearlyListingBE":U
       tReportStrings.tcStringCode = "YTLlistOfCustomers":U.

create tReportStrings. 
assign tReportStrings.tcStringText = #T-23'Nr':255(915861051)T-23#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "VATYearlyListingBE":U
       tReportStrings.tcStringCode = "YTLNR":U.

create tReportStrings. 
assign tReportStrings.tcStringText = #T-21'Total for this page':255(606008014)T-21#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "VATYearlyListingBE":U
       tReportStrings.tcStringCode = "YTLTotalPage":U.

create tReportStrings. 
assign tReportStrings.tcStringText = #T-25'Dear Sir or Madam,':255(733702471)T-25#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcReportName = "DebtorAccountState":U
       tReportStrings.tcStringCode = "AccountStateTextLine1":U.

create tReportStrings. 
assign tReportStrings.tcStringText = #T-27'Your account now shows the following list of open items. If there are any discrepancies please inform us.':255(73422558)T-27#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcReportName = "DebtorAccountState":U
       tReportStrings.tcStringCode = "AccountStateTextLine2":U.

create tReportStrings. 
assign tReportStrings.tcStringText = #T-29'Yours faithfully':255(413914870)T-29#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcReportName = "DebtorAccountState":U
       tReportStrings.tcStringCode = "AccountStateTextLine3":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-78'TC Amount':20(4204)T-78#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "TCAM":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-68'TC Amount Paid':20(134477555)T-68#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "TCAMPAID":U.  

create tReportStrings.
assign tReportStrings.tcStringText = #T-932'Non-Disc TC Amt':22(35244710)T-932#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "NDTCAM":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-80'Entity':15(59202)T-80#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "ENTITY":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-90'Initial':13(4367)T-90#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "INITIAL":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-22'Invoice':18(3982)T-22#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "INVOICE":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-61'Ln':20(47149)T-61#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "LN":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-95'Receipt':15(54542)T-95#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "RECEIPT":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-36'Pur Order':15(564579971)T-36#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "PURORDER":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-60'Item Number':20(40650)T-60#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "ITEMNUM":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-76'UM':3(43459)T-76#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "UM":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-45'Receipt Qty':20(55278)T-45#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "RECQTY":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-83'PO Cost':20(47286)T-83#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "POCOST":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-91'Curr':10(1003)T-91#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "CURR":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-79'General Ledger Summary':30(840110300)T-79#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "GLSUMMARY":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-5'Posting Reference':29(36888)T-5#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "POSTREF":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-47'Detail':40(379234601)T-47#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "DETAIL":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-14'Only':40(299244890)T-14#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CInvoiceRegister":U
       tReportStrings.tcStringCode = "ONLY":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-87'Comments':50(258833424)T-87#
       tReportStrings.tcClassName  = "BDebtorReport,BCreditorReport":U
       tReportStrings.tcReportName = "DebtorMasterCard,CreditorMasterCard":U
       tReportStrings.tcStringCode = "COMMENTS":U.  
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-31'Page':10(49831)T-31#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "PolishAPVATReg,PolishARVATReg":U
       tReportStrings.tcStringCode = "PAGE":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-71'From the Previous Page':30(872884126)T-71#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "PolishAPVATReg,PolishARVATReg":U
       tReportStrings.tcStringCode = "FROMPREVPAGE":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-82'Transfer to next page':30(799977293)T-82#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "PolishAPVATReg,PolishARVATReg":U
       tReportStrings.tcStringCode = "TRANSNEXTPAGE":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-88'Total':10(64977)T-88#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "PolishAPVATReg,PolishARVATReg":U
       tReportStrings.tcStringCode = "TOTALTRANSAMT":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-48'TOTAL Daybook Group':30(681239689)T-48#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "PolishAPVATReg,PolishARVATReg":U
       tReportStrings.tcStringCode = "TOTALJOURNALGROUP":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-35'TOTAL REPORT':30(44165248)T-35#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "PolishAPVATReg,PolishARVATReg":U
       tReportStrings.tcStringCode = "TOTALREPORT":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-66'Ln':20(47149)T-66#
       tReportStrings.tcClassName  = "BVATReport":U
       tReportStrings.tcReportName = "PolishAPVATReg,PolishARVATReg":U
       tReportStrings.tcStringCode = "LN":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-77'Unallocated':15(4072)T-77#
       tReportStrings.tcClassName  = "BGLReport":U
       tReportStrings.tcReportName = "GLOpenItems":U
       tReportStrings.tcStringCode = "GLOpenItemsUnalloc":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-75'Activity':20(68051)T-75#
       tReportStrings.tcClassName  = "BGLReport":U
       tReportStrings.tcReportName = "GLOpenItems":U
       tReportStrings.tcStringCode = "GLOpenItemsAct":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-85'Amount':20(878)T-85#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CreditorAccountMovements":U
       tReportStrings.tcStringCode = "AMOUNT":U.       

create tReportStrings.
assign tReportStrings.tcStringText = #T-1'Activity':20(68051)T-1#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CreditorAccountMovements":U
       tReportStrings.tcStringCode = "ACTIVITY":U.  
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-42'Running Total':20(648305708)T-42#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CreditorAccountMovements":U
       tReportStrings.tcStringCode = "RUNTOTAL":U. 
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-94'Total By Account':20(954099665)T-94#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CreditorAccountMovements":U
       tReportStrings.tcStringCode = "TOTALBYGL":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-63'Total By Daybook':20(209173663)T-63#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CreditorAccountMovements":U
       tReportStrings.tcStringCode = "TOTBYJOURNAL":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-839'Total By Currency':20(626464323)T-839#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CreditorAccountMovements":U
       tReportStrings.tcStringCode = "TOTBYCURRENCY":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-359'Opening':20(512827971)T-359#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CreditorAccountMovements":U
       tReportStrings.tcStringCode = "OPENING":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-73'Closing':20(314176718)T-73#
       tReportStrings.tcClassName  = "BCreditorReport":U
       tReportStrings.tcReportName = "CreditorAccountMovements":U
       tReportStrings.tcStringCode = "CLOSING":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-98'Amount':20(878)T-98#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcReportName = "DebtorAccountMovements":U
       tReportStrings.tcStringCode = "AMOUNT":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-67'Activity':20(68051)T-67#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcReportName = "DebtorAccountMovements":U
       tReportStrings.tcStringCode = "ACTIVITY":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-64'Type':8(426)T-64#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcReportName = "DebtorAccountMovements":U
       tReportStrings.tcStringCode = "TYPE":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-49'Running Total':20(339542141)T-49#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcReportName = "DebtorAccountMovements":U
       tReportStrings.tcStringCode = "RUNTOTAL":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-319'Total By Account':20(150075212)T-319#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcReportName = "DebtorAccountMovements":U
       tReportStrings.tcStringCode = "TOTALBYGL":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-12'Total By Daybook':20(275845474)T-12#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcReportName = "DebtorAccountMovements":U
       tReportStrings.tcStringCode = "TOTBYJOURNAL":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-58'Total By Currency':20(21044684)T-58#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcReportName = "DebtorAccountMovements":U
       tReportStrings.tcStringCode = "TOTBYCURRENCY":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-34'Opening':20(94237992)T-34#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcReportName = "DebtorAccountMovements":U
       tReportStrings.tcStringCode = "OPENING":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-62'Closing':30(57736)T-62#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcReportName = "DebtorAccountMovements":U
       tReportStrings.tcStringCode = "CLOSING":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-74'Pay. Ref.':20(997870996)T-74#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcReportName = "DebtorInvoicePrint":U
       tReportStrings.tcStringCode = "PaymentReference":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-39'Printed On':20(19023888)T-39#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "PRINTEDON":U.     
     /*  
create tReportStrings.
assign tReportStrings.tcStringText = #T-964'Payment Reference':26(883202452)T-964#
       tReportStrings.tcClassName  = "BDDocumentReport":U
       tReportStrings.tcReportName = "DDocumentReportIncasso":U
       tReportStrings.tcStringCode = "PaymentReference":U.
  */     
create tReportStrings.
assign tReportStrings.tcStringText = #T-873'Bill Number':20(484798895)T-873#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "BILLNUMBER":U.   
/*
create tReportStrings.
assign tReportStrings.tcStringText = #T-59'Payment Reference':26(883202452)T-59#
       tReportStrings.tcClassName  = "BPaymentSelectionReport":U
       tReportStrings.tcReportName = "Remittance":U
       tReportStrings.tcStringCode = "PaymentReference":U.
*/

create tReportStrings.
assign tReportStrings.tcStringText = #T-699'Bill-To Code':255(951472157)T-699#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "BILLTOCODE":U. 
              
create tReportStrings.
assign tReportStrings.tcStringText = #T-589'Name':20(4116)T-589#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "DEBTORNAME":U.  

create tReportStrings.
assign tReportStrings.tcStringText = #T-93'Payment Ref:':26(40124396)T-93#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcReportName = "DebtorInvoicePrint":U
       tReportStrings.tcStringCode = "PAYREF":U.       
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-41'Payment Ref:':26(40124396)T-41#
       tReportStrings.tcClassName  = "BPaymentSelectionReport":U
       tReportStrings.tcReportName = "Remittance":U
       tReportStrings.tcStringCode = "PAYREFREMIT":U.                                                                                                                      







create tReportStrings.   
assign tReportStrings.tcStringText = #T-198'Address':30(4217)T-198#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "DEBTORADDR":U.  

create tReportStrings.
assign tReportStrings.tcStringText = #T-10'Bank Name':255(61079424)T-10#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "BANKNAME":U.  

create tReportStrings.
assign tReportStrings.tcStringText = #T-777'Bank Branch':255(91267044)T-777#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "BANKBRANCH":U.  

create tReportStrings.
assign tReportStrings.tcStringText = #T-57'Bank Account Number':255(691926994)T-57#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "BANKACCOUNTNBR":U.
         
create tReportStrings.
assign tReportStrings.tcStringText = #T-402'Swift Code':10(529245091)T-402#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "SWIFTCODE":U.  

create tReportStrings.
assign tReportStrings.tcStringText = #T-44'Bill Due Date':15(578548630)T-44#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "BILLDUEDATE":U.  
                                                                                    
create tReportStrings.
assign tReportStrings.tcStringText = #T-6'Bill Date':20(137013673)T-6#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "BILLDATE":U.                                                                                                               
   
create tReportStrings.
assign tReportStrings.tcStringText = #T-432'Bill Schedule':20(585042251)T-432#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "BILLSCHEDULE":U. 
                                                                                                                     
create tReportStrings.
assign tReportStrings.tcStringText = #T-51'Bill Collector':20(347023082)T-51#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "BILLCOLLECTOR":U.
         
create tReportStrings.
assign tReportStrings.tcStringText = #T-43'Invoice Date':30(3369)T-43#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "INVOICEDATE":U.                                     

create tReportStrings.
assign tReportStrings.tcStringText = #T-26'Invoice Reference':30(63657)T-26#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "INVREF":U.    
       
         
create tReportStrings.
assign tReportStrings.tcStringText = #T-3'SO Number':255(979153462)T-3#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "SONBR":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-55'Ln':20(47149)T-55#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "LINE":U.    
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-18'Item Code':20(63)T-18#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "ITEMCODE":U.
         
create tReportStrings.
assign tReportStrings.tcStringText = #T-53'Item Description':30(4201)T-53#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "ITEMDESCRIPTION":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-69'Quantity':20(1047)T-69#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "QUANTITY":U.   

create tReportStrings.
assign tReportStrings.tcStringText = #T-260'UM':15(1144)T-260#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "UM":U. 
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-89'Price':30(50731)T-89#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "PRICE":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-92'Sales':30(418)T-92#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "SALES":U.  
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-336'Tax':40(4579)T-336#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "TAX":U.  
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-212'Sales + Tax':40(962085714)T-212#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "SALESPLUSTAX":U. 
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-585'Opening Balance':100(4048)T-585#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "OPENINGBALANCE":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-33'Payments':100(441926000)T-33#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "PAYMENTS":U.  

create tReportStrings.
assign tReportStrings.tcStringText = #T-455'Bill Payments':30(998789178)T-455#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "BILLPAYMENTS":U.  

create tReportStrings.
assign tReportStrings.tcStringText =  #T-419'Non-Bill Payments':255(445505094)T-419#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "NONBILLPAYMENTS":U.  
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-464'Closing Balance':100(4051)T-464#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "CLOSINGBALANCE":U. 
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-54'Currency':20(220)T-54#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "CURRENCY":U.              
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-30'Subtotal':40(4215)T-30#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "SUBTOTAL":U.        
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-244'Payment Information':255(773961304)T-244#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "PAYINFO":U.  
                                                   
create tReportStrings.
assign tReportStrings.tcStringText = #T-8'Posting Date':40(59080)T-8#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "POSTINGDATE":U.  

create tReportStrings.
assign tReportStrings.tcStringText = #T-621'Payment Instrument':40(718942391)T-621#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "PAYINSTRUMENT":U.  

create tReportStrings.
assign tReportStrings.tcStringText = #T-32'Payment Type':50(70988)T-32#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "PAYTYPE":U.  

create tReportStrings.
assign tReportStrings.tcStringText = #T-84'Payment Due Date':40(44753038)T-84#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "PAYDUEDATE":U.                                                    

create tReportStrings.
assign tReportStrings.tcStringText = #T-40'Year/Daybook/Voucher':255(650468736)T-40#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "YEARDAYBOOKVOUCHER":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-172'Description':40(59084)T-172#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "DESCRIPTION":U. 
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-966'Reference':30(886)T-966#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "REFERENCE":U.         
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-56'Amount':20(878)T-56#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "AMOUNT":U.        
       
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-487'Total':40(57342)T-487#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "TOTAL":U. 
       
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-28'Bill Total':40(887993353)T-28#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "BILLTOTAL":U.    
/*
create tReportStrings.
assign tReportStrings.tcStringText = #T-74'Payment':50(4189)T-74#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "PAYMENT":U.       
*/
create tReportStrings.
assign tReportStrings.tcStringText = #T-488'Test Print':40(65747)T-488#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "TESTPRINT":U.    

create tReportStrings.
assign tReportStrings.tcStringText = #T-52'Confirm Print':255(912456705)T-52#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "CONFIRMPRINT":U.     

create tReportStrings.
assign tReportStrings.tcStringText = #T-24'Re-Print':40(828381933)T-24#
       tReportStrings.tcClassName  = "BBillReport":U
       tReportStrings.tcStringCode = "REPRINT":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-72'Legal Document':20(3161687)T-72#
       tReportStrings.tcClassName  = "BGLReport,BDebtorReport,BAnalyticalReport":U
     /*  tReportStrings.tcReportName = "JournalEntryReport,Transactions_GL,Transactions_JRNL,Transactions_DIV,BAnalyticalReport,DebtorAccountMovements":U */
       tReportStrings.tcStringCode = "LEGALDOC":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-81'Shipper':20(60967)T-81#
       tReportStrings.tcClassName  = "BDebtorReport":U
       tReportStrings.tcStringCode = "SHIPPER":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-20'GL Balance':20(1017)T-20#
       tReportStrings.tcClassName  = "BClosingPostingsReport":U
       tReportStrings.tcReportName = "GLOpenItemControl":U
       tReportStrings.tcStringCode = "GLBALANCE":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-499'Sub-ledger Balance':20(254104290)T-499#
       tReportStrings.tcClassName  = "BClosingPostingsReport":U
       tReportStrings.tcReportName = "GLOpenItemControl":U
       tReportStrings.tcStringCode = "SUBBALANCE":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-65'Difference':20(4114)T-65#
       tReportStrings.tcClassName  = "BClosingPostingsReport":U
       tReportStrings.tcReportName = "GLOpenItemControl":U
       tReportStrings.tcStringCode = "DIFFERENCE":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-788'TC Balance':15(4043)T-788#
       tReportStrings.tcClassName  = "BClosingPostingsReport":U
       tReportStrings.tcReportName = "GLOpenItemControl":U
       tReportStrings.tcStringCode = "POSTINGBALANCETC":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-572'BC Balance':15(4042)T-572#
       tReportStrings.tcClassName  = "BClosingPostingsReport":U
       tReportStrings.tcReportName = "GLOpenItemControl":U
       tReportStrings.tcStringCode = "POSTINGBALANCELC":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-669'SC Balance':15(4041)T-669#
       tReportStrings.tcClassName  = "BClosingPostingsReport":U
       tReportStrings.tcReportName = "GLOpenItemControl":U
       tReportStrings.tcStringCode = "POSTINGBALANCECC":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-953'Allocate Later':30(510549571)T-953#
       tReportStrings.tcClassName  = "BClosingPostingsReport":U
       tReportStrings.tcReportName = "GLOpenItemControl":U
       tReportStrings.tcStringCode = "ALLOCLATER":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-817'Total in BC':20(795005608)T-817#
       tReportStrings.tcClassName  = "BClosingPostingsReport":U
       tReportStrings.tcReportName = "GLOpenItemControl":U
       tReportStrings.tcStringCode = "TOTALINBC":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-352'Total in SC':20(779314034)T-352#
       tReportStrings.tcClassName  = "BClosingPostingsReport":U
       tReportStrings.tcReportName = "GLOpenItemControl":U
       tReportStrings.tcStringCode = "TOTALINSC":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-86'Total in BC for GL':30(570571504)T-86#
       tReportStrings.tcClassName  = "BClosingPostingsReport":U
       tReportStrings.tcReportName = "GLOpenItemControl":U
       tReportStrings.tcStringCode = "TOTALINBCFORGL":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-211'Total in SC for GL':30(461442805)T-211#
       tReportStrings.tcClassName  = "BClosingPostingsReport":U
       tReportStrings.tcReportName = "GLOpenItemControl":U
       tReportStrings.tcStringCode = "TOTALINSCFORGL":U. 

create tReportStrings.
assign tReportStrings.tcStringText = #T-889'Difference can be caused by postinglines with 'Allocate Later'. These can also be found in earlier period.':200(901251019)T-889#
       tReportStrings.tcClassName  = "BClosingPostingsReport":U
       tReportStrings.tcReportName = "GLOpenItemControl":U
       tReportStrings.tcStringCode = "ALLOCLATERWARNING":U.

create tReportStrings.
assign tReportStrings.tcStringText = #T-325'Balances at period end':40(737471166)T-325#
       tReportStrings.tcClassName  = "BClosingPostingsReport":U
       tReportStrings.tcReportName = "GLOpenItemControl":U
       tReportStrings.tcStringCode = "PERIODBLNC":U.  

create tReportStrings.
assign tReportStrings.tcStringText = #T-70'Customer':255(310626946)T-70#
       tReportStrings.tcClassName  = "BBankImportReport":U
       tReportStrings.tcStringCode = "CUSTOMER":U.
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-737'Supplier':255(439399192)T-737#
       tReportStrings.tcClassName  = "BBankImportReport":U
       tReportStrings.tcStringCode = "SUPPLIER":U.  

create tReportStrings.
assign tReportStrings.tcStringText = #T-901'GL Account Description':50(333160975)T-901#
       tReportStrings.tcClassName  = "BGLReport":U
       tReportStrings.tcStringCode = "GLACCOUNTDESCRIPTION".
 
create tReportStrings.
assign tReportStrings.tcStringText = #T-298'GL Type:':255(606985609)T-298#
       tReportStrings.tcClassName  = "BGLReport":U
       tReportStrings.tcStringCode = "GLTYPEC".

create tReportStrings.
assign tReportStrings.tcStringText = #T-37'Daybook Ctrl:':50(350222965)T-37#
       tReportStrings.tcClassName  = "BGLReport":U
       tReportStrings.tcStringCode = "DAYBOOKCONTROLC".
       
create tReportStrings.
assign tReportStrings.tcStringText = #T-724'Daybook Type:':255(790047434)T-724#   
       tReportStrings.tcClassName  = "BGLReport":U
       tReportStrings.tcStringCode = "DAYBOOKTYPEC".
  
create tReportStrings.
assign tReportStrings.tcStringText = #T-598'Count:':50(956137330)T-598#
       tReportStrings.tcClassName  = "BGLReport":U
       tReportStrings.tcStringCode = "COUNTC".