TQ-LR-Take the customer code from the AccountNo

strncpy(CustomerCode,lr_eval_string("{DRAccountNo}")+5,6);

lr_save_string(CustomerCode, "DRCustomercode");