Tengo un sistema de facturación en as400, lo que se tiene que hacer es enviar la información de esos documentos mediante un webservice, en este webservice me pide que la información que envie este en base64 (al decodificar debe quedar como el texto que mostré) como la cantidad de artículos en una factura es variable, el tamaño del texto que debo enviar en base64 también es variable. Voy a investigar sobre cómo usar el tipo de dato clon, nunca lo he usado. Muchas gracias Manuel
El mar., 5 de mayo de 2020 4:44 p. m., Manuel Enrique Orrala Aguilar < [email protected]> escribió: > Y si utilizas clob como tipo de dato para almacenar? , que es lo que > pretendes realizar? En lo funcional > > El mar., 5 may. 2020 16:37, Miguel SB <[email protected]> escribió: > >> Buenas tardes, >> Es posible convertir un texto de mas de 1024 a base64 en RPGLE, tengo una >> funcion que hace la conversion a base64 (lo obtuve de la pagina >> https://www.scottklement.com/base64/), mi duda es como inserto el >> siguinte texto en una variable para enviarlo a esa funcion y me haga la >> conversion: >> El texto que quiero convertir es el siguiente: >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> *IDE|B503-0013289|2020-05-05|16:20:38|03|PEN||2020-05-05EMI|6|20100049181|||150122|JR >> MARIANO||LIMA|LIMA||PE|||0000REC|1|11111111|CLIENTE >> VARIOS|||||PE||CAB|1001|515.08||||||||||||||[1000|92.72]||||607.80|||0101|[1000|SEISCIENTOS >> SIETE Y 80/100 SOLES]|92.72|DET|00001|111321|PAPEL FOTOC REPORT 75GR A-4 >> PQTX500|1.00|NIU|7.63|9.00|[1000|1.37|10|7.63|18.00]|7.63|||||1.37|[false|00|0.50|9.00|18.00]DET|00002|693154|LAPIZ >> AMAR C/B HB VINIFAN X 3 >> 75020|1.00|NIU|2.29|2.70|[1000|0.41|10|2.29|18.00]|2.29|||||0.41|DET|00003|511159|LAPIZ >> AMAR C/B X 3 >> FAB|1.00|NIU|2.46|2.90|[1000|0.44|10|2.46|18.00]|2.46|||||0.44|DET|00004|606717|LAPIZ >> AMAR C/B 2B CAX12 VINIFAN >> 76001|1.00|NIU|4.24|5.00|[1000|0.76|10|4.24|18.00]|4.24|||||0.76|DET|00005|331782|REGLA >> DE METAL 1 >> MT|1.00|NIU|13.73|16.20|[1000|2.47|10|13.73|18.00]|13.73|||||2.47|DET|00006|697477|REGLA >> PARA CIRCULOS ARTESCO >> >> 10055100|1.00|NIU|1.19|1.40|[1000|0.21|10|1.19|18.00]|1.19|||||0.21|DET|00007|646437|REGLA >> 30 CM FLEX COLOR VINIFAN >> 74005|1.00|NIU|2.80|3.30|[1000|0.50|10|2.80|18.00]|2.80|||||0.50|DET|00008|490743|PLUMON >> ARTESCO CD-MAX 0.7MM >> NEGRO|1.00|NIU|2.03|2.40|[1000|0.37|10|2.03|18.00]|2.03|||||0.37|DET|00009|510587|PLUMON >> ARTESCO CD-MAX 0.7MM NEGRO X >> 1|1.00|NIU|2.46|2.90|[1000|0.44|10|2.46|18.00]|2.46|||||0.44|DET|00010|579601|PLUMON >> ARTESCO CD-MAX 0.7MM X 2 >> (NGO/AZ)|1.00|NIU|4.92|5.80|[1000|0.88|10|4.92|18.00]|4.92|||||0.88|DET|00011|579612|PLUMON >> ARTESCO CD-MAX 0.7MM X 2 >> (NGO/RJ)|1.00|NIU|4.92|5.80|[1000|0.88|10|4.92|18.00]|4.92|||||0.88|DET|00012|854689|PINCEL >> DE AGUA PENTEL PUNTA >> FINA|1.00|NIU|22.88|27.00|[1000|4.12|10|22.88|18.00]|22.88|||||4.12|DET|00013|854700|PINCEL >> DE AGUA PENTEL PUNTA >> GRUESA|1.00|NIU|26.61|31.40|[1000|4.79|10|26.61|18.00]|26.61|||||4.79|DET|00014|854711|PINCEL >> DE AGUA PENTEL PUNTA >> MEDIANA|1.00|NIU|22.88|27.00|[1000|4.12|10|22.88|18.00]|22.88|||||4.12|DET|00015|854678|PINCEL >> DE AGUA PENTEL X DE 3 >> PIEZAS|1.00|NIU|71.19|84.00|[1000|12.81|10|71.19|18.00]|71.19|||||12.81|DET|00016|621665|TINTA >> BROTHER LC-79BK MFC-J6710DW BLACK >> (2400P|1.00|NIU|136.10|160.60|[1000|24.50|10|136.10|18.00]|136.10|||||24.50|DET|00017|621676|TINTA >> BROTHER LC-79C MFC-J6710DW CYAN >> (1200P)|1.00|NIU|78.81|93.00|[1000|14.19|10|78.81|18.00]|78.81|||||14.19|DET|00018|348425|CD-R >> GRAB 700MB/80MIN (CONX100) >> IMATION|1.00|NIU|64.32|75.90|[1000|11.58|10|64.32|18.00]|64.32|||||11.58|DET|00019|353122|CD-R >> GRABABLE 700MB/80MIN (CON X 25) >> IMATION|1.00|NIU|17.54|20.70|[1000|3.16|10|17.54|18.00]|17.54|||||3.16|DET|00020|855008|CD-R >> GRAB 700MB/80MIN (CONX50) >> SONY|1.00|NIU|26.10|30.80|[1000|4.70|10|26.10|18.00]|26.10|||||4.70|ADI|@@1|AS400* >> >> Este texto sale de una factura que tengo en mi sistema, por lo que su >> tamaño es variable. He probado con campo declarados de la siguiente forma: >> >> D wbase64 S 9999999A inz >> >> Pero igual solo toma los primeros 1024 caracteres. >> Por favor ayuda con este tema. >> >> Gracias >> >> >> ____________________________________________________ >> Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) >> Forum.Help400 © Publicaciones Help400, S.L. > > ____________________________________________________ > Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) > Forum.Help400 © Publicaciones Help400, S.L.
____________________________________________________ �nete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 � Publicaciones Help400, S.L.
