¸ñÀû
ÇÔ¼ö È£ÃâÀº ÁöÁ¤µÈ Àμö¸¦ »ç¿ëÇÏ¿© ÀÌÀü¿¡ Á¤ÀÇµÈ FUNCTION ºí·ÏÀ» È£ÃâÇÕ´Ï´Ù. ÇÔ¼ö´Â ÇÔ¼ö È£ÃâÀ» ÁöÁ¤Çϱâ Àü¿¡ ÀÌ¹Ì Net.Data ¸ÅÅ©·Î¿¡ Á¤ÀǵǾî ÀÖ¾î¾ß ÇÕ´Ï´Ù.
±¸¹®
>>-@function_name--(---+----------------------------+)---------><
| +-,----------------------+ |
| V | |
+--+-variable_name------+--+-+
|-"--string--"-------|
+-variable reference-+
¸Å°³º¯¼ö
ÄÁÅØ½ºÆ®
´ÙÀ½°ú °°Àº ÄÁÅØ½ºÆ®¿¡ µé¾î ÀÖÀ» ¼ö ÀÖ½À´Ï´Ù.
Á¦ÇÑ»çÇ×
¿¹
¿¹Á¦ 1: formQuery·ÎºÎÅÍ SQL ÇÔ¼ö È£Ãâ.
%FUNCTION(DTW_SQL) formQuery(){
SELECT $(queryVal) from $(tableName)
%}
%HTML (input){
<P>Which columns of $(tableName) do you want to see?
<FORM METHOD="POST" ACTION="report">
<INPUT NAME="queryVal" TYPE="CHECKBOX" VALUE="NAME">Name
<INPUT NAME="queryVal" TYPE="CHECKBOX" VALUE="MAIL">E-mail
<INPUT NAME="queryVal" TYPE="CHECKBOX" VALUE="FAX">FAX
<INPUT TYPE="SUBMIT" VALUE="Submit request">
%}
%HTML (report){
<P>Here are the columns you selected:
<HR>@formQuery()
%}
¿¹Á¦ 2: ÀÔ·Â ¹× Ãâ·Â ¸Å°³º¯¼ö¸¦ »ç¿ëÇÑ REXX ÇÔ¼ö È£Ãâ.
%FUNCTION(DTW_REXX) my_rexx_pgm(INOUT a, b, IN c, OUT d) {
%EXEC{ mypgm.cmd this is a test %}
%}
%HTML(INPUT) {
<P> Original variable values: $(w) $(x) $(z)
<P> @my_rexx_pgm(w, x, y, z)
<P> Modified variable values: $(w) $(x) $(z)
%}