...
Este Ponto de Entrada pertence à rotina de Itens Pendentes. Ele deve ser utilizado para customização desta rotina.
Programa Fonte: EICIP150.PRW
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
User Function EICIP150() |
...
Local cParam := PARAMIXB
IF cParam == "ANTESTELA"
aadd(aCamposTRB, { "Teste"})
Endif
Local cParamIXB := iif( type("paramixb") == "A" .and. len(paramixb) > 0 , paramixb[1] , paramixb ) Do Case Case cParamIXB == "ANTESTELA" lLadrao := .F. aAdd(aCamposTRB,{"W6_HAWB","","Processo","@!"}) Case cParamIXB == "SEMSX3" aAdd(aSemSX3,{"NOME_CAMPO","TIPO",TAMANHO,DECIMAIS}) Case cParamIXB == "CAMPOTRB" lLadrao := .F. aAdd(aCamposTRB,{"W6_HAWB","","Processo","@!"}) Case cParamIXB == "LOOPSI" lLoop := .T. MsgInfo("Entrou no ponto de entrada 'LOOPSI'.") Case cParamIXB == "GRVSI" TRB->B1_DESC := "Minha descrição" MsgInfo("Entrou no ponto de entrada 'GRVSI'.") Case cParamIXB == "LOOPPO" lLoop := .T. MsgInfo("Entrou no ponto de entrada 'LOOPPO'.") Case cParamIXB == "GRVPO" TRB->B1_DESC := "Minha descrição" MsgInfo("Entrou no ponto de entrada 'GRVPO'.") Case cParamIXB == "LOOPGI" lLoop := .T. MsgInfo("Entrou no ponto de entrada 'LOOPGI'.") Case cParamIXB == "GRVGI" TRB->B1_DESC := "Minha descrição" MsgInfo("Entrou no ponto de entrada 'GRVGI'.") Case cParamIXB == "LOOPDI" lLoop := .T. MsgInfo("Entrou no ponto de entrada 'LOOPDI'.") Case cParamIXB == "GRVDI" TRB->B1_DESC := "Minha descrição" MsgInfo("Entrou no ponto de entrada 'GRVDI'.") Case cParamIXB == "CAMPOTRB" TRB->B1_DESC := "Minha descrição" MsgInfo("Entrou no ponto de entrada 'CAMPOTRB'.") EndCase Return |
| Nome | Tipo | Descrição |
|---|---|---|
| ANTESTELA | Caracter | Permite desviar da tela padrão da rotina de Itens Pendentes |
| LOOPSI | Caracter | Permite manipular variável para não exibir uma SI no relatório |
| GRVSI | Caracter | Permite gravar valores para os campos novos na opção "Solicitações Pendentes" |
| LOOPPO | Caracter | Permite manipular variável para não exibir um PO no relatório |
| GRVPO | Caracter | Permite gravar valores para campos novos na opção "Pedidos Pendentes" |
| LOOPGI | Caracter | Permite manipular variável para não exibir uma LI no relatório |
| GRVGI | Caracter | Permite gravar valores para campos novos na opção "Licenciamentos Pendentes" |
| LOOPDI | Caracter | Permite manipular variável para não exibir um Desembaraço no relatório |
| GRVDI | Caracter | Permite gravar valores para campos novos na opção "Desembaraços Pendentes" |
| CAMPOTRB | Caracter | Permite incluir novos campos na tela a ser apresentada antes da impressão |
| SEMSX3 | Array | Permite incluir novos campos no arquivo de trabalho TRB. |
| Parâmetro | Nome | Tipo | Permite alterar | Descrição | |
|---|---|---|---|---|---|
| ANTESTELA | lPadrao | Lógico | Sim | Permite desviar da tela padrão do sistema. | |
| LOOPSI | lLoop | Lógico | Sim | Permitem validar para que um registro não seja exibido no relatório | |
| LOOPPO | lLoop | Lógico | Sim | Permitem validar para que um registro não seja exibido no relatório | |
| LOOPGI | lLoop | Lógico | Sim | Permitem validar para que um registro não seja exibido no relatório | |
| LOOPDI | lLoop | Lógico | Sim | Permitem validar para que um registro não seja exibido no relatório | |
| SEMSX3 | aSemSX3 | Array | Sim | Permite alterar o array aSemSX3 | |
| CAMPOTRB | aCamposTRB | Array | Sim | Permite | a manipulação dos campos a serem exibidos em telaadicionar novos campos no relatório |
| HTML |
|---|
<!-- esconder o menu -->
<style>
div.theme-default .ia-splitter #main {
margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
display: none;
}
#main {
padding-left: 10px;
padding-right: 10px;
overflow-x: hidden;
}
.aui-header-primary .aui-nav, .aui-page-panel {
margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
margin-left: 0px !important;
}
</style>
|
