Description
extension of the Main method
Parameters
ihTranslationHandle | input | handle | |
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
QadFinancials
program code (program1/treportstrings.p)
&SCOPED-DEFINE TARGETPROCEDURE ihTranslationHandle
create tReportStrings.
assign tReportStrings.tcStringText = #T-1'Monday':18(3976)t-1#
tReportStrings.tcClassName = "BActivityReport":U
tReportStrings.tcReportName = "Regulations":U
tReportStrings.tcStringCode = "MO":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-2'Tuesday':18(3977)t-2#
tReportStrings.tcClassName = "BActivityReport":U
tReportStrings.tcReportName = "Regulations":U
tReportStrings.tcStringCode = "TU":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-3'Wednesday':18(3978)t-3#
tReportStrings.tcClassName = "BActivityReport":U
tReportStrings.tcReportName = "Regulations":U
tReportStrings.tcStringCode = "WE":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-4'Thursday':18(3979)t-4#
tReportStrings.tcClassName = "BActivityReport":U
tReportStrings.tcReportName = "Regulations":U
tReportStrings.tcStringCode = "TH":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-5'Friday':18(3980)t-5#
tReportStrings.tcClassName = "BActivityReport":U
tReportStrings.tcReportName = "Regulations":U
tReportStrings.tcStringCode = "FR":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-6'Saturday':18(3981)t-6#
tReportStrings.tcClassName = "BActivityReport":U
tReportStrings.tcReportName = "Regulations":U
tReportStrings.tcStringCode = "SA":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-7'Invoice':18(3982)t-7#
tReportStrings.tcClassName = "BPaymentSelectionReport":U
tReportStrings.tcReportName = "PaymentSelections,PayList":U
tReportStrings.tcStringCode = "INVOICE":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-90'Net Amount':25(14451)T-90#
tReportStrings.tcClassName = "BPaymentSelectionReport":U
tReportStrings.tcReportName = "PaymentSelections,PayList":U
tReportStrings.tcStringCode = "PaySelLineAmountNet":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-92'TC Allocated Amount':255(71092)T-92#
tReportStrings.tcClassName = "BPaymentSelectionReport":U
tReportStrings.tcReportName = "PaymentSelections,PayList":U
tReportStrings.tcStringCode = "PaySelLineAmountTC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-9'Summary By Currency':25(3984)t-9#
tReportStrings.tcClassName = "BPaymentSelectionReport":U
tReportStrings.tcReportName = "PayList":U
tReportStrings.tcStringCode = "SUMBYCUR":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-10'Draft':25(3985)t-10#
tReportStrings.tcClassName = "BPaymentSelectionReport":U
tReportStrings.tcReportName = "PayList,Remittance":U
tReportStrings.tcStringCode = "DRAFT":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-86'From':25(3986)T-86#
tReportStrings.tcClassName = "BPaymentSelectionReport":U
tReportStrings.tcReportName = "Remittance":U
tReportStrings.tcStringCode = "FROM":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-87'To':25(3987)T-87#
tReportStrings.tcClassName = "BPaymentSelectionReport":U
tReportStrings.tcReportName = "Remittance":U
tReportStrings.tcStringCode = "TO":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-88'Summary By Currency':25(65178)T-88#
tReportStrings.tcClassName = "BPaymentSelectionReport":U
tReportStrings.tcReportName = "Remittance":U
tReportStrings.tcStringCode = "SUMBYCUR":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-16'tc Orig Balance':15(3991)t-16#
tReportStrings.tcClassName = "BCreditorReport":U
tReportStrings.tcReportName = "CreditorOpenItems,CreditorOpenItemsDetail":U
tReportStrings.tcStringCode = "OBALTC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-17'SC Orig Balance':15(3992)T-17#
tReportStrings.tcClassName = "BCreditorReport":U
tReportStrings.tcReportName = "CreditorOpenItems,CreditorOpenItemsDetail":U
tReportStrings.tcStringCode = "OBALCC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-18'BC Orig Balance':15(3993)T-18#
tReportStrings.tcClassName = "BCreditorReport":U
tReportStrings.tcReportName = "CreditorOpenItems,CreditorOpenItemsDetail":U
tReportStrings.tcStringCode = "OBALLC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-19'tc Orig Balance':15(3991)t-19#
tReportStrings.tcClassName = "BDebtorReport":U
tReportStrings.tcReportName = "DebtorOpenItems,DebtorOpenItemsQuick,DebtorRemindersOverview":U
tReportStrings.tcStringCode = "OBALTC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-20'SC Orig Balance':15(3992)T-20#
tReportStrings.tcClassName = "BDebtorReport":U
tReportStrings.tcReportName = "DebtorOpenItems,DebtorOpenItemsQuick,DebtorRemindersOverview":U
tReportStrings.tcStringCode = "OBALCC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-21'BC Orig Balance':15(3993)T-21#
tReportStrings.tcClassName = "BDebtorReport":U
tReportStrings.tcReportName = "DebtorOpenItems,DebtorOpenItemsQuick,DebtorRemindersOverview":U
tReportStrings.tcStringCode = "OBALLC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-22'TC Current Balance':18(64092)T-22#
tReportStrings.tcClassName = "BCreditorReport":U
tReportStrings.tcReportName = "CreditorOpenItems,CreditorOpenItemsDetail":U
tReportStrings.tcStringCode = "CBALTC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-23'SC Current Balance':18(64089)T-23#
tReportStrings.tcClassName = "BCreditorReport":U
tReportStrings.tcReportName = "CreditorOpenItems,CreditorOpenItemsDetail":U
tReportStrings.tcStringCode = "CBALCC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-24'BC Current Balance':18(64091)T-24#
tReportStrings.tcClassName = "BCreditorReport":U
tReportStrings.tcReportName = "CreditorOpenItems,CreditorOpenItemsDetail":U
tReportStrings.tcStringCode = "CBALLC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-25'TC Current Balance':18(64092)T-25#
tReportStrings.tcClassName = "BDebtorReport":U
tReportStrings.tcReportName = "DebtorOpenItems,DebtorOpenItemsQuick,DebtorRemindersOverview":U
tReportStrings.tcStringCode = "CBALTC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-26'SC Current Balance':18(64089)T-26#
tReportStrings.tcClassName = "BDebtorReport":U
tReportStrings.tcReportName = "DebtorOpenItems,DebtorOpenItemsQuick,DebtorRemindersOverview":U
tReportStrings.tcStringCode = "CBALCC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-27'BC Current Balance':18(64091)T-27#
tReportStrings.tcClassName = "BDebtorReport":U
tReportStrings.tcReportName = "DebtorOpenItems,DebtorOpenItemsQuick,DebtorRemindersOverview":U
tReportStrings.tcStringCode = "CBALLC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-28'Current':30(3997)t-28#
tReportStrings.tcClassName = "BCreditorReport":U
tReportStrings.tcReportName = "CreditorOpenItems,CreditorOpenItemsDetail":U
tReportStrings.tcStringCode = "TOTCUR":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-29'Current':30(3997)t-29#
tReportStrings.tcClassName = "BDebtorReport":U
tReportStrings.tcReportName = "DebtorOpenItems":U
tReportStrings.tcStringCode = "TOTCUR":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-30'Original':30(3998)t-30#
tReportStrings.tcClassName = "BCreditorReport":U
tReportStrings.tcReportName = "CreditorOpenItems,CreditorPrepayments,CreditorOpenItemsDetail":U
tReportStrings.tcStringCode = "TOTORIG":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-31'Original':30(3998)t-31#
tReportStrings.tcClassName = "BDebtorReport":U
tReportStrings.tcReportName = "DebtorOpenItems,DebtorPrepayments":U
tReportStrings.tcStringCode = "TOTORIG":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-32'Receipt':30(3999)t-32#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "MatchingReconciliation":U
tReportStrings.tcStringCode = "RECEIPT":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-33'Supplier':30(4000)T-33#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "MatchingReconciliation":U
tReportStrings.tcStringCode = "SUPLIER":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-34'PO Ref':30(4001)t-34#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "MatchingReconciliation":U
tReportStrings.tcStringCode = "POREF":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-35'Invoices':30(4002)t-35#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "INVCS":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-84'Details':15(14261)T-84#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "DETAILS":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-85'Purchase Orders':20(14262)T-85#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "PONMB":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-36'Credit Notes':30(4003)t-36#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "CNTS":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-37'Receipts':30(4004)t-37#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "RCPTS":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-38'Returns':30(4005)t-38#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "RTRNS":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-39'Summary by Type':30(4006)t-39#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "TYPESUM":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-40'tc Unmatched Amount':30(4007)t-40#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "UNMATCHAMTC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-41'tc Unallocated Amount':30(4008)t-41#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "UNALLOCAMTC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-42'Unmatched QTY':30(4009)t-42#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "UNMATCHQTY":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-43'Reference to Purchase Orders':40(4010)t-43#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "REFTOPO":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-44'Linked Invoice':30(4011)t-44#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "LINKINV":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-45'Price Variance':30(4012)t-45#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "MatchingVariances":U
tReportStrings.tcStringCode = "PRICVAR":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-46'Currency Variance':30(4013)t-46#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "MatchingVariances":U
tReportStrings.tcStringCode = "CURVAR":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-77'RC Item':10(13917)T-77#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "MatchingVariances":U
tReportStrings.tcStringCode = "RCITEM":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-78'RC Year/Number':20(13918)T-78#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "MatchingVariances":U
tReportStrings.tcStringCode = "RCNUMYR":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-47'Type':10(4014)t-47#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "TYPE":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-48'Fin':6(4015)t-48#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "FIN":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-49'Log':6(4016)t-49#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "LOG":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-82'tc Diff Amount':15(14256)T-82#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "DIFFAMTC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-83'tc Orig Amount':15(14257)T-83#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "UnmatchedInvoicesReceipts":U
tReportStrings.tcStringCode = "ORIGAMTC":U.
/*PO reportvariants names*/
create tReportStrings.
assign tReportStrings.tcStringText = #T-53'By Cost Center':30(13588)T-53#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "PurchaseOrders":U
tReportStrings.tcStringCode = "BYCOSTCEN":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-51'By Supplier':30(13582)T-51#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "PurchaseOrders":U
tReportStrings.tcStringCode = "BYCREDITOR":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-55'By Sub-Account':30(13590)T-55#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "PurchaseOrders":U
tReportStrings.tcStringCode = "BYDIVIS":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-58'By Item':30(13593)T-58#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "PurchaseOrders":U
tReportStrings.tcStringCode = "BYITEM":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-60'Overdue Deliveries':30(13595)T-60#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "PurchaseOrders":U
tReportStrings.tcStringCode = "OVERDUEDEL":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-62'Planned Deliveries':30(13602)T-62#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "PurchaseOrders":U
tReportStrings.tcStringCode = "PLANNEDDEL":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-64'By Purchaser':30(13608)T-64#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "PurchaseOrders":U
tReportStrings.tcStringCode = "BYPRCHS":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-66'By Project':30(13613)T-66#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "PurchaseOrders":U
tReportStrings.tcStringCode = "BYPRJ":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-68'By Warehouse':30(13615)T-68#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "PurchaseOrders":U
tReportStrings.tcStringCode = "BYWRH":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-70'Purchase Orders':20(13675)T-70#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "PurchaseOrders":U
tReportStrings.tcStringCode = "PRCHORDS":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-79'Receipts':20(14040)T-79#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "PurchaseOrders":U
tReportStrings.tcStringCode = "RCPTS":U.
/* Added to B21 */
create tReportStrings.
assign tReportStrings.tcStringText = #T-71'BC Received Amount':20(13688)T-71#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "MatchingReconciliation":U
tReportStrings.tcStringCode = "LCRECAM":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-72'SI':2(13689)T-72#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "MatchingReconciliation":U
tReportStrings.tcStringCode = "TYPECI":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-73'RC':2(13444)T-73#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "MatchingReconciliation":U
tReportStrings.tcStringCode = "TYPERC":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-74'Matched Invoices':30(13691)T-74#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "MatchingReconciliation":U
tReportStrings.tcStringCode = "MATCH":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-75'Unmatched Invoices':30(13692)T-75#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "MatchingReconciliation":U
tReportStrings.tcStringCode = "UNMATCHCI":U.
create tReportStrings.
assign tReportStrings.tcStringText = #T-76'Unmatched Receipts':30(13693)T-76#
tReportStrings.tcClassName = "BLogisticReport":U
tReportStrings.tcReportName = "MatchingReconciliation":U
tReportStrings.tcStringCode = "UNMATCHRC":U.