CX_OLE_WORD2000::StartPutIntoDoc

 
carryOle GetManager(COM) Call(GetToolObject) -> morePagesTool

      carryOle CopyTransObject -> oleObj // must be a copied document, because there is already a cache available
      
      // oleObj is temporary for holding the prepared page
      printDoc oleObj oleFooterHeight itemCounter if oleCarryOverHeight else 0
      morePagesTool Call(StartPutIntoDoc) -> moreParagraphs
      FALSE -> beginOfNewPage

      //Comparevariable for finding oversized paragraphs
      Var(compareOleObj)      
      NULL -> compareOleObj
      do
        moreParagraphs ifnot break  
        //If the compareObject equals oleObj after the pagebreak, alert a messagebox for warning.
        compareOleObj Dup if { oleObj = if { PrintOversizedObject break } } else Drop
        PrintCarryOver
        carryOle CopyTransObject -> oleObj // must be a copied document, because only then there is a cache available                
        oleObj CopyTransObject -> compareOleObj  //Gets the CompareObject from the oleObj before oleObj changed his status
        oleObj morePagesTool Call(Continue) -> moreParagraphs   //oleObj will changed his status
        
        FALSE -> beginOfNewPage
      loop