Cobol Foro
Registrarse
Temas de Hoy
Enlaces
Registrarse
Preguntas Frecuentes
Lista de Usuarios
Calendario
Cobol Foro
Navegación en el Foro
Retroceder   Cobol Foro Entornos de desarrollo y compiladores Cobol Fujitsu COBOL PowerCOBOL (ActiveX, v4 - v11)
Actualizar esta página [Duda] Envio de Mensajes por whatsapp
PowerCOBOL (ActiveX, v4 - v11) Versiones del IDE basadas en ActiveX
 
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Sintaxis] Leer mensajes de WhatsApp Begoguay PowerCOBOL (ActiveX, v4 - v11) 3 31 de octubre de 2023 11:49
[Duda] Envío de SMS... Fito PowerCOBOL (ActiveX, v4 - v11) 10 25 de noviembre de 2018 23:35
[Sintaxis] Ejemplo de envío FTP Fito WinDev 0 29 de agosto de 2016 23:45
[Sintaxis] Envio de SMS Roger PowerCOBOL (ActiveX, v4 - v11) 10 22 de junio de 2015 22:57
[Sintaxis] Envio de alertas y Chat Roger PowerCOBOL (ActiveX, v4 - v11) 1 21 de marzo de 2015 22:25

Respuesta
 
Herramientas

  #1
Antiguo 24 de noviembre de 2018, 02:32
Roger
Forero Activo
Última Actividad 04.02.2021 13:03
Posts Posts: 236
Likes enviados Enviados: 26
Likes recibidos Recibidos: 60
Tableta Envio de Mensajes por whatsapp
0
Likes

None...

Inactivo Inactivo
¿Se puede Enviar mensajes por WhatsApp Web usando un programa powercobol?
de manera directa.
Roger is offline   Responder Con Cita
  #2
Antiguo 26 de noviembre de 2018, 15:04
Fito
Guardián del Foro
Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Issue reason: Por muchos agradecimientos de parte de los Foreros Guardián del Foro: Guardián del espíritu y clima del Foro - Issue reason: Por el Avatar Activista del Foro: Activista del Foro - Issue reason: Por aportar ideas 
Última Actividad 19.09.2026 13:19
Posts Posts: 458
Likes enviados Enviados: 267
Likes recibidos Recibidos: 243
Predeterminado
0
Likes

None...

Inactivo Inactivo
Hola Roger:

Según tengo entendido hay que conectarse con una api o webservice que te haga la conexion, seguremante de pago.

Saludos.

Fito...
Fito is offline   Responder Con Cita
  #3
Antiguo 27 de noviembre de 2018, 15:43
Roger
Forero Activo
Última Actividad 04.02.2021 13:03
Posts Posts: 236
Likes enviados Enviados: 26
Likes recibidos Recibidos: 60
Predeterminado
0
Likes

None...

Inactivo Inactivo
Asi es Fito uso el webservice es gratuito pero deseo usar el api estoy haciendo pruebas pero me falta a seguir testeando.
Roger is offline   Responder Con Cita
  #4
Antiguo 27 de noviembre de 2018, 18:25
Fito
Guardián del Foro
Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Issue reason: Por muchos agradecimientos de parte de los Foreros Guardián del Foro: Guardián del espíritu y clima del Foro - Issue reason: Por el Avatar Activista del Foro: Activista del Foro - Issue reason: Por aportar ideas 
Última Actividad 19.09.2026 13:19
Posts Posts: 458
Likes enviados Enviados: 267
Likes recibidos Recibidos: 243
Predeterminado
3
Likes

Celina
Kuk
Tigre

 Inactivo Inactivo
Hola Roger:

Acá te voy a pegar algo que estuve probando cuando intenté trabajar con webservice.
No sé si será parecido a lo que necesitás, vos verás.
Ademas te cuento que bajé un programa para probar la comunicación con el webservice que me sirvió para hacer todo esto. Se llama "Postman", fijate si te sirve.

Saludos.

Fito...

Código COBOL:
  1.  IDENTIFICATION DIVISION.
  2.  PROGRAM-ID.  YEISON.
  3.  ENVIRONMENT DIVISION.
  4.  CONFIGURATION SECTION.
  5.  REPOSITORY.
  6.      CLASS COM AS "*COM"
  7.      CLASS COMEXCEPTION AS "*COM-EXCEPTION".
  8.  DATA DIVISION.
  9.  WORKING-STORAGE SECTION.
  10.  
  11.  01  winhttp           pic x(128) value "WinHttp.WinHttpRequest.5.1".
  12.  
  13.  01  oWS usage object reference COM.
  14.  
  15.  01  metodo            pic x(256) value "POST".
  16.  01  api               pic x(256) value "http://104.131.172.142/chhapi/".
  17.  01  modo              pic x(256) value "FALSE".
  18.  
  19.  01  respuesta         pic x(8192).
  20.  
  21.  01  sep-f             pic x(12) value '------Fito' & X'0D0A'.
  22.  01  sep-1             pic xx    value X'0D0A'.
  23.  01  sep-2             pic xxxx  value X'0D0A0D0A'.
  24.  
  25.  01  COMM-verPedidos.
  26.      02                         pic x(12) value '------Fito' & X'0D0A'.
  27.      02                         pic x(49) value 'Content-Disposition: form-data; name="action"' & X'0D0A0D0A'.
  28.      02                         pic x(12) value 'verPedidos' & X'0D0A'.
  29.      02                         pic x(12) value '------Fito' & X'0D0A'.
  30.      02                         pic x(48) value 'Content-Disposition: form-data; name="token"' & X'0D0A0D0A'.
  31.      02 verPedidos-token        pic x(32) value '73b1f30a5879bc43c18e8f8cb5ab2f78'.
  32.      02                         pic x(2)  value X'0D0A'.
  33.      02                         pic x(12) value '------Fito' & X'0D0A'.
  34.      02                         pic x(45) value 'Content-Disposition: form-data; name="st"' & X'0D0A0D0A'.
  35.      02 verPedidos-estado       pic x(1)  value 'N'.
  36.      02                         pic x(2)  value X'0D0A'.
  37.      02                         pic x(12) value '------Fito' & X'0D0A'.
  38.      02                         pic x(52) value 'Content-Disposition: form-data; name="timeStart"' & X'0D0A0D0A'.
  39.      02 verPedidos-desfec       pic x(10) value '2016-05-13'.
  40.      02                         pic x(2)  value X'0D0A'.
  41.      02                         pic x(12) value '------Fito' & X'0D0A'.
  42.      02                         pic x(50) value 'Content-Disposition: form-data; name="timeEnd"' & X'0D0A0D0A'.
  43.      02 verPedidos-desfec       pic x(10) value '2016-05-13'.
  44.      02                         pic x(2)  value X'0D0A'.
  45.      02                         pic x(12) value '------Fito--'.
  46.  01  verPedidos redefines COMM-verPedidos pic x(389).
  47.  
  48.  01  COMM-verCobranzas.
  49.      02                         pic x(12) value '------Fito' & X'0D0A'.
  50.      02                         pic x(49) value 'Content-Disposition: form-data; name="action"' & X'0D0A0D0A'.
  51.      02                         pic x(14) value 'verCobranzas' & X'0D0A'.
  52.      02                         pic x(12) value '------Fito' & X'0D0A'.
  53.      02                         pic x(48) value 'Content-Disposition: form-data; name="token"' & X'0D0A0D0A'.
  54.      02 verCobranzas-token      pic x(32) value '73b1f30a5879bc43c18e8f8cb5ab2f78'.
  55.      02                         pic x(2)  value X'0D0A'.
  56.      02                         pic x(12) value '------Fito' & X'0D0A'.
  57.      02                         pic x(45) value 'Content-Disposition: form-data; name="st"' & X'0D0A0D0A'.
  58.      02 verCobranzas-estado     pic x(1)  value 'N'.
  59.      02                         pic x(2)  value X'0D0A'.
  60.      02                         pic x(12) value '------Fito' & X'0D0A'.
  61.      02                         pic x(52) value 'Content-Disposition: form-data; name="timeStart"' & X'0D0A0D0A'.
  62.      02 verCobranzas-desfec     pic x(10) value '2016-05-13'.
  63.      02                         pic x(2)  value X'0D0A'.
  64.      02                         pic x(12) value '------Fito' & X'0D0A'.
  65.      02                         pic x(50) value 'Content-Disposition: form-data; name="timeEnd"' & X'0D0A0D0A'.
  66.      02 verCobranzas-desfec     pic x(10) value '2016-05-13'.
  67.      02                         pic x(2)  value X'0D0A'.
  68.      02                         pic x(12) value '------Fito--'.
  69.  01  verCobranzas redefines COMM-verCobranzas pic x(391).
  70.      
  71.  01  RH11              pic x(256) value "Content-Type".
  72.  01  RH12              pic x(256) value "multipart/form-data; boundary=----Fito".
  73.  
  74.  01  RH21              pic x(256) value "Cache-Control".
  75.  01  RH22              pic x(256) value "no-cache".
  76.  
  77.  LINKAGE SECTION.
  78.  
  79.  01  yeison-params.
  80.      02 yeison-comm    pic 99.
  81.      02 yeison-fec1    pic 9(8).
  82.      02 yeison-fec2    pic 9(8).
  83.      02 yeison-resp    pic x(8192).
  84.      02 yeison-envio   pic x(8192).
  85.  
  86.  PROCEDURE DIVISION using yeison-params.
  87.  
  88.  declaratives.
  89.      err section.
  90.         use after exception excep.
  91.         invoke exception-object "GET-SOURCE"      returning SRC.
  92.         invoke exception-object "GET-DESCRIPTION" returning MSG.
  93.         invoke pow-self "DisplayMessage" using MSG SRC POW-DMICONERROR.
  94.         exit program.
  95.  
  96.  end declaratives.
  97.  
  98.  Programa Section.
  99.        
  100.  comienzo.
  101.      invoke COM "CREATE-OBJECT" using winhttp returning oWS.
  102.  
  103.      invoke oWS "OPEN" using metodo api modo.
  104.  
  105.      invoke oWS "setRequestHeader" using RH11 RH12.
  106.      invoke oWS "setRequestHeader" using RH21 RH22.
  107.  
  108.      evaluate yeison-comm
  109.         when function upper-case(yeison-comm) = "VERPEDIDOS"
  110.            invoke oWS "send" using verPedidos
  111.            move verPedidos   to yeison-envio
  112.      end-evaluate.
  113.      
  114.      invoke oWS "get-Responsetext" returning respuesta.
  115.  
  116.      move respuesta    to yeison-resp.
  117.  
  118.      set oWS           to null.
  119.  
  120.  sale.
  121.      exit program.
  122.  
  123.  END PROGRAM YEISON.
Fito is offline   Responder Con Cita
  #5
Antiguo 28 de noviembre de 2018, 03:10
Roger
Forero Activo
Última Actividad 04.02.2021 13:03
Posts Posts: 236
Likes enviados Enviados: 26
Likes recibidos Recibidos: 60
Predeterminado
0
Likes

None...

Inactivo Inactivo
Gracias Fito me servira de referencia todo suma.
Roger is offline   Responder Con Cita
  #6
Antiguo 23 de marzo de 2021, 18:31
JCantero
El Foro es mi casa
Activista del Foro: Activista del Foro - Issue reason: Por participación activa Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Issue reason: Por muchos agradecimientos de parte de los Foreros 
Última Actividad 02.09.2026 00:15
Posts Posts: 442
Likes enviados Enviados: 167
Likes recibidos Recibidos: 269
Predeterminado
2
Likes

Kuk
Tigre

 Inactivo Inactivo
Espiar a alguien es completamente ilegal. Sin paliativos.

Tened cuidado en pinchar en link de este tipo que producen efectos colaterales.
JCantero is offline   Responder Con Cita
  #7
Antiguo 23 de marzo de 2021, 19:07
Kuk
Administrador
Última Actividad 19.09.2026 20:11
Posts Posts: 2.500
Likes enviados Enviados: 1037
Likes recibidos Recibidos: 1207
Predeterminado
1
Likes

JCantero

 Inactivo Inactivo
@JCantero, este se había creído que somos tontos. Como viene de Ucrania, Kansas...


NORMAS DEL FORO - para garantizar el buen funcionamiento del Foro.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale haciendo clic en su Nick
Kuk is offline   Responder Con Cita
  #8
Antiguo 23 de marzo de 2021, 19:33
Josber
Moderador Global
Activista del Foro: Activista del Foro - Issue reason: Por aportar manuales y enriquecer  Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Issue reason: Por muchos agradecimientos 
Última Actividad 20.09.2026 12:17
Posts Posts: 883
Likes enviados Enviados: 418
Likes recibidos Recibidos: 492
Predeterminado
0
Likes

None...

Inactivo Inactivo
Citación del post de Kuk Ver Mensaje
❞
Como viene de Ucrania, Kansas...


Pa'vernos matao ....
Josber is offline   Responder Con Cita
  #9
Antiguo 23 de marzo de 2021, 21:29
Kuk
Administrador
Última Actividad 19.09.2026 20:11
Posts Posts: 2.500
Likes enviados Enviados: 1037
Likes recibidos Recibidos: 1207
Predeterminado
0
Likes

None...

Inactivo Inactivo
Citación del post de Josber Ver Mensaje
❞
Pa'vernos matao
Es que es buenísimo


NORMAS DEL FORO - para garantizar el buen funcionamiento del Foro.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale haciendo clic en su Nick
Kuk is offline   Responder Con Cita
  #10
Antiguo 25 de marzo de 2021, 12:02
JuanJuan77
Forero Junior
Última Actividad 31.12.2025 20:26
Posts Posts: 39
Likes enviados Enviados: 1
Likes recibidos Recibidos: 1
Predeterminado
0
Likes

None...

Inactivo Inactivo
hola, estoy buscando lo mismo, pudiste hacerlo?

y como lo venias haciendo como es??

gracias
JuanJuan77 is offline   Responder Con Cita
Respuesta

« Tema Anterior | Próximo Tema »


Derechos de Publicación
No puedes publicar nuevos temas
No puedes publicar posts/responder
No puedes adjuntar archivos
No puedes editar tus posts
BB code is habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 15:01.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.

Top
 Archivo - Cobol Foro
Webdesign by: vbdesigns.de
Contactar con Nosotros - Cobol Foro
Top