Adaptando el ejemplo brwsearch de Tweb

Responder
Adolfredo martinez
Mensajes: 12
Registered for: 3 years 3 months
Columbia

Adaptando el ejemplo brwsearch de Tweb

Mensaje por Adolfredo martinez »

Hola amigos del forum.


Estoy practicando los ejemplos de Tweb el ejemplo brwsearch, como hago para darle mas ancho a las columnas y darle formato le muestra la imagen como se ve:

Código: Seleccionar todo

#include {% TWebInclude() %}

function main()

    LOCAL o, oWeb, aRows

	DEFINE WEB oWeb TITLE 'Browse Search' TABLES INIT


    DEFINE FORM o 

	INIT FORM o  	

		HTML o INLINE '<h3>Liquidacion - Impuesto Predial Unificado</h3><hr>'	
			
		ROWGROUP o
			BUTTON LABEL 'Liquidar' GRID 6 ACTION 'Test()' OF o      			
		ENDROW o

		
		HTML o
		
			<script>			
				
				function Test() {

					
					var cUrl 	= 'srv_brwsearch.prg'
								
					var aHeader = { 'codip05':'Codigo' ,  'nomip05':'Nombre', 'identifica': 'Identificacion', 'direp05': 'Direccion', 'vigip05': 'Vigencia', 'avaip05': 'Avaluo'
					, 'tarifa': 'Tarifa', 'impto': 'Vlr-Predial' } 																											
				
					TWebBrwSearch( cUrl, aHeader, myfunc, "000100010003000001001" )
				}
		
				function myfunc( row ) {
				
					console.log( row )

					if ( row ) {					
						MsgInfo( row.codip05 + '<br>' + row.nomip05 )					
					}						
				}
			
			</script>			
		
		ENDTEXT
			
		
    END FORM o	
	
retu nil
https://subirimagenes.com/ib/xeGjHIsKlT

Responder