the line of code is

use cliparam order client shared

the error trapping is:

ON ERROR DO errorhnd WITH ERROR( ), MESSAGE( ), MESSAGE(1), PROGRAM( ), LINENO( )

the problem is that the error procedure only sees:
"use cliparam order client"

What happened to the "share" ?