| tcBusinessFieldName | tcDataType | tcOperator |
|---|---|---|
| iiCompanyId | i | |
| tBusinessRelation.BusinessRelationCode | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tCInvoice.CInvoiceBalanceTC | d | =,>=,>,<>,<=,< |
| tCInvoice.CInvoiceDate | t | =,>=,>,<>,<=,< |
| tCInvoice.CInvoiceHoldAmountTC | d | =,>=,>,<>,<=,< |
| tCInvoice.CInvoiceOriginalCreditTC | d | =,>=,>,<>,<=,< |
| tCInvoice.CInvoiceOriginalDebitTC | d | =,>=,>,<>,<=,< |
| tCInvoice.CInvoiceReference | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tCInvoice.CInvoiceType | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tCInvoice.CInvoiceVoucher | i | =,>=,>,<>,<=,< |
| tCreditor.CreditorCode | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tCurrency.CurrencyCode | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tJournal.JournalCode | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tPaySelLine.PayFormatTypeCode | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tPaySel.PaySelCode | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tPaySel.PaySelDate | t | =,>=,>,<>,<=,< |
| tPaySelLine.PaySelLineAmountTC | d | =,>=,>,<>,<=,< |
| tPaySelLine.PaySelLineDiscountTC | d | =,>=,>,<>,<=,< |
| tPaySel.PaySelStatus | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tPeriod.PeriodPeriod | i | =,>=,>,<>,<=,< |
| tPeriod.PeriodYear | i | =,>=,>,<>,<=,< |
| iiCompanyId | integer | Company id |
each CInvoice where
each CPay (inner-join) where
first PaySelLine (inner-join) where
first PaySel (inner-join) where
first Creditor (inner-join) where
first BusinessRelation (inner-join) where
first Currency (inner-join) where
first Journal (inner-join) where
first Period (inner-join) where
| field name | data type | db field | description |
|---|---|---|---|
| tcPayFormatTypeCode | character | PaySelLine.PayFormatTypeCode | Payment format of the payment selection |
| tdPaySelLineDiscountTC | decimal | PaySelLine.PaySelLineDiscountTC | Discount |
| tcCreditorCode | character | Creditor.CreditorCode | Supplier Code |
| tiPeriodYear | integer | Period.PeriodYear | GL Calendar Year |
| tiPeriodPeriod | integer | Period.PeriodPeriod | GL Period |
| tcJournalCode | character | Journal.JournalCode | A daybook code (maximum eight characters). |
| tiCInvoiceVoucher | integer | CInvoice.CInvoiceVoucher | Voucher. This field displays the numeric identifier assigned to the posting. When the daybook of the journal entry is changed (after transfer), the voucher is cleared. Voucher must be unique in one GL period. When the user input is zero, the system automatically assign a value not used yet for this field. |
| tcCInvoiceReference | character | CInvoice.CInvoiceReference | Reference. An alphanumeric reference to help identify the invoice in the system. This reference is typically the ID number of the invoice received from the supplier. |
| tcCInvoiceType | character | CInvoice.CInvoiceType | Invoice Type. This field identifies the invoice type. The value can be Invoice Correction and Credit Note Correction type only when the appropriate daybook types have already been defined. |
| tcCInvoiceTypePayments | character | calculated | CInvoiceTypePayments |
| tdCInvoiceOriginalCreditTC | decimal | CInvoice.CInvoiceOriginalCreditTC | TC Invoice Amount CR. This field displays the credit total invoice amount in the transaction currency. If you modify this field, the system automatically recalculates the exchange rate to ensure that the BC Invoice Amount remains the same. |
| tdCInvoiceOriginalDebitTC | decimal | CInvoice.CInvoiceOriginalDebitTC | TC AP Amount. This field displays the debit total invoice amount in the transaction currency. If you modify this field, the system automatically recalculates the exchange rate to ensure that the TC Invoice Amount remains the same. |
| tcCurrencyCode | character | Currency.CurrencyCode | Currency Code |
| tcPaySelCode | character | PaySel.PaySelCode | Code |
| tdPaySelLineAmountTC | decimal | PaySelLine.PaySelLineAmountTC | Amount |
| ttPaySelDate | date | PaySel.PaySelDate | Execution Date |
| tcPaySelStatus | character | PaySel.PaySelStatus | Status |
| tcPaySelStatusPayments | character | calculated | PaySelStatusPayments |
| tcBusinessRelationCode | character | BusinessRelation.BusinessRelationCode | Business Relation. A code to identify the business relation. If this field does not have a input from the user, the system automatically generates a number for the record based on the sequence defined in Business Relation Autonumber Create. |
| ttCInvoiceDate | date | CInvoice.CInvoiceDate | Invoice Date. This field indicates the invoice creation date. The system uses this field with the credit terms to calculate due date and discount date. |
| api annotation: | This field defaults from the system date. | ||
| tdCInvoiceBalanceTC | decimal | CInvoice.CInvoiceBalanceTC | Balance. This field displays the sum of the debit and credit amounts of all posting lines in transaction currency. |
| tdCInvoiceHoldAmountTC | decimal | CInvoice.CInvoiceHoldAmountTC | TC Hold Amount. This field displays the amount of the invoice total that is not to be paid. If this field is not blank, the hold amount is taken into account during payment processing. Hold amounts must be: For invoices or correction invoices: Less than the invoice total and greater than zero. For credit notes or correction credit notes: Greater than the document total and less than zero. The hold amount for a negative payment must always be set to zero. |
| tiCompany_ID | integer | CInvoice.Company_ID | Link to Company |
| tiCInvoice_ID | integer | CInvoice.CInvoice_ID | Record ID |
| tiCInvoiceCurrency_ID | integer | CInvoice.CInvoiceCurrency_ID | Currency Code |
| tiJournal_ID | integer | CInvoice.Journal_ID | Daybook Code |
| tiPaySelLine_ID | integer | CPay.PaySelLine_ID | Link to PaySelLine |
| tiCPay_ID | integer | CPay.CPay_ID | Record ID |
| tiPeriod_ID | integer | CInvoice.Period_ID | Link to Period |
| CInvoiceCustom | character | calculated | custom fields |
| CPayCustom | character | calculated | custom fields |
| PaySelLineCustom | character | calculated | custom fields |
| PaySelCustom | character | calculated | custom fields |
| CreditorCustom | character | calculated | custom fields |
| BusinessRelationCustom | character | calculated | custom fields |
| CurrencyCustom | character | calculated | custom fields |
| JournalCustom | character | calculated | custom fields |
| PeriodCustom | character | calculated | custom fields |
| ti_sequence | integer | calculated | primary index |
| tc_rowid | character | calculated | = rowid(CInvoice),rowid(CPay),rowid(PaySelLine),rowid(PaySel),rowid(Creditor),rowid(BusinessRelation),rowid(Currency),rowid(Journal),rowid(Period) |
define temp-table ttContext no-undo
field propertyQualifier as character
field propertyName as character
field propertyValue as character
index entityContext is primary unique
propertyQualifier
propertyName
index propertyQualifier
propertyQualifier.
define dataset dsContext for ttContext.
define variable vhContextDS as handle no-undo.
define variable vhExceptionDS as handle no-undo.
define variable vhServer as handle no-undo.
define variable vhInputDS as handle no-undo.
define variable vhInputOutputDS as handle no-undo.
define variable vhOutputDS as handle no-undo.
define variable vhParameter as handle no-undo.
/* Create context */
create ttContext.
assign ttContext.propertyName = "programName"
ttContext.propertyValue = "BCInvoice".
create ttContext.
assign ttContext.propertyName = "methodName"
ttContext.propertyValue = "SelectCInvoicePayments".
create ttContext.
assign ttContext.propertyName = "applicationId"
ttContext.propertyValue = "fin".
create ttContext.
assign ttContext.propertyName = "entity"
ttContext.propertyValue = "1000".
create ttContext.
assign ttContext.propertyName = "userName"
ttContext.propertyValue = "mfg".
create ttContext.
assign ttContext.propertyName = "password"
ttContext.propertyValue = "".
/* Create input dataset */
create dataset vhInputDS.
vhInputDS:read-xmlschema("file", "xml/bcinvoice.selectcinvoicepayments.i.xsd", ?).
vhParameter = vhInputDS:get-buffer-handle("tParameterI").
vhParameter:buffer-create().
assign vhParameter::icRange = "A"
vhParameter::icRowid = ""
vhParameter::iiRownum = 0
vhParameter::iiNumber = 5 /* Number of records to read */
vhParameter::icSortColumns = ""
vhParameter::ilCountOnly = false
vhParameter::ilForwardRead = true
vhParameter::iiMaximumBrowseRecordsToCount = 0.
vhParameter = vhInputDS:get-buffer-handle("tFilter").
vhParameter:buffer-create().
assign vhParameter::<field-name-1> = <field-value-1>
vhParameter::<field-name-2> = <field-value-2>
...
/* Connect the AppServer */
create server vhServer.
vhServer:connect("-URL <appserver-url>").
if not vhServer:connected()
then do:
message "Could not connect AppServer" view-as alert-box error title "Error".
return.
end.
/* Run */
assign vhContextDS = dataset dsContext:handle.
run program/rpcrequestservice.p on vhServer
(input-output dataset-handle vhContextDS by-reference,
output dataset-handle vhExceptionDS,
input dataset-handle vhInputDS by-reference,
input-output dataset-handle vhInputOutputDS by-reference,
output dataset-handle vhOutputDS).
/* Handle output however you want, in this example, we dump it to xml */
if valid-handle(vhExceptionDS)
then vhExceptionDS:write-xml("file", "Exceptions.xml", true).
if valid-handle(vhOutputDS)
then vhOutputDS:write-xml("file", "Output.xml", true).
/* Cleanup */
vhServer:disconnect().
assign vhServer = ?.
if valid-handle(vhInputDS)
then delete object vhInputDS.
if valid-handle(vhOutputDS)
then delete object vhOutputDS.
if valid-handle(vhExceptionDS)
then delete object vhExceptionDS.