project QadFinancials > class BCountry > API query SelectCountryByID

Description

Select country by ID


query filter (table tFilter)


tcBusinessFieldNametcDataTypetcOperator
tCountry.CountryCodec=,>=,>,<>,<=,<,begins,can-do,matches
tCountry.CountryDescriptionc=,>=,>,<>,<=,<,begins,can-do,matches
tCountry.CountryIsActivel=,<>
tCountry.CountryIsEUCountryl=,<>
tCountry.LastModifiedDatet=,>=,>,<>,<=,<
tCountry.LastModifiedTimei=,>=,>,<>,<=,<
tCountry.LastModifiedUserc=,>=,>,<>,<=,<,begins,can-do,matches


query condition


  each Country where


query sort order


Country.CountryCode (ascending)


query resultset tqSelectCountryByID


field namedata typedb fielddescription
tiBLWICountry_IDintegerCountry.BLWICountry_IDBLWI Country Code
tiCountry_IDintegerCountry.Country_IDRecord ID
tcCountryCodecharacterCountry.CountryCodeCountry Code
tcCountryDescriptioncharacterCountry.CountryDescriptionDescription
tlCountryIsActivelogicalCountry.CountryIsActiveActive
tlCountryIsEUCountrylogicalCountry.CountryIsEUCountryEU Member
tiCurrency_IDintegerCountry.Currency_IDCurrency Code
tcCustomCombo0characterCountry.CustomCombo0Custom Combo Field
tcCustomCombo1characterCountry.CustomCombo1Custom Combo Field
tcCustomCombo2characterCountry.CustomCombo2Custom Combo Field
tcCustomCombo3characterCountry.CustomCombo3Custom Combo Field
tcCustomCombo4characterCountry.CustomCombo4Custom Combo Field
tcCustomCombo5characterCountry.CustomCombo5Custom Combo Field
tcCustomCombo6characterCountry.CustomCombo6Custom Combo Field
tcCustomCombo7characterCountry.CustomCombo7Custom Combo Field
tcCustomCombo8characterCountry.CustomCombo8Custom Combo Field
tcCustomCombo9characterCountry.CustomCombo9Custom Combo Field
ttCustomDate0dateCountry.CustomDate0Custom Date Field
ttCustomDate1dateCountry.CustomDate1Custom Date Field
ttCustomDate2dateCountry.CustomDate2Custom Date Field
ttCustomDate3dateCountry.CustomDate3Custom Date Field
ttCustomDate4dateCountry.CustomDate4Custom Date Field
tdCustomDecimal0decimalCountry.CustomDecimal0Custom Decimal Field
tdCustomDecimal1decimalCountry.CustomDecimal1Custom Decimal Field
tdCustomDecimal2decimalCountry.CustomDecimal2Custom Decimal Field
tdCustomDecimal3decimalCountry.CustomDecimal3Custom Decimal Field
tdCustomDecimal4decimalCountry.CustomDecimal4Custom Decimal Field
tiCustomInteger0integerCountry.CustomInteger0Custom Integer Field
tiCustomInteger1integerCountry.CustomInteger1Custom Integer Field
tiCustomInteger2integerCountry.CustomInteger2Custom Integer Field
tiCustomInteger3integerCountry.CustomInteger3Custom Integer Field
tiCustomInteger4integerCountry.CustomInteger4Custom Integer Field
tcCustomLong0characterCountry.CustomLong0Custom Long Field
tcCustomLong1characterCountry.CustomLong1Custom Long Field
tcCustomNotecharacterCountry.CustomNoteCustom Note Field
tcCustomShort0characterCountry.CustomShort0Custom Short Field
tcCustomShort1characterCountry.CustomShort1Custom Short Field
tcCustomShort2characterCountry.CustomShort2Custom Short Field
tcCustomShort3characterCountry.CustomShort3Custom Short Field
tcCustomShort4characterCountry.CustomShort4Custom Short Field
tcCustomShort5characterCountry.CustomShort5Custom Short Field
tcCustomShort6characterCountry.CustomShort6Custom Short Field
tcCustomShort7characterCountry.CustomShort7Custom Short Field
tcCustomShort8characterCountry.CustomShort8Custom Short Field
tcCustomShort9characterCountry.CustomShort9Custom Short Field
ttLastModifiedDatedateCountry.LastModifiedDateLast Modified Date
tiLastModifiedTimeintegerCountry.LastModifiedTimeLast Modified Time
tcLastModifiedUsercharacterCountry.LastModifiedUserLast Modified User
CountryCustomcharactercalculatedcustom fields
ti_sequenceintegercalculatedprimary index
tc_rowidcharactercalculated = rowid(Country)


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 = "BCountry".
create ttContext.
assign ttContext.propertyName = "methodName"
       ttContext.propertyValue = "SelectCountryByID".
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/bcountry.selectcountrybyid.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.