Perguntas Validação de campo vazio

#include "TOTVS.CH"

 
User Function MASTERADVPL()

 cTNome := space(25) 

 DEFINE DIALOG oDlg TITLE "TFolder Advpl Master" FROM 180,180 TO 550,700 PIXEL


    oTFolder := TFolder():New( 0,0,,,oDlg,,,,.T.,,260,184 )
    oTFolder:AddItem("Aba 01", .T.) 
    oTFolder:AddItem("Aba 02", .T.) 
    oTFolder:AddItem("Aba 03", .T.) 
    oTFolder:SetOption( 1 )

	  oTFont := TFont():New('Courier new',,-12,.T.)
	  
	  oTSay1 := TSay():New( 01, 01,{||'Nome:'},oTFolder:aDialogs[1];
	                       ,,oTFont,.T.,.F.,.F.,.T.,0,, 30, 35,.F.,.T.,.F.,.F.,.F.,.F. )            
	                        
	  oTGet1 := TGet():New( 10, 33,{|u|If(PCount()>0, cTNome:=u, cTNome )},;
							oTFolder:aDialogs[1], 90,009,"", {|u| U_FMsgNome(cTNome)  },;
							0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,cTNome,,,, )
	
	  oTSay2 := TSay():New( 01, 01,{||'Telefone:'},oTFolder:aDialogs[1];
	                       ,,oTFont,.T.,.F.,.F.,.T.,0,, 32, 70,.F.,.T.,.F.,.F.,.F.,.F. ) 
	                    
	  oTGet2 := TGet():New( 30, 33,{||}, oTFolder:aDialogs[1], 90,009,;
	                         "",,0,,,.F.,,.T.,,.F.,,.F.,.F.,,.F.,.F.,,,,,, )
	
	  oButton := TButton():New( 60, 33, 'Encerrar', oTFolder:ADIALOGS[1],{||oDlg:End()}, 040,015,,,,.T.)

 ACTIVATE DIALOG oDlg CENTERED

Return


 
User Function FMsgNome()
 if cTNome == space(25)
    MsgInfo("Nome é um Campo Obrigatório")
 endif

return