Ponto-de-Entrada: PLSAIOPF - Manipulação de Opcionais e Formas de Cobrança
Descrição:
Este ponto de entrada permite a manipulação dos valores de opcionais e formas de cobrança recentemente atualizados no browse.
Eventos
Programa Fonte
PLSA260
Sintaxe
PLSAIOPF - Manipulação de Opcionais e Formas de Cobrança ( [ oBrwOpc ], [ oBrwOUsu ], [ oBrwFrOpc ], [ oBrwUFrOpc ] )
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| oBrwOpc | Objeto | "BF1" - Opcional da familia | |||||||||||||||
| oBrwOUsu | Array of Record | "BF4" - Opcional do usuário | |||||||||||||||
| oBrwFrOpc | Array of Record | "BK0" - Forma de cobrança familia | |||||||||||||||
| oBrwUFrOpc | Array of Record | "BYX" - Forma de cobrança usuário |
Retorno
-
()
Observações
Exemplos
User Function PLSAIOPF //oBrwOpc "BF1" - Opcional da familia //oBrwOUsu "BF4" - Opcional do usuario //oBrwFrOpc "BK0" - Forma de cobranca familia //oBrwUFrOpc "BYX" - Forma de cobranca usuario Local nXIf Type("M->BA1_TIPREG") != "C" .Or. Type("M->BA1_NOMUSR") != "C" ReturnEndIf For nX := 1 To Len(oBrwOUsu:aCols) If oBrwOUsu:ACOLS[nX][4] == M->BA1_TIPREG .And. ! Empty(oBrwOUsu:ACOLS[nX][1]) oBrwOUsu:ACOLS[nX][7] := M->BA1_NOMUSR //Nome do usuário copiado para o sétimo campo dos opcionais EndIfNext nXReturn