Histórico da Página

User functionFunction EFFMV160()
    Local cParam := If(Type("ParamIxb") = "A",ParamIxb[1],If(Type("ParamIxb") = "C",ParamIxb,""))
DO
    Do Case
case        Case cParam == "ADD_WORK_STRU"//cria um campo novoAdiciona novos campos ao array para serem criados na tabela temporária
            AADD(aEstru,{ "EF1_MDPDES" , "C", 50, 0})
case
        Case cParam == "GRAVA_WORK"//grava dados no campo novo
Permite gravar informações nos campos da tabela temporária work
            Work->EF1_MDPDES := "gravado via ponto de entrada"

        Case cParam == "ADD_COLUNA_ARQUIVO" //Adiciona as colunas criadas no aEstru para geraçãoAo criar novos campos na tabela temporária, estes devem ser adicionados ao array aTitulos para que sejam exibidos no relatório em arquivo
            aAdd(aTitulos,{"Campo PE","C","",""})
EndCase
return

    End Case

Return