topic-40852

Posts: 1074

Joined: Fri Oct 07, 2005 01:56 PM

Enviar datos a un PRG
Posted: Mon Sep 20, 2021 02:09 AM

Estimados

hay alguna forma de enviar datos al PRG que sea mas corta, en una sola variable que entregue los datos de un formulario y
no colocar cada uno

Code (fw): Select all Collapse

function SaveInfo() {

                    if (oBrw.GetData().length == 0){
                        MsgError( "No hay nada que grabar", 'Sistema WEB-Invent')
                    }else{
                        if (MsgYesNo( 'Esta correcta la información', 'Grabar info' ) ){
                            let oParam = new Object();
                            oParam['obrw'] = oBrw.GetData();
                            oParam['_numcot' ] =  $('#numcot').val();
                            oParam['_rutcli' ] =  $('#rutcli').val();
                            oParam['_nomcli' ] =  $('#nomcli').val();
                            oParam['_fecemi' ] =  $('#fecemi').val();
                            oParam['_condici'] =  $('#condici').val();
                            oParam['_dias'   ] =  $('#dias').val();
                            oParam['_codvend'] =  $('#codvend').val();
                            oParam['_nomvend'] =  $('#nomvend').val();
                            oParam['_observa'] =  $('#observa').val();
                            oParam['_codprod'] =  $('#codprod').val();
                            oParam['_desprod'] =  $('#desprod').val();
                            oParam['_canprod'] =  $('#canprod').val();
                            oParam['_cbruto' ] =  $('#cbruto').val();
                            oParam['_cdesc'  ] =  $('#cdesc').val();
                            oParam['_netprod'] =  $('#netprod').val();
                            oParam['_totneto'] =  $('#totneto').val();
                            oParam['_totiva '] =  $('#totiva').val();
                            oParam['_totdocu'] =  $('#totdocu').val();
                            oParam['opcion']   =  'SAVEINFO';
                            MsgServer( 'cotizaserver.prg', oParam, PostGetId );
                        }
                    }
                }

Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl

Antonio Linares

Posts: 44162

Joined: Thu Oct 06, 2005 05:47 PM

Re: Enviar datos a un PRG
Posted: Mon Sep 20, 2021 05:29 AM

Patricio,

Si usas POST:

<form action="save.prg?customer" method="post">
...
<button id="save" type="submit" class="btn btn-primary float-right">Save changes</button>

todos los valores te llegan en un hash y accedes a ellos asi:

? AP_PostPairs()

regards, saludos

Antonio Linares
www.fivetechsoft.com

FiveTech Support Forums

Continue the discussion