W Pub: ABAP Cursosentenciasetcountry

<html>

<head>

<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">

<meta name="GENERATOR" content="Microsoft FrontPage 4.0">

<meta name="ProgId" content="FrontPage.Editor.Document">

<title>SET COUNTRY</title>

<link rel="stylesheet" href="../../gaussr3.css" tppabs="http://www.gaussr3.com/gaussr3.css" type="text/css">

</head>

<body>

<p align="left">⚠ &lt;b&gt;<span class="titulo">SET COUNTRY</span>⚠ &lt;/b&gt;</p>

<p align="left" class="gaussr3">⚠ &lt;b&gt;Definicin⚠ &lt;/b&gt;</p>

<p align="left" class="gaussr3">Define el formato del punto decimal y el formato 

  de la fecha para todas las sentencias de escritura (⚠ &lt;a href="file:///F:/PAGINA%20WEB/GAUSSR3/abap4/sentencias/write.htm"&gt;WRITE⚠ &lt;/a&gt;) 
  que se utilicen a continuacin, de acuerdo con la parametrizacin que se haya 
  realizado sobre la tabla T005X. </p>

<p align="left" class="gaussr3">⚠ &lt;b&gt;Sintaxis:⚠ &lt;/b&gt;</p>

<pre class="gaussr3">SET COUNTRY <pas>.</pre>

<p class="gaussr3">Con <pas> identificamos el cdigo de pas a utilizar 

  en la sentencia. Si el pas existe en la tabla de pases T005X, el cdigo de 
  retorno de la sentencia es 0, en caso contrario, es 4. Si pas tiene el valor 
  SPACE se formatea la salida al formato especificado en el registro maestro del 
  usuario. El efecto de esta sentencia no se limita a la ejecucin de un programa, 
  sino que su efecto se extiende a toda el rea de trabajo del usuario.</p>

<p class="gaussr3">⚠ &lt;b&gt;Ejemplo:⚠ &lt;/b&gt;</p>

<pre class="gaussr3">DATA: RECEIVER_COUNTRY LIKE T005X-LAND, 

      DATE             LIKE SY-DATUM,
      AMOUNT           TYPE P DECIMALS 2.

...

SET COUNTRY RECEIVER_COUNTRY.

IF SY-SUBRC = 4. 

   WRITE: / RECEIVER COUNTRY, ' es desconocido'.

ENDIF.

WRITE: / DATE, AMOUNT.</pre>

</body>

</html>