This is rather a COBOL related question than a Micro Focus related question, I'm afraid:
From other programming languages I'm used to be able to provide literals instead of data items when I'm using them as a constant value (a so-called "r-value").
When such compiler complains that it doesn't know how to coerce the literal value to an expected data type, I'm usually able to add a cast modifier to that literal value, so the compiler will know how to store the literal value.
Is it possible in COBOL, too, to enter such literal and provide a casting expression along? E.g.:
CALL "PrintThis" USING BY CONTENT "This is a test." AS PIC A(50).