Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • SFAPV002 - Personalização da tela

Ponto-de-Entrada: SFAPV002 - Personalização da tela
Abrangências: Microsiga Protheus 10
Versões: Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todas TotvsDbAccess
Idiomas: Português (Brasil)
Descrição: 
O ponto de entrada SFAPV002 será utilizado para personalização da tela de pedido de venda. Podendo incluir, alterar ou inibir objetos e campos no dialog.
Programa Fonte 
SFPV001.PRG
Sintaxe

SFAPV002 - Personalização da tela ( < PARAMIXB> ) --> Nil

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
PARAMIXB Array of Record 1 - oCab, objeto da Folder principal
2 - aCabPed, aray com conteudo dos Gets
3 - oObj, objeto Get Peso
4 - oDlg, Objeto Dialog da tela de pedido de vendas
5 - aObj, array contendo cada um dos objetos (Gets, Buttons, etc) aObj[2][1] - Get Cond Pag aObj[2][2] - Botao Cond Pag aObj[2][3] - Get Tab Preco aObj[2][4] - Botao Tab Preco aObj[2][5] - Get Data aObj[2][6] - Botao Data aObj[2][7] - Get Transp aObj[2][8] - Botao Transp aObj[2][9] - Get FPagto aObj[2][10] - Botao FPagto aObj[2][11] - Say Inden
 X
Retorno
    Nil(nulo)
  • Nil
Exemplos 
Exemplo:Function U_SFAPV002(PARAMIXB) Local oCab  := PARAMIXB[1]Local aCabPed := PARAMIXB[2]Local aObj  := PARAMIXB[3]Local oDlg  := PARAMIXB[4]Local nPos1 := 1 @ 15,05 GET oObj VAR cText SIZE 157,15 READONLY MULTILINE OF oDlgAADD(aObj[1],oObj) // 1 nPos1 := len(aCabPed)AADD( aCabPed, { '1'       , HC5->(FieldPos('HC5_TIPENT')) } ) // @ 68,42 GET oObj VAR aCabPed[nPos1,1] READONLY SIZE 50,12 of oCabAADD(aObj[2],oObj) // Novo Get@ 68,03 BUTTON oObj CAPTION 'Botão' SIZE 34,10 ACTION U_BTNTEXTO of oCabAADD(aObj[2],oObj) // Novo Button Return