{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("_CURRENTPAGE",AV18Curren,0) ;
}
this._ControlsToVariables=function()
{
   Gx_mode = GXgetControlValue("Mode");
   _SetNoAccept( ) ;
   AV18Curren=GXgetIntegerValue("_CURRENTPAGE") ;
}
this._VariablesToSubfile30=function()
{
   GXsetGridControlValue("PUBCOD",GXCurrentRow[30],A27PubCod,0) ;
   GXsetGridControlValue("PUBFCH",GXCurrentRow[30],A9PubFch,0) ;
   GXsetGridComboBoxValue("TPOPUBCOD",GXCurrentRow[30],A13TpoPubC) ;
   GXsetGridControlValue("TPOPUBDSC",GXCurrentRow[30],A31TpoPubD,0) ;
   GXsetGridControlValue("PUBDSCCOR",GXCurrentRow[30],A10PubDscC,0) ;
   GXsetGridComboBoxValue("ESPCOD",GXCurrentRow[30],A14EspCod) ;
   GXsetGridControlValue("ESPDSC",GXCurrentRow[30],A32EspDsc,0) ;
   GXsetGridControlValue("PUBEDAD",GXCurrentRow[30],A15PubEdad,0) ;
   GXsetGridControlValue("PUBCOL",GXCurrentRow[30],A16PubCol,0) ;
   GXsetGridComboBoxValue("PUBTAM",GXCurrentRow[30],A17PubTam) ;
   GXsetGridComboBoxValue("PUBSEX",GXCurrentRow[30],A18PubSex) ;
   GXsetGridComboBoxValue("ZONCOD",GXCurrentRow[30],A19ZonCod) ;
   GXsetGridControlValue("ZONDSC",GXCurrentRow[30],A33ZonDsc,0) ;
   GXsetGridControlValue("STSCOD",GXCurrentRow[30],A20StsCod,0) ;
   GXsetGridControlValue("STSDSC",GXCurrentRow[30],A34StsDsc,0) ;
}
this._SubfileToVariables30=function()
{
   A48StsFin=GXgetControlValue("STSFIN") ;
   A27PubCod = GXgetGridIntegerValue("PUBCOD",GXCurrentRow[30]) ;
   A9PubFch = GXgetGridControlValue("PUBFCH",GXCurrentRow[30]) ;
   A13TpoPubC = GXgetGridIntegerValue("TPOPUBCOD",GXCurrentRow[30]) ;
   A31TpoPubD = GXgetGridControlValue("TPOPUBDSC",GXCurrentRow[30]) ;
   A10PubDscC = GXgetGridControlValue("PUBDSCCOR",GXCurrentRow[30]) ;
   A14EspCod = GXgetGridIntegerValue("ESPCOD",GXCurrentRow[30]) ;
   A32EspDsc = GXgetGridControlValue("ESPDSC",GXCurrentRow[30]) ;
   A15PubEdad = GXgetGridControlValue("PUBEDAD",GXCurrentRow[30]) ;
   A16PubCol = GXgetGridControlValue("PUBCOL",GXCurrentRow[30]) ;
   A17PubTam = GXgetGridControlValue("PUBTAM",GXCurrentRow[30]) ;
   A18PubSex = GXgetGridControlValue("PUBSEX",GXCurrentRow[30]) ;
   A19ZonCod = GXgetGridIntegerValue("ZONCOD",GXCurrentRow[30]) ;
   A33ZonDsc = GXgetGridControlValue("ZONDSC",GXCurrentRow[30]) ;
   A20StsCod = GXgetGridIntegerValue("STSCOD",GXCurrentRow[30]) ;
   A34StsDsc = GXgetGridControlValue("STSDSC",GXCurrentRow[30]) ;
}
this._validate_row30=function()
{
   _Valid_Pubcod( ) ;
}
this._StandaloneModal=function()
{
   if ( AnyError == 0 && ( A19ZonCod != gxOldGridKey("A19ZonCodA33ZonDsc",30) ) )
   {
      gxajaxloadCrl('gxLoad_7',new Array("A19ZonCod"),new Array("A33ZonDsc"));
      if ( GXLastAjaxSt == 101 )
      {
         gxballoon.setError(gxFormat("No existe %1","Zona"));
         AnyError = 1 ;
      }
      else
      {
         gxSetGridKey("A19ZonCodA33ZonDsc",30,"A19ZonCod");
      }
   }
   if ( AnyError == 0 && ( A14EspCod != gxOldGridKey("A14EspCodA32EspDsc",30) ) )
   {
      gxajaxloadCrl('gxLoad_6',new Array("A14EspCod"),new Array("A32EspDsc"));
      if ( GXLastAjaxSt == 101 )
      {
         gxballoon.setError(gxFormat("No existe %1","Especies"));
         AnyError = 1 ;
      }
      else
      {
         gxSetGridKey("A14EspCodA32EspDsc",30,"A14EspCod");
      }
   }
   if ( AnyError == 0 && ( A13TpoPubC != gxOldGridKey("A13TpoPubCA31TpoPubD",30) ) )
   {
      gxajaxloadCrl('gxLoad_4',new Array("A13TpoPubC"),new Array("A31TpoPubD"));
      if ( GXLastAjaxSt == 101 )
      {
         gxballoon.setError(gxFormat("No existe %1","Tipos de Publicacion"));
         AnyError = 1 ;
      }
      else
      {
         gxSetGridKey("A13TpoPubCA31TpoPubD",30,"A13TpoPubC");
      }
   }
   if ( AnyError == 0 && ( A13TpoPubC != gxOldGridKey("A13TpoPubCA48StsFin",30) || A20StsCod != gxOldGridKey("A20StsCodA48StsFin",30) ) )
   {
      gxajaxloadCrl('gxLoad_5',new Array("A13TpoPubC","A20StsCod"),new Array("A48StsFin","A34StsDsc"));
      if ( GXLastAjaxSt == 101 )
      {
         gxballoon.setError(gxFormat("No existe %1","Tipo Publicacion / Status"));
         AnyError = 1 ;
      }
      else
      {
         gxSetGridKey("A13TpoPubCA48StsFin",30,"A13TpoPubC");
         gxSetGridKey("A20StsCodA48StsFin",30,"A20StsCod");
      }
   }
}
this._Valid_Pubcod=function()
{
   try {
      if(  GXCurrentRow[30] ===0) return true;
      _ControlsToVariables( ) ;
      gxballoon = getGXGridBallon("PUBCOD", GXCurrentRow[30]);
      AnyError = 0;

   }
   catch(e){}
   try {
      _VariablesToControls( ) ;
      if (gxballoon == null) return true; return gxballoon.show();
   }
   catch(e){}
   return true ;
}
this.AV18Curren=0;
this.GXCurrentRow[30]=0;
this._consultapublicacionperdidos=function()
{
}
this._init=function()
{
}
_GXValidFnc = new Array();
this.GXLastCtrlId =38;
_GXValidFnc[13]={lvl:2,grid:30,fnc:null,fld:"IMAGEN"};
_GXValidFnc[14]={lvl:2,grid:30,fnc:_Valid_Pubcod,fld:"PUBCOD"};
_GXValidFnc[15]={lvl:2,grid:30,fnc:null,fld:"PUBFCH"};
_GXValidFnc[16]={lvl:2,grid:30,fnc:null,fld:"TPOPUBCOD"};
_GXValidFnc[17]={lvl:2,grid:30,fnc:null,fld:"TPOPUBDSC"};
_GXValidFnc[18]={lvl:2,grid:30,fnc:null,fld:"PUBDSCCOR"};
_GXValidFnc[19]={lvl:2,grid:30,fnc:null,fld:"ESPCOD"};
_GXValidFnc[20]={lvl:2,grid:30,fnc:null,fld:"ESPDSC"};
_GXValidFnc[21]={lvl:2,grid:30,fnc:null,fld:"PUBEDAD"};
_GXValidFnc[22]={lvl:2,grid:30,fnc:null,fld:"PUBCOL"};
_GXValidFnc[23]={lvl:2,grid:30,fnc:null,fld:"PUBTAM"};
_GXValidFnc[24]={lvl:2,grid:30,fnc:null,fld:"PUBSEX"};
_GXValidFnc[25]={lvl:2,grid:30,fnc:null,fld:"ZONCOD"};
_GXValidFnc[26]={lvl:2,grid:30,fnc:null,fld:"ZONDSC"};
_GXValidFnc[27]={lvl:2,grid:30,fnc:null,fld:"STSCOD"};
_GXValidFnc[28]={lvl:2,grid:30,fnc:null,fld:"STSDSC"};
_GXValidFnc[29]={lvl:2,grid:30,fnc:null,fld:"DISPLAY"};
_GXValidFnc[38]={lvl:0,grid:0,fnc:null,fld:"CURRENTPAGE"};
_GXValidFnc[1]={lvl:0,grid:0,fnc:null,fld:"FORM"};
_SetStandaloneVars( ) ;