Answer:
start
Declarations
num weddingMonth
num weddingDay
string weddingClientName
num weddingPhoneNum
string weddingDescription
num weddingPrice
num replaceMonth
num replaceDay
string replaceClientName
num replacePhoneNum
string replaceDescription
num replacePrice
num weddingDate
num replaceDate
num bothAtEnd=0
num END_YEAR=9999
InputFile weddingFile
InputFile replaceFile
ouputFile mergedFile
getReady()
while bothAtEnd<>1
mergeRecords()
endwhile
finishUp()
stop
getReady()
open weddingFile "weddingDress.dat"
open replaceFile "replaceJacketZipper.dat"
open mergedFile “Merged.dat”
readWedding()
readreplace()
checkEnd()
return
readWedding( )
input weddingMonth,weddingDay,weddingClientName,weddingPhoneNum,weddingDescription,weddingPricee from weddingFile
while eof
weddingDate=END_YEAR
endwhile
return
readreplace( )
input replaceMonth,replaceDay,replaceClientName,replacePhoneNum,replaceDescription,replacePricee from replaceFile
while eof
replaceDate=END_YEAR
endwhile
return
checkEnd()
if weddingDate=END_YEAR
if replaceDate=END_YEAR
bothAtEnd=1
endif
endif
return
mergedFile()
if weddingDate<replaceDate
output weddingMonth,weddingDay,weddingClientName,weddingPhoneNum,weddingDescription,weddingPricee to weddingFile
readWedding()
endif
output replaceMonth,replaceDay,replaceClientName,replacePhoneNum,replaceDescription,replacePricee to replaceFile
readreplace()
return
finishUp()
close weddingFile
close replaceFile
close mergedFile
return
