| tcBusinessFieldName | tcDataType | tcOperator |
|---|---|---|
| iiCompanyId | i | |
| iiGLId | i | = |
| ilPostingIsClosed | l | = |
| tCurrency.CurrencyCode | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tJournal.JournalCode | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tJournal.JournalDescription | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tJournal.JournalTypeCode | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tLayer.LayerCode | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tPeriod.PeriodPeriod | i | =,>=,>,<>,<=,< |
| tPeriod.PeriodYear | i | =,>=,>,<>,<=,< |
| tPosting.PostingDate | t | =,>=,>,<>,<=,< |
| tPosting.PostingInvoiceReferenceTxt | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tPostingLine.PostingLineCreditCC | d | =,>=,>,<>,<=,< |
| tPostingLine.PostingLineCreditLC | d | =,>=,>,<>,<=,< |
| tPostingLine.PostingLineCreditTC | d | =,>=,>,<>,<=,< |
| tPostingLine.PostingLineDebitCC | d | =,>=,>,<>,<=,< |
| tPostingLine.PostingLineDebitLC | d | =,>=,>,<>,<=,< |
| tPostingLine.PostingLineDebitTC | d | =,>=,>,<>,<=,< |
| tPostingLine.PostingLineText | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tPosting.PostingSystemDate | t | =,>=,>,<>,<=,< |
| tPosting.PostingText | c | =,>=,>,<>,<=,<,begins,can-do,matches |
| tPosting.PostingVoucher | i | =,>=,>,<>,<=,< |
| iiCompanyId | integer | Company id |
| iiGLId | integer | GLId |
| ilPostingIsClosed | logical | monthly closing |
each PostingLine where
first Currency (inner-join) where
first Posting (inner-join) where
first Journal (inner-join) where
first Layer (inner-join) where
first Period (inner-join) where
| field name | data type | db field | description |
|---|---|---|---|
| tiClosing_ID | integer | Posting.ObsoleteClosing_ID | Link to Closing |
| tiCostCentre_ID | integer | PostingLine.CostCentre_ID | Cost Center Code |
| tcCurrencyCode | character | Currency.CurrencyCode | Currency Code |
| tiDivision_ID | integer | PostingLine.Division_ID | Sub-Account Code |
| tiGL_ID | integer | PostingLine.GL_ID | GL Description |
| tiJournal_ID | integer | Journal.Journal_ID | Record ID |
| tcJournalCode | character | Journal.JournalCode | A daybook code (maximum eight characters). |
| tcJournalDescription | character | Journal.JournalDescription | A brief description of the daybook. |
| api annotation: | Value for this field defaults to null. | ||
| tcJournalTypeCode | character | Journal.JournalTypeCode | A daybook type code. |
| api annotation: | Value for this field defaults to "Journal Entries". | ||
| tcLayerCode | character | Layer.LayerCode | Layer Code |
| tiPeriodPeriod | integer | Period.PeriodPeriod | GL Period |
| tiPeriodYear | integer | Period.PeriodYear | GL Calendar Year |
| tiPosting_ID | integer | PostingLine.Posting_ID | Link to Posting |
| ttPostingDate | date | Posting.PostingDate | The accounting date on which the journal entry is posted. The posting date must be a valid calendar date and must be within the GL calendar year (PostingYear) and period (PostingPeriod). |
| tcPostingInvoiceReferenceTxt | character | Posting.PostingInvoiceReferenceTxt | When the posting is part of an invoice posting, then this field contains the invoice number (Year/Daybook/Voucher extended with supplier invoice Reference in case of a supplier invoice). Used for information purpose on reports and browsers. |
| api annotation: | Value for this field defaults to blank | ||
| tiPostingLine_ID | integer | PostingLine.PostingLine_ID | Record ID |
| tdPostingLineCreditCC | decimal | PostingLine.PostingLineCreditCC | SC Credit |
| api annotation: | Partial Update = yes - it will get a default value depending on the value of PostingLinCreditTC, PostingLineCCRate & PostingLineCCScale. SC Amount = TC Amount * Exchange rate (TC/SC) * Scale Factor (TC/SC). If Partial Update is false, you should enter the correct value for this field | ||
| tdPostingLineCreditLC | decimal | PostingLine.PostingLineCreditLC | BC Credit |
| api annotation: | Partial Update = yes - it will get a default value depends on the value of PostingLineCreditTC, PostingLineExchangeRate & PostingLineRateScale. BC Amount = TC Amount * Exchange rate (TC/BC) * Scale Factor (TC/BC). If Partial Update is false, enter a value for this field. | ||
| tdPostingLineCreditTC | decimal | PostingLine.PostingLineCreditTC | TC Credit |
| tdPostingLineDebitCC | decimal | PostingLine.PostingLineDebitCC | SC Debit |
| api annotation: | Partial Update = yes - it will get a default value depending on the value of PostingLineDebitTC, PostingLineCCRate & PostingLineCCScale. SC Amount = TC Amount * Exchange rate (TC/SC) * Scale Factor (TC/SC). If Partial Update is false, enter the correct value for this field. | ||
| tdPostingLineDebitLC | decimal | PostingLine.PostingLineDebitLC | BC Debit |
| api annotation: | Partial Update = yes - it will get a default value depending on the value of PostingLineDebitTC, PostingLineExchangeRate and PostingLineRateScale. BC Amount = TC Amount * Exchange rate (TC/BC) * Scale Factor (TC/BC). If Partial Update = false, enter the correct value into this field. | ||
| tdPostingLineDebitTC | decimal | PostingLine.PostingLineDebitTC | TC Debit |
| tcPostingLineText | character | PostingLine.PostingLineText | Description |
| api annotation: | Value for this field defaults to blank. Note: if a new record is created through the user interface, the default value is as same as the value of "PostingText" of tPosting. | ||
| ttPostingSystemDate | date | Posting.PostingSystemDate | The system date of the posting corresponding to "PostingDate". |
| api annotation: | In Create mode, when Partial Update = yes - this field gets a default value which is the current date of the system. | ||
| tcPostingText | character | Posting.PostingText | Free text describing the posting. |
| api annotation: | Value for this field defaults to blank | ||
| tiPostingVoucher | integer | Posting.PostingVoucher | Voucher is a sequential number that uniquely identifies the journal entry (within the combination of an entity and a daybook code). |
| api annotation: | In create mode,enter 0 in this field - the voucher number is generated by the system. In Modify/Delete, the correct voucher number must be entered because this identifies the record. | ||
| tiProject_ID | integer | PostingLine.Project_ID | Description |
| PostingLineCustom | character | calculated | custom fields |
| CurrencyCustom | character | calculated | custom fields |
| PostingCustom | character | calculated | custom fields |
| JournalCustom | character | calculated | custom fields |
| LayerCustom | character | calculated | custom fields |
| PeriodCustom | character | calculated | custom fields |
| ti_sequence | integer | calculated | primary index |
| tc_rowid | character | calculated | = rowid(PostingLine),rowid(Currency),rowid(Posting),rowid(Journal),rowid(Layer),rowid(Period) |
QadFinancials
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 = "BPosting".
create ttContext.
assign ttContext.propertyName = "methodName"
ttContext.propertyValue = "PostingLineByGL".
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/bposting.postinglinebygl.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.