Ponto de Entrada
Descrição: | Após a gravação dos dados |
Localização: | Plano Saúde/Atualização/Atendimento/An. Solic. Opc. |
Eventos: | An. Solic. Opc. |
Programa Fonte: | PLSFORMOPC |
Função: | SIGAPLS |
Retorno: | Nome | Tipo | Descrição | Obrigatório | cUrl | Caracter | Url com o form específico | x |
|
Exemplo:
#Include 'Protheus.ch'
User Function PLSFORMOPC()
Local aArea := GetArea()
Local cClass := PARAMIXB[1]
Local nRecno := PARAMIXB[2]
//validações específicas
RestArea(aArea)
return "w_minhawebfunction.apw"
web function minhawebfunction()
LOCAL cHtml := ""
WEB EXTENDED INIT cHtml START "InSite"
//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//³Mostra a pagina para entrar com o protocolo/Guia ³
//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
cHtml := ExecInPage( "meuahu" )
WEB EXTENDED END
//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//³ Fim da rotina ³
//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
Return cHtml
arquivo meuahu.ahu:
<%=oHtml:getDType(.T.,.T.)%>
<%
oForm := WCForm():New("Form1")
oForm:setTitle("Formulario")
oTabela := WCTable():New()
oLiCab := WCLine():New()
oCHTM := WCComponent():new('CHTM')
oCHTM:setValue('<img src="smiley.gif" alt="Smiley face" height="42" width="42">')
oFSPar:setAddCFS(oCHTM)
oLiCab:setAddComp(oCHTM)
oTabela:setAddLine(oLiCab)
oForm:setAddTables(oTabela)
oHtml:setObj(oForm)
%>
<%=oHtml:loadWC()%>
Descrição: | Antes da gravação dos dados |
Localização: | Plano Saúde/Atualização/Atendimento/An. Solic. Opc. |
Eventos: | An. Solic. Opc. |
Programa Fonte: | PLSGRVBEN |
Função: | SIGAPLS |
Retorno: | Nome | Tipo | Descrição | Obrigatório | aRet | array | na primeira posição retorno lógico e na segunda mensagem de aviso | aRet[1] | | | | aRet[2] deve ser informado quando o retorno for .F. |
|
Exemplo:
#Include 'Protheus.ch'
User Function PLSGRVBEN()
Local aArea := GetArea()
Local aRet := {}
Local aDados := PARAMIXB[1]
//validações específicas
aadd(aRet,.t.)
RestArea(aArea)
return aRet
Descrição: | Antes de incluir as informações na tabela de Beneficiários x Opcionais |
Localização: | Plano Saúde/Atualização/Atendimento/An. Solic. Opc. |
Eventos: | An. Solic. Opc. |
Programa Fonte: | PLVINSOP |
Função: | SIGAPLS |
Retorno: | Nome | Tipo | Descrição | Obrigatório | aRet | array | na primeira posição retorno lógico e na segunda mensagem de aviso | aRet[1] | | | | aRet[2] deve ser informado quando o retorno for .F. |
|
Exemplo:
#Include 'Protheus.ch'
User Function PLVINSOP()
Local aArea := GetArea()
Local aRet:= {}
Local cMatric := PARAMIXB[1]
Local cCodOpc := PARAMIXB[2]
Local dDtBase := PARAMIXB[3]
Local dDtLim := PARAMIXB[4]
//validações específicas
aadd(aRet,.t.)
RestArea(aArea)
return aRet