hola.
Tengo un botón para visualizar en una ventana modal un pdf lo hace perfecto con este codigo.
With Object WButton():New(:WO)
:cText := "<b>Ver PDF..</b>"
:lLarge := .F.
:lBold := .T.
:cClrPane :="#0d47a1 blue darken-4"
:aWidth := {12,6,,}
:cOnClick := "pdfinmodal"
:cAjaxBevel := "viewmodal"
:lModalResult := .T.
:Create()
End With
PROCEDURE pdfinmodal()
oCGI:SendPage( nfl_EmbedPDFJS("6104.pdf", "\fotos\aparatos\protocolos\6104.pdf" ) )
RETURN
WITH OBJECT WBevel():New(:WO)
:cId := "viewmodal"
:nStyle := xc_ModalFix
:cModalHeight := "95%"
:cModalWidth := "95%"
WITH OBJECT :AddFooter()
With Object WBevel():New(:WO)
:aWidth[xc_S] := 6
With Object WButton():New(:WO)
:cId := "closemodal"
:cText := "Cerrar"
:cIcon := "keyboard_arrow_left"
:cPosition := "xc_center"
:lModalClose :=.T.
:Create()
End With
:Create()
End With
END WITH
Ahora quiero hacer lo mismo pero en un boton de un WdataTable con esto, pero no consigo que funcione.
:AddColumnButton( "event_note","Ver informe","","pdfinmodal","xc_Left","viewmodal","")