从 C SL 函数将值返回到 Progress 4GL

发布于 2024-10-28 06:10:53 字数 250 浏览 2 评论 0原文

我一直在研究 Progress 4GL 程序和从共享库调用的 C 函数之间的一些交互。

我需要编写一个新函数并将其添加到 SL 中，所以我的问题是：

Progress 可以接收从 SL C 函数返回的值吗？

比如：

Progress_data_type var = SLInvoked_function(...);

如果可能的话，有人可以指出我正确的语法或参考手册吗？

原文

I have been working with some interaction between Progress 4GL programs and C functions invoked from a Shared Library.

I need to write a new function and add it to the SL, so my question is:

Can Progress receive values returned from the SL C functions?

Something like :

Progress_data_type var = SLInvoked_function(...);

If this is possible, Can someone point me to the correct syntax or reference manual?

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

无戏配角 2024-11-04 06:10:53

以下代码显示了调用 putenv() 的示例。返回值的关键是“定义返回参数”行。

define variable x as integer no-undo.

procedure putenv external "/lib64/libc.so.6":
  define input  parameter env as character.
  define return parameter x   as long.
end.

display os-getenv( "XYZZY" ).
pause.

run putenv( "XYZZY=pflugh", output x ).
display os-getenv( "XYZZY" ).

os-command value( 'echo "$XYZZY"' ).

return.

有关更多详细信息，请查看 UNIX 共享库

The following code shows an example of calling putenv(). The key to returning a value is the "define return parameter" line.

define variable x as integer no-undo.

procedure putenv external "/lib64/libc.so.6":
  define input  parameter env as character.
  define return parameter x   as long.
end.

display os-getenv( "XYZZY" ).
pause.

run putenv( "XYZZY=pflugh", output x ).
display os-getenv( "XYZZY" ).

os-command value( 'echo "$XYZZY"' ).

return.

For more detailed information take a look at UNIX Shared Libraries

回复收藏 0 原文

~没有更多了~