Histórico da Página
...
Bloco de código | ||||
---|---|---|---|---|
| ||||
#Include 'Protheus.ch' User Function M010B5CP() Local lRet := .T. Local oModel := Nil Local nOpcx := 0 Local lCopy := .F. Local lIsMvc := ( Type( 'ParamIXB' ) == 'A' ) If lIsMvc oModel := ParamIXB[ 1 ] nOpcx := ParamIXB[ 2 ] lCopy := ParamIXB[ 3 ] If lCopy .And. nOpcx == MODEL_OPERATION_INSERT oModel:LoadValue( 'B5_CEME', CriaVar( 'B5_CEME', .F. ) ) oModel:LoadValue( 'B5_ENDENT', CriaVar( 'B5_ENDENT', .F. ) ) oModel:LoadValue( 'B5_ENDREQ', CriaVar( 'B5_ENDREQ', .F. ) ) oModel:LoadValue( 'B5_ENDDEV', CriaVar( 'B5_ENDDEV', .F. ) ) EndIf EndIf Return lRet |
Parâmetros:
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas