01 · OVERVIEWOverview
TOTVS documents F290BTIT for configuring columns in FINA290 payable selection. (Refs. 1–2) TDN describes aCampos as the default columns and the aCPO return as the columns to display. The community listing places the call in FA290AUT, assigning its result to aCampos. (Ref. 4) The TDN page is historical, scoped to Protheus 10; the support article associates the entry point with FINA290 without replacing target release and patch validation. Rodolfo Vacari’s source, dated 2018-02-14, in douglasbaciodilatte/bacio_di_latte clones PARAMIXB and immediately assigns {} to the copy. It rebuilds the list instead of preserving the defaults. It adds marking, prefix, number, value and two identical E2_EMISSAO entries. Duplication was observed in the code; its visual effect was not tested. The header mentions FA290 and cost center recording; the analyzed body only builds and returns the array without write instructions. The complete file was read at the referenced commit; no reproduction license was identified, so it was analyzed without republishing the complete source. (Ref. 5)
04 · PRACTICAL EXAMPLEFour-column replacement: adapted official example
#Include "Protheus.ch"
User Function F290BTIT()
// Editorial adaptation of the TOTVS example (ref. 1).
// Starts empty because the purpose is to replace the default set.
// There is no reason to clone an array only to discard it immediately.
Local aColumns := {}
// Keeps the marking column included in the official example.
AAdd(aColumns, {"E2_OK", "", " ", ""})
AAdd(aColumns, {"E2_PREFIXO", "", "Prefix", "@!"})
AAdd(aColumns, {"E2_NUM", "", "Number", "@!"})
AAdd(aColumns, {"E2_VALOR", "", "Value", "@E 999,999,999,999.99"})
Return aColumns
Expected resultProposes marking, prefix, number and value, following the official example selection. Other default columns are absent from the returned list; not yet run in Protheus.
Comments
There are no approved comments yet.
Sign in with Google or Microsoft to comment.