{gxsetDateFormat( "DMY" );
gxsetFirstYearCentury( 40 );
this.gxDecPoint =  "," ;
this.gxThSep =  "." ;}
Gx_BScreen = 1 ;
this._SetNoAccept=function()
{
}
this._SetStandaloneVars=function()
{
   A48StsFin=GXgetControlValue("STSFIN") ;
   Gx_BScreen = 0 ;
}
this._VariablesToControls=function()
{
   GXsetControlValue("_PUBCOD",AV10PubCod,0) ;
   GXsetControlValue("_PUBFCHINI",AV11PubFch,0) ;
   GXsetControlValue("_PUBFCHFIN",AV12PubFch,0) ;
   GXsetComboBoxValue("_TPOPUBCOD",AV13TpoPub) ;
   GXsetControlValue("_PUBDSCCOR",AV14PubDsc,0) ;
   GXsetComboBoxValue("_ESPCOD",AV15EspCod) ;
   GXsetControlValue("_PUBEDAD",AV16PubEda,0) ;
   GXsetComboBoxValue("_PUBSEX",AV17PubSex) ;
   GXsetComboBoxValue("_ZONCOD",AV27ZonCod) ;
   GXsetControlValue("_CURRENTPAGE",AV18Curren,0) ;
}
this._ControlsToVariables=function()
{
   Gx_mode = GXgetControlValue("Mode");
   _SetNoAccept( ) ;
   AV10PubCod=GXgetIntegerValue("_PUBCOD") ;
   AV11PubFch=GXgetControlValue("_PUBFCHINI") ;
   AV12PubFch=GXgetControlValue("_PUBFCHFIN") ;
   AV13TpoPub=GXgetIntegerValue("_TPOPUBCOD") ;
   AV14PubDsc=GXgetControlValue("_PUBDSCCOR") ;
   AV15EspCod=GXgetIntegerValue("_ESPCOD") ;
   AV16PubEda=GXgetControlValue("_PUBEDAD") ;
   AV17PubSex=GXgetControlValue("_PUBSEX") ;
   AV27ZonCod=GXgetIntegerValue("_ZONCOD") ;
   AV18Curren=GXgetIntegerValue("_CURRENTPAGE") ;
}
this._VariablesToSubfile38=function()
{
   GXsetGridControlValue("PUBFCH",GXCurrentRow[38],A9PubFch,0) ;
   GXsetGridControlValue("PUBCOD",GXCurrentRow[38],A27PubCod,0) ;
}
this._SubfileToVariables38=function()
{
   A48StsFin=GXgetControlValue("STSFIN") ;
   A9PubFch = GXgetGridControlValue("PUBFCH",GXCurrentRow[38]) ;
   A27PubCod = GXgetGridIntegerValue("PUBCOD",GXCurrentRow[38]) ;
}
this._validate_row38=function()
{
   _Valid_Pubcod( ) ;
}
this._StandaloneModal=function()
{
   if ( AnyError == 0 && ( A13TpoPubC != gxOldKey("A13TpoPubCA48StsFin") || A20StsCod != gxOldKey("A20StsCodA48StsFin") ) )
   {
      gxajaxloadCrl('gxLoad_4',new Array("A13TpoPubC","A20StsCod"),new Array("A48StsFin"));
      if ( GXLastAjaxSt == 101 )
      {
         gxballoon.setError(gxFormat("No existe %1","Tipo Publicacion / Status"));
         AnyError = 1 ;
      }
      else
      {
         gxSetKey("A13TpoPubCA48StsFin","A13TpoPubC");
         gxSetKey("A20StsCodA48StsFin","A20StsCod");
      }
   }
}
this._Valid_Pubcod=function()
{
   try {
      if(  GXCurrentRow[38] ===0) return true;
      _ControlsToVariables( ) ;
      gxballoon = getGXGridBallon("PUBCOD", GXCurrentRow[38]);
      AnyError = 0;

   }
   catch(e){}
   try {
      _VariablesToControls( ) ;
      if (gxballoon == null) return true; return gxballoon.show();
   }
   catch(e){}
   return true ;
}
this.AV10PubCod=0;
this.AV11PubFch=0;
this.AV12PubFch=0;
this.AV13TpoPub=0;
this.AV14PubDsc=0;
this.AV15EspCod=0;
this.AV16PubEda=0;
this.AV17PubSex=0;
this.AV27ZonCod=0;
this.AV18Curren=0;
this.GXCurrentRow[38]=0;
this._consultapublicacion=function()
{
}
this._init=function()
{
}
_GXValidFnc = new Array();
this.GXLastCtrlId =53;
_GXValidFnc[14]={lvl:0,grid:0,fnc:null,fld:"PUBCOD"};
_GXValidFnc[16]={lvl:0,grid:0,fnc:null,fld:"PUBFCHINI"};
_GXValidFnc[18]={lvl:0,grid:0,fnc:null,fld:"PUBFCHFIN"};
_GXValidFnc[20]={lvl:0,grid:0,fnc:null,fld:"TPOPUBCOD"};
_GXValidFnc[22]={lvl:0,grid:0,fnc:null,fld:"PUBDSCCOR"};
_GXValidFnc[24]={lvl:0,grid:0,fnc:null,fld:"ESPCOD"};
_GXValidFnc[26]={lvl:0,grid:0,fnc:null,fld:"PUBEDAD"};
_GXValidFnc[28]={lvl:0,grid:0,fnc:null,fld:"PUBSEX"};
_GXValidFnc[31]={lvl:0,grid:0,fnc:null,fld:"ZONCOD"};
_GXValidFnc[42]={lvl:2,grid:38,fnc:null,fld:"IMAGEN"};
_GXValidFnc[45]={lvl:2,grid:38,fnc:null,fld:"PUBDSCCORDSP"};
_GXValidFnc[46]={lvl:2,grid:38,fnc:null,fld:"PUBFCH"};
_GXValidFnc[48]={lvl:2,grid:38,fnc:_Valid_Pubcod,fld:"PUBCOD"};
_GXValidFnc[53]={lvl:0,grid:0,fnc:null,fld:"CURRENTPAGE"};
_GXValidFnc[1]={lvl:0,grid:0,fnc:null,fld:"FORM"};
_SetStandaloneVars( ) ;