Previous: chrcmp Up: ../chrrtn.html Next: chrhtc

CHRCTH

 SUBROUTINE  CHRCTH (HOLLER,LOC,LENGTH,TEXT)
 (CHARACTER to Packed Hollerith)

 Move LENGTH  characters of  a CHARACTER  string, TEXT(*),  to a  packed
 Hollerith string, HOLLER(*), beginning at  character offset LOC (1,  2,
 3, ...) in HOLLER(*).  If either LENGTH or LOC is less than one, return
 occurs immediately with no string movement.