%{----------------------------------------------------------------------%}
%{ Table2.ndm - Net.Data message handling, example 2. %}
%{ %}
%{ Copyright (c) 2001, Craig Pelkie %}
%{ ALL RIGHTS RESERVED %}
%{----------------------------------------------------------------------%}
%{----------------------------------------------------------------------%}
%{ Define section for macro %}
%{----------------------------------------------------------------------%}
%define {
DTW_HTML_TABLE = "YES"
%}
%{----------------------------------------------------------------------%}
%{ Message section for macro %}
%{----------------------------------------------------------------------%}
%message {
SQLSTATE : 02000 : "Customer number not in file.
" : Continue
%}
%{----------------------------------------------------------------------%}
%{ RUNSQL - run the SQL statement, generate default report %}
%{----------------------------------------------------------------------%}
%function(DTW_SQL) RUNSQL() {
select * from qiws.qcustcdt where cusnum = 111111
%}
%{----------------------------------------------------------------------%}
%{ INPUT - initial section called, runs RUNSQL macro function %}
%{----------------------------------------------------------------------%}
%html(INPUT) {
Net.Data macro Table2.ndm
Net.Data macro Table2.ndm
@RUNSQL()
@dtw_assign("a")
** END **
%}