UNIX for Beginners Questions & Answers

   test "sp-j1" 
   test "sp-j2" 
   test "sp-j3" 
   test "sp-j4"

sub Pre_Shorts1 (Status_Code, Message$)
global Status

   !if Message$ <> "" then  print tab(5);Message$
   !Status = Status_Code
subend

sub Pre_Shorts2 (Status_Code, Message$)
global Status

   !if Message$ <> "" then  print tab(5);Message$
   !Status = Status_Code
subend

sub Pre_Shorts1 (Status_Code, Message$)
global Status

   if Message$ <> "" then  print tab(5);Message$
   Status = Status_Code

   test "sp-j1" 
   test "sp-j2" 
   test "sp-j3" 
   test "sp-j4" 

   call Update_Status (Status_Code, All_Failed)
subend

sub Pre_Shorts2 (Status_Code, Message$)
global Status

   !if Message$ <> "" then  print tab(5);Message$
   !Status = Status_Code
subend

var=$(grep -n "sub Pre_Shorts1" testplan_temp| cut -d : -f 1) 
line=$((var+4))
#echo $line
sed -e "${line}r file1" file2 >outputfile

sub Pre_Shorts1 (Status_Code, Message$)
global All_Failed
global BoardSet_boards_1_to_4(*)

!   if Message$ <> "" then  print tab(5);Message$
!   call Panel_Enable_Boards
!   call Update_Status (Status_Code, All_Failed)
subend

#!/bin/bash
match="Pre_Shorts1"
gotmatch=
while IFS= read line
do
  case $line in
  (*"sub $match"*)
    gotmatch=1
  ;;
  (*"call Update_Status"*|*"subend"*)
    if [ $gotmatch ]
    then
      cat file1
      gotmatch=
    fi
  ;;
  esac
  echo "$line"
done < file2

ex -s file2 <<eof
/call Update_Status/ r file1
wq
eof