project QadFinancials > class BReason > API query ReasonByIdAllInfo


query filter (table tFilter)


tcBusinessFieldNametcDataTypetcOperator
iiReason_IDi=
tReason.LastModifiedDatet=,>=,>,<>,<=,<
tReason.LastModifiedTimei=,>=,>,<>,<=,<
tReason.LastModifiedUserc=,>=,>,<>,<=,<,begins,can-do,matches
tReason.ReasonAllocationStatusc=,>=,>,<>,<=,<,begins,can-do,matches
tReason.ReasonCodec=,>=,>,<>,<=,<,begins,can-do,matches
tReason.ReasonDescriptionc=,>=,>,<>,<=,<,begins,can-do,matches
tReason.ReasonIsActivel=,<>
tReason.ReasonIsInvoiceApprovedl=,<>
tReason.ReasonIsLockPaymentl=,<>


Parameters (internal)


iiReason_IDinteger


query condition


  each Reason where
Reason.Reason_ID = iiReason_ID


query resultset tqReasonByIdAllInfo


field namedata typedb fielddescription
tcCustomCombo0characterReason.CustomCombo0Custom Combo Field
tcCustomCombo1characterReason.CustomCombo1Custom Combo Field
tcCustomCombo2characterReason.CustomCombo2Custom Combo Field
tcCustomCombo3characterReason.CustomCombo3Custom Combo Field
tcCustomCombo4characterReason.CustomCombo4Custom Combo Field
tcCustomCombo5characterReason.CustomCombo5Custom Combo Field
tcCustomCombo6characterReason.CustomCombo6Custom Combo Field
tcCustomCombo7characterReason.CustomCombo7Custom Combo Field
tcCustomCombo8characterReason.CustomCombo8Custom Combo Field
tcCustomCombo9characterReason.CustomCombo9Custom Combo Field
ttCustomDate0dateReason.CustomDate0Custom Date Field
ttCustomDate1dateReason.CustomDate1Custom Date Field
ttCustomDate2dateReason.CustomDate2Custom Date Field
ttCustomDate3dateReason.CustomDate3Custom Date Field
ttCustomDate4dateReason.CustomDate4Custom Date Field
tdCustomDecimal0decimalReason.CustomDecimal0Custom Decimal Field
tdCustomDecimal1decimalReason.CustomDecimal1Custom Decimal Field
tdCustomDecimal2decimalReason.CustomDecimal2Custom Decimal Field
tdCustomDecimal3decimalReason.CustomDecimal3Custom Decimal Field
tdCustomDecimal4decimalReason.CustomDecimal4Custom Decimal Field
tiCustomInteger0integerReason.CustomInteger0Custom Integer Field
tiCustomInteger1integerReason.CustomInteger1Custom Integer Field
tiCustomInteger2integerReason.CustomInteger2Custom Integer Field
tiCustomInteger3integerReason.CustomInteger3Custom Integer Field
tiCustomInteger4integerReason.CustomInteger4Custom Integer Field
tcCustomLong0characterReason.CustomLong0Custom Long Field
tcCustomLong1characterReason.CustomLong1Custom Long Field
tcCustomNotecharacterReason.CustomNoteCustom Note Field
tcCustomShort0characterReason.CustomShort0Custom Short Field
tcCustomShort1characterReason.CustomShort1Custom Short Field
tcCustomShort2characterReason.CustomShort2Custom Short Field
tcCustomShort3characterReason.CustomShort3Custom Short Field
tcCustomShort4characterReason.CustomShort4Custom Short Field
tcCustomShort5characterReason.CustomShort5Custom Short Field
tcCustomShort6characterReason.CustomShort6Custom Short Field
tcCustomShort7characterReason.CustomShort7Custom Short Field
tcCustomShort8characterReason.CustomShort8Custom Short Field
tcCustomShort9characterReason.CustomShort9Custom Short Field
ttLastModifiedDatedateReason.LastModifiedDateLast Modified Date
tiLastModifiedTimeintegerReason.LastModifiedTimeLast Modified Time
tcLastModifiedUsercharacterReason.LastModifiedUserLast Modified User
tiReason_IDintegerReason.Reason_IDRecord ID
tcReasonAllocationStatuscharacterReason.ReasonAllocationStatusAllocation Status
tcReasonCodecharacterReason.ReasonCodeInvoice Status Code
tcReasonDescriptioncharacterReason.ReasonDescriptionDescription
tlReasonIsActivelogicalReason.ReasonIsActiveActive
tlReasonIsInvoiceApprovedlogicalReason.ReasonIsInvoiceApprovedInvoice Approved
tlReasonIsLockPaymentlogicalReason.ReasonIsLockPaymentLock Payment
ReasonCustomcharactercalculatedcustom fields
ti_sequenceintegercalculatedprimary index
tc_rowidcharactercalculated = rowid(Reason)


Internal usage


unused


Sample code: how to call this query through RPCRequestService (QXtend Inbound)

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 = "BReason".
create ttContext.
assign ttContext.propertyName = "methodName"
       ttContext.propertyValue = "ReasonByIdAllInfo".
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/breason.reasonbyidallinfo.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.