Wrapper for log4r error
qgert_log_error(plogger, ps_caller, ps_msg)
log4r logger object
function from which we are called
logging message
if (FALSE) {
qgert_logger <- get_qgert_logger()
qgert_log_level(qgert_logger, 'ERROR')
qgert_log_error(qgert_logger, 'Examples', 'test message')
}