Wrapper for log4r fatal
qgert_log_fatal(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, 'FATAL')
qgert_log_fatal(qgert_logger, 'Examples', 'test message')
}