usr.bin/tn3270/ctlr/inbound.c
/* EraseEndOfField - erase all characters to the end of a field */
erase all characters to the end of a field
erase all characters to the end of a field
static void
EraseEndOfField()
{
    register int i;
    if (IsProtected(CursorAddress)) {
	RingBell("Protected Field");
    } else {
	TurnOnMdt(CursorAddress);
	if (FormattedScreen()) {
	    i = CursorAddress;
	    do {
		AddHost(i, 0);
		i = ScreenInc(i);
	    } while ((i != CursorAddress) && !IsStartField(i));
	} else {                            
	    i = CursorAddress;
	    do {
		AddHost(i, 0);
		i = ScreenInc(i);
	    } while (i != HighestScreen());
       } 
    }
}
static void EraseEndOfField ( ) { register int i ; if ( IsProtected ( CursorAddress ) ) { RingBell ( " " ) ; } else { TurnOnMdt ( CursorAddress ) ; if ( FormattedScreen ( ) ) { i = CursorAddress ; do { AddHost ( i , 0 ) ; i = ScreenInc ( i ) ; } while ( ( i != CursorAddress ) && ! IsStartField ( i ) ) ; } else { i = CursorAddress ; do { AddHost ( i , 0 ) ; i = ScreenInc ( i ) ; } while ( i != HighestScreen ( ) ) ; } } }
EraseEndOfField - erase all characters to the end of a field
EraseEndOfField - erase all characters to the end of a field
/* Screen is Unformatted */