Mudanças entre as edições de "TPHProcScript"
(→Exemplo) |
|||
| Linha 22: | Linha 22: | ||
===Exemplo=== | ===Exemplo=== | ||
{ Exemplo de como enviar o conteúdo XML para o servidor | { Exemplo de como enviar o conteúdo XML para o servidor | ||
| − | e realizar a importação no script "C_ImportacaoXML" } | + | e realizar a importação no script "C_ImportacaoXML" } |
ScriptObj := TPHProcScript.Create; | ScriptObj := TPHProcScript.Create; | ||
| Linha 29: | Linha 29: | ||
ScriptObj.Procedimento := 'ImportaXML'; | ScriptObj.Procedimento := 'ImportaXML'; | ||
ScriptObj.RequestTimeOut := 300000; | ScriptObj.RequestTimeOut := 300000; | ||
| − | // Pode ser informado diversos parâmetros para serem lidos no servidor | + | // Pode ser informado diversos parâmetros para serem lidos no servidor |
| − | ScriptObj.ParamByName('Arquivo').AsString := ConteudoXML; | + | ScriptObj.ParamByName('Arquivo').AsString := ConteudoXML; |
| − | ScriptObj.ParamByName('DocumentoID').AsLargeInt := IDDocumento; | + | ScriptObj.ParamByName('DocumentoID').AsLargeInt := IDDocumento; |
| − | // Método para executar | + | // Método para executar |
ScriptObj.Executar; | ScriptObj.Executar; | ||
// Pegar parâmetros do Retorno | // Pegar parâmetros do Retorno | ||
Edição das 09h54min de 12 de abril de 2022
O objeto TPHProcScript pode ser utilizado para realizar a execução do script no serviço da aplicação.
Propriedades
| Nome | Tipo | Descrição |
|---|---|---|
| ScriptNome | String | Nome do Script que será executado. |
| Procedimento | String | Nome do procedimento a ser executado do script. |
| RequestTimeOut | Integer | Tempo máximo em milissegundos de espera da requisição enviada |
Exemplo
{ Exemplo de como enviar o conteúdo XML para o servidor
e realizar a importação no script "C_ImportacaoXML" }
ScriptObj := TPHProcScript.Create;
try
ScriptObj.ScriptNome := 'C_ImportacaoXML';
ScriptObj.Procedimento := 'ImportaXML';
ScriptObj.RequestTimeOut := 300000;
// Pode ser informado diversos parâmetros para serem lidos no servidor
ScriptObj.ParamByName('Arquivo').AsString := ConteudoXML;
ScriptObj.ParamByName('DocumentoID').AsLargeInt := IDDocumento;
// Método para executar
ScriptObj.Executar;
// Pegar parâmetros do Retorno
Result := ScriptObj.ParamByName('Resultado').AsString;
finally
ScriptObj.Free;
end;
