On Wed, 13 Oct 2010, Hans Hagen wrote:

> On 13-10-2010 3:22, Procházka Lukáš Ing. - Pontex s. r. o. wrote:
>> Hello,
>> 
>> I need to typeset contents of a wide file. This works:
>> 
>> ---
>> \starttext
>> 
>> \setuppapersize[A4,landscape][A4,landscape]
>> \typefile[Dim]{Cha-MMax-iDL.txt}
>> 
>> \page
>> 
>> % RESTORE ORIGINAL PAGE SETTINGS
>> 
>> AAA
>> 
>> \stoptext
>
> You can wikify this:
>
> \setuplayout
>  [location=middle]
>
> \showframe
>
> \def\PushPaperSize
>  {\edef\PopPaperSize{\setuppapersize[\papersize][\printpapersize]}}
>
> \starttext
>    \setuppapersize[A4][A3]
>    test \page
>    \PushPaperSize
>    \setuppapersize[A4,landscape][A3,landscape]
>    test \page
>    \PopPaperSize
>    test \page
> \stoptext

From my to be completed TUGboat article:

\section {Changing paper size within a document}

To get one page (containing a table or a figure) in landscape
mode, you can use \type{\adaptpapersize}. For example,

\starttyping
\definepapersize[main] [A4] [A4]
\definepapersize[extra][A4,landscape]
                        [A4,landscape]

\setuppapersize[main]
\starttext
     Page 1. Potrait \page
     Page 2. Potrait \page
     \adaptpapersize[extra]
     Page 3. Landscape \page
     Page 4. Potrait \page
\stoptext
\stoptyping

If you have a full page figure that you want to include in a landscape 
paper, you can combine \type{\adaptpapersize} with \CONTEXT's postponing 
mechanism.

\starttyping
   \startpostponing
     \adaptpapersize[extra]
     \placefigure
       [here]
       [fig:reference]
       {The caption of the figure}
       {\extrenalgraphics[full-page-figure]}
     \page
   \stoppostponing
\stoptyping

The \type{postponing} environment postpones the figure until the next 
page. When the new page starts, \type{\adaptpapersize} changes to 
landscape mode. The \type{\page} is the end is to make sure even if some 
place is remaining on the page, we do not get any text there.

To get more than one page in landscape, you can reuse 
\type{\setuppapersize}.
For example,

\starttyping
\definepapersize[main] [A4] [A4]
\definepapersize[extra][A4,landscape]
                        [A4,landscape]

\setuppapersize[main]
\starttext
     Page 1. Potrait \page
     Page 2. Potrait \page
\setuppapersize[extra]
     Page 3. Landscape \page
     Page 4. Landscape \page
\setuppapersize[main]
     Page 5. Potrait \page
     Page 6. Potrait \page
\stoptext
\stoptyping


Aditya