Re: embedded sql, procedure, and report output

[rob@xxxxxxxxx]

This compiles on my V5R3 machine
     h dftactgrp(*no) actgrp(*caller)
     FQSYSPRT   O    F   80        PRINTER
     D MySub           PR
     D ts              s               z
     C/exec sql
     C+ values current timestamp into :ts
     C/end-exec
      /free
       *inlr=*on;
       return;
      /end-free
     OQSYSPRT   E            H
     O                                           08 'DATE:'
     P MySub           B
     D MySub           PI
      /free
       return;
      /end-free
     P MySub           E

With TGTRLS set to *CURRENT, V5R2M0 or V5R1M0.

Rob Berendt