/*
 * Created: Sat Feb 17 20:07:55 1996 too
 * Last Modified: Sun Feb 18 17:18:01 1996 too
 */
Address 'COMMAND'
Parse Arg SUM' 'PFILE

if ~Open(pf, PFILE, 'R') Then
	Do; Say '*** Cannot open file "'PFILE'"'; Exit 10; End

i = 31
do until EOF(pf)
	line = ReadLn(pf)
	Say line " " SUM
	If left(line, 32) = SUM Then Exit i
	i = i + 1
End
Exit 30

