PROCEDURE dbc_AfterCreateView(cViewName, lRemote) 

PROCEDURE dbc_AfterCreateView
LPARAMETERS cViewName, lRemote

* Reports to the screen Event name, where it is called from and ;
* the parameter passed.
PROCEDURE dbc_AfterCreateView ;
         (cViewName, ;
          lRemote)
 ? '>>   ' + PROGRAM()
 ?? ' in ' + SUBSTR(SYS(16),RAT('\',SYS(16))+1)
 ? '     cViewName  = ' + TRANSFORM(cViewName) + ' - ' ;
                    + TYPE('cViewName ')
 ? '     lRemote    = ' + TRANSFORM(lRemote)   + ' - ' ;
                    + TYPE('lRemote')+' /end/ '
ENDPROC