>Select Missingobject > >SCAN > >IF RECNO()=1 >cReplacedText=ALLTRIM(STR(FObjectno))+" 0 obj <</Type /Page /Parent 2 0 R /MediaBox" >nObjectPosition=ATC('_123456789_123456789_123456789__0 R /MediaBox',cFile,RECNO()) >STRTRAN(cFile,'_123456789_123456789_123456789__0 R /MediaBox',cReplacedText,nObjectPosition,RECNO()) >*STRTRAN(cFIle,'_123456789_123456789_123456789__0 R /MediaBox',cReplacedText) >ENDIF > >IF RECNO()>1 >cReplacedText=ALLTRIM(STR(FObjectno))+" 0 obj <</Type /Page /Parent 2 0 R /MediaBox" >nObjectPosition=ATC('_123456789_123456789_123456789__ 0 R /MediaBox',cFile,RECNO()) >*STRTRAN(cFile,'_123456789_123456789_123456789__ 0 R /MediaBox',cReplacedText,RECNO()) >STRTRAN(cFile,'_123456789_123456789_123456789__ 0 R /MediaBox',cReplacedText,nObjectPosition,RECNO()) >Endif >Endscan > >STRTOFILE(cFile,'D:\1024729126-WMCCC.PDF') > > >I need to Replace Two types of Strings in cFile i.e '_123456789_123456789_123456789__0 R /MediaBox' and ''_123456789_123456789_123456789__ 0 R /MediaBox' with ALLTRIM(STR(FObjectno))+" 0 obj <</Type /Page /Parent 2 0 R /MediaBox. > >>