A word and a blow -
export PS1='$(echo ${HOSTNAME:0:10}|tr "[a-z]" "[A-Z]")-$(echo $PWD|awk "{print substr(\\$1,length(\\$1)-24,25)}")-${TAG:0:4}# '