<TDS-Gaia: Generate Code> : alucinação na geração de código para rotina automatica MATA010

[dgo-angelo]

Funcionalidade:

TDS-Gaia: Generate Code

Prompt

I need an example of an automatic routine using MATA010. The list of fields should be returned automatically based on the mandadory fields from the dictionary of fields.
Create the source code using POO, making it reusable and clean.

Output

#INCLUDE "TOTVS.CH"
#INCLUDE "FWMVCDEF.CH"
#INCLUDE "FWEVENTVIEWCONSTS.CH"
#INCLUDE "FWADAPTEREAI.CH"
#INCLUDE "FWMVCDEF.CH"
#INCLUDE "PROTHEUS.CH"
#INCLUDE "MATA010.CH"

User Function MATA010()
Local oDlg
Local oModel
Local oView
Local oEvent
Local oEventView
Local oEventViewDef
Local oEventViewStruct
Local oEventViewStructDef
Local oEventViewStructField
Local oEventViewStructFieldDef
Local oEventViewStructFieldStruct
Local oEventViewStructFieldStructDef
Local oEventViewStructFieldStructCombo
Local oEventViewStructFieldStructComboDef
Local oEventViewStructFieldStructComboItem
Local oEventViewStructFieldStructComboItemDef
Local oEventViewStructFieldStructComboItemStruct
Local oEventViewStructFieldStructComboItemStructDef
Local oEventViewStructFieldStructComboItemStructField
Local oEventViewStructFieldStructComboItemStructFieldDef
Local oEventViewStructFieldStructComboItemStructFieldStruct
Local oEventViewStructFieldStructComboItemStructFieldStructDef
Local oEventViewStructFieldStructComboItemStructFieldStructCombo
Local oEventViewStructFieldStructComboItemStructFieldStructComboDef
Local oEventViewStructFieldStructComboItemStructFieldStructComboItem
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemDef
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStruct
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructDef
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructField
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldDef
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStruct
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructDef
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructCombo
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboDef
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItem
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItemDef
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItemStruct
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItemStructDef
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItemStructField
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItemStructFieldDef
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItemStructFieldStruct
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItemStructFieldStructDef
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItemStructFieldStructCombo
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboDef
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItem
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItemDef
Local oEventViewStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItemStructFieldStructComboItemStruct