| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Serviços |
| Módulo: | Gestão de Serviços |
| Função: | TECA190F.prw |
| Ticket: | 8743085 |
| Requisito/Story/Issue (informe o requisito relacionado) : | DSERSGS-8367 |
Abertura do ponto de entrada AT190FVI.
Ponto de entrada para alterar a estrutura da view. Passado por referencia: view (PARAMIXB[1]) e array com as tabelas(PARAMIXB[2]).
User Function AT190FVI()
Local oView := PARAMIXB[1] // Estrutura da View, passado por referência
Local aSubMdls := PARAMIXB[2] // Estrutura das tabelas, passado por referência
Local nX := 0
For nX := 1 To Len(aSubMdls)
If aSubMdls[nX,2] == "TGY"
aSubMdls[nX,1]:AddField("TGY_DESCPR",;
"06",;
"Descrição Produt.",;
"Descrição Produt.",;
{},;
"C",;
"@!",;
Nil,;
Nil,;
.T.,;
"",;
Nil,;
Nil,;
Nil,;
Nil,;
.T.,;
Nil)
EndIf
Next nX
Return .T.
Tabelas para manipulação:
Estrutura | Tabela |
|---|---|
oStrAA1 | AA1 |
| oStrTGY | TGY |
| oStrALC | ALC |
| oStrDTA | DTA |
Não há.