User Function LJ720CTRL() Local aRet := ParamIXB //------------------------- //Radio Button "Processo" //------------------------- //aRet[1][2] := 1 //1=Troca; 2=Devolução //aRet[1][3] := .T. //.T.=Permite editar, .F.=Não permite editar //------------------------- //Radio Button "Origem" //------------------------- //aRet[2][2] := 1 //1=Com Documento de Entrada; 2=Sem Documento de Entrada //aRet[2][3] := .T. //.T.=Permite editar, .F.=Não permite editar //------------------------- //Radio Button "Buscar Venda Por" //------------------------- aRet[3][2] := 2 //1=Cliente e Data; 2=No. Cupom / Nota //aRet[3][3] := .T. //.T.=Permite editar, .F.=Não permite editar //------------------------- //Consulta Padrao Cliente //------------------------- //aRet[4][2] := "XXX" //Consulta Padrão do Cliente (deve existir no SXB) //aRet[4][3] := .T. //.T.=Permite editar, .F.=Não permite editar Return aRet |