エラーページの生成

Natural ランタイムによって生成されたエラーは、画面に出力されないように処理する必要があります。 このため、Natural Web インターフェイスを使用して呼び出されるすべてのプログラムには ON ERROR セクションを追加する必要があります。 また、PDA W3CONST を追加する必要もあります。

エラーが発生すると、サブルーチン W3ERROR-TEMPLATE が呼び出されます。 このルーチンは必要に応じて変更できます。

サブルーチン W3ERROR-TEMPLATE-XML では、エラーページを XHTML ページとして返します。 このルーチンは必要に応じて変更できます。 このテンプレートを有効にするには、W3ERROR-TEMPLATE をアンカタログし、このサブルーチンの名前を W3ERROR-TEMPLATE-XML から W3ERROR-TEMPLATE に変更して格納します。

サブルーチン W3ERROR-TEXT は内部使用専用です。

1 ##W3ERROR          
  2 NR         (I4)   /* i /m : Number of the error
  2 LINE       (I4)   /* i /m : Line in the Natural program
  2 SUBPROGRAM (A008) /* i /m : Subprogram name
  2 SUBROUTINE (A032) /* i /m :  Subroutine name
  2 TEXT       (A250) /* i /m : Error text

ON ERROR
  PERFORM W3ERROR ##W3ERROR
  PERFORM W3END ##RPC
  ESCAPE ROUTINE
END-ERROR