Enviar Archivo desde servidor sap a un servidor externo

Colapsar
X
 
  • Tiempo
  • Mostrar
Limpiar Todo
nuevos mensajes
  • Irua
    Member
    • jun
    • 83

    #1

    Enviar Archivo desde servidor sap a un servidor externo

    Hola Tengo un opendataset que me genera un txt y lo envia al servidor sap

    Lo que requiero es enviar ese mismo archivo a servidor externo


    Por favor si me pueden asesorar ya que soy novata programando en abap
  • K-MUS
    Member
    • feb
    • 87

    #2
    Originalmente publicado por Irua
    Hola Tengo un opendataset que me genera un txt y lo envia al servidor sap

    Lo que requiero es enviar ese mismo archivo a servidor externo


    Por favor si me pueden asesorar ya que soy novata programando en abap
    Irua, el dataset te pide un path ese path no necesariamente tiene q ser de SAP, podes ponerle cualquier ruta que este en algun servidor que tengas acceso.

    Simplemente que te pasen la ruta de la carpeta y listo.

    Comentario

    • DCErick
      Moderator
      • mar
      • 1090

      #3
      Originalmente publicado por K-MUS
      Irua, el dataset te pide un path ese path no necesariamente tiene q ser de SAP, podes ponerle cualquier ruta que este en algun servidor que tengas acceso.

      Simplemente que te pasen la ruta de la carpeta y listo.
      K-MUS tiene toda la razon...
      Yo uso opendataset para bajar y subir archivos carpetas compartidas, y uso las rutas de esta manera:
      \\IP\Carpeta\Archivo.txt
      -------------------
      ¿Dudas para descargar manuales? Ver este tema -> Cómo descargar manuales de la sección "Descargas" ?

      Comentario

      • Irua
        Member
        • jun
        • 83

        #4
        Originalmente publicado por DCErick
        K-MUS tiene toda la razon...
        Yo uso opendataset para bajar y subir archivos carpetas compartidas, y uso las rutas de esta manera:
        \\IP\Carpeta\Archivo.txt

        Ok disculpen pero tendran algun ejemplo porque de la manera que lo estoy haciendo me da error

        gracias

        Comentario

        • DCErick
          Moderator
          • mar
          • 1090

          #5
          Originalmente publicado por Irua
          Ok disculpen pero tendran algun ejemplo porque de la manera que lo estoy haciendo me da error

          gracias
          Porque no pones tu codigo para mirarlo.....

          Saludos...
          -------------------
          ¿Dudas para descargar manuales? Ver este tema -> Cómo descargar manuales de la sección "Descargas" ?

          Comentario

          • Irua
            Member
            • jun
            • 83

            #6
            Originalmente publicado por DCErick
            Porque no pones tu codigo para mirarlo.....

            Saludos...

            OPEN DATASET FILE FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.
            * IF sy-subrc NE 0.
            * FORMAT COLOR 6 INTENSIFIED OFF.
            * ULINE AT (255).
            * WRITE: / sy-vline,
            * ' No se pudo crear al archivo : ',
            * 255 sy-vline.
            * FORMAT COLOR 2 INTENSIFIED OFF.
            * WRITE: / sy-vline,
            * ' ', FILE,
            * 255 sy-vline.
            * ULINE AT (255).
            * EXIT.
            * ENDIF.
            * LOOP AT T_CORREO.
            * LINEA+1 = T_CORREO-ROW2.
            * TRANSFER LINEA TO FILE.
            * TRANSFER file TO 'U:\txt'.
            * ENDLOOP.
            *
            *
            *CLOSE DATASET FILE.

            Comentario

            • Irua
              Member
              • jun
              • 83

              #7
              Hola vi la recomendaciones y con el open dataset me funciono colocando la ruta o patch tal cual me dijistes

              Ahora corro el programa y todo bien, pero cuado ejecuto proceso de fondo solo me dice "Report Z_USUA_RED_LOTUS lanzado como Job de Fondo", pero al verificar en el directorio si crea el archivo, pues no lo genera, anexo el codigo y mil gracias
              file = '\\191.9.4.26\sys\share\Basu\24092007.txt'.

              OPEN DATASET FILE FOR OUTPUT IN TEXT MODE ENCODING DEFAULT.
              IF sy-subrc NE 0.
              FORMAT COLOR 6 INTENSIFIED OFF.
              ULINE AT (255).
              WRITE: / sy-vline,
              ' No se pudo crear al archivo : ',
              255 sy-vline.
              FORMAT COLOR 2 INTENSIFIED OFF.
              WRITE: / sy-vline,
              ' ', FILE,
              255 sy-vline.
              ULINE AT (255).
              EXIT.
              ENDIF.

              LOOP AT T_CORREO.
              LINEA+1 = T_CORREO-ROW2.
              TRANSFER LINEA TO FILE.
              ENDLOOP.

              CLOSE DATASET FILE.


              OPEN DATASET file FOR INPUT IN TEXT MODE ENCODING DEFAULT.

              IF sy-subrc NE 0.
              FORMAT COLOR 6 INTENSIFIED OFF.
              ULINE AT (255).
              WRITE: / sy-vline,
              ' No se pudo abrir el archivo : ',
              255 sy-vline.
              FORMAT COLOR 2 INTENSIFIED OFF.
              WRITE: / sy-vline,
              ' ', FILE,
              255 sy-vline.
              ULINE AT (255).

              EXIT.
              ENDIF.
              CLEAR T_CORREO.
              REFRESH T_CORREO.

              DO.
              READ DATASET FILE INTO LINEA.
              IF sy-subrc NE 0.
              EXIT.
              ENDIF.
              T_CORREO-ROW2 = LINEA+1(250).
              APPEND T_CORREO.
              ENDDO.
              CLOSE DATASET FILE.

              ENDIF.
              Editado por última vez por Irua; 24/09/2007, 18:36:00.

              Comentario

              Trabajando...