project QadFinancials > class BBusinessRelation > method ApiLoadBusinessRelationCalcAddressTypeCode
function returns character
Description
This method is used for ApiLoadBusinessRelation to get AddressTypeCode by AddressTypeID.
Parameters
iiAddressTypeId | input | integer | Address Type Id |
Internal usage
QadFinancials
program code (program9/bbusinessrelation.p)
define variable oiReturnStatus as integer no-undo.
if iiAddressTypeId = ? or
iiAddressTypeId = 0
then return "":U.
<Q-2 run AddressTypePrim (all) (Read) (Cache)
(input iiAddressTypeId, (AddressTypeId)
input ?, (AddressTypeCode)
output dataset tqAddressTypePrim) in BAddressType >
find first tqAddressTypePrim where
tqAddressTypePrim.tiAddressType_ID = iiAddressTypeId
no-error.
return if available tqAddressTypePrim
then tqAddressTypePrim.tcAddressTypeCode
else "":U.