Just another side note.
The "SCREENSIZE" variable will NOT be updated when using vla-put-height etc until you exit the complete lisp call chain and return to the command line. This has been an issue for about 10 years and can cause some weird problems if a subsequent call is made to (getvar "SCREENSIZE") in the current routine chain.