{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",AV30ZonCod) ;
   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") ;
   AV30ZonCod=GXgetIntegerValue("_ZONCOD") ;
   AV18Curren=GXgetIntegerValue("_CURRENTPAGE") ;
}
this._VariablesToSubfile55=function()
{
   GXsetGridControlValue("PUBCOD",GXCurrentRow[55],A27PubCod,0) ;
   GXsetGridControlValue("PUBFCH",GXCurrentRow[55],A9PubFch,0) ;
   GXsetGridComboBoxValue("TPOPUBCOD",GXCurrentRow[55],A13TpoPubC) ;
   GXsetGridControlValue("TPOPUBDSC",GXCurrentRow[55],A31TpoPubD,0) ;
   GXsetGridControlValue("PUBDSCCOR",GXCurrentRow[55],A10PubDscC,0) ;
   GXsetGridComboBoxValue("ESPCOD",GXCurrentRow[55],A14EspCod) ;
   GXsetGridControlValue("ESPDSC",GXCurrentRow[55],A32EspDsc,0) ;
   GXsetGridControlValue("PUBEDAD",GXCurrentRow[55],A15PubEdad,0) ;
   GXsetGridControlValue("PUBCOL",GXCurrentRow[55],A16PubCol,0) ;
   GXsetGridComboBoxValue("PUBTAM",GXCurrentRow[55],A17PubTam) ;
   GXsetGridComboBoxValue("PUBSEX",GXCurrentRow[55],A18PubSex) ;
   GXsetGridComboBoxValue("ZONCOD",GXCurrentRow[55],A19ZonCod) ;
   GXsetGridControlValue("ZONDSC",GXCurrentRow[55],A33ZonDsc,0) ;
   GXsetGridControlValue("STSCOD",GXCurrentRow[55],A20StsCod,0) ;
   GXsetGridControlValue("STSDSC",GXCurrentRow[55],A34StsDsc,0) ;
}
this._SubfileToVariables55=function()
{
   A48StsFin=GXgetControlValue("STSFIN") ;
   A27PubCod = GXgetGridIntegerValue("PUBCOD",GXCurrentRow[55]) ;
   A9PubFch = GXgetGridControlValue("PUBFCH",GXCurrentRow[55]) ;
   A13TpoPubC = GXgetGridIntegerValue("TPOPUBCOD",GXCurrentRow[55]) ;
   A31TpoPubD = GXgetGridControlValue("TPOPUBDSC",GXCurrentRow[55]) ;
   A10PubDscC = GXgetGridControlValue("PUBDSCCOR",GXCurrentRow[55]) ;
   A14EspCod = GXgetGridIntegerValue("ESPCOD",GXCurrentRow[55]) ;
   A32EspDsc = GXgetGridControlValue("ESPDSC",GXCurrentRow[55]) ;
   A15PubEdad = GXgetGridControlValue("PUBEDAD",GXCurrentRow[55]) ;
   A16PubCol = GXgetGridControlValue("PUBCOL",GXCurrentRow[55]) ;
   A17PubTam = GXgetGridControlValue("PUBTAM",GXCurrentRow[55]) ;
   A18PubSex = GXgetGridControlValue("PUBSEX",GXCurrentRow[55]) ;
   A19ZonCod = GXgetGridIntegerValue("ZONCOD",GXCurrentRow[55]) ;
   A33ZonDsc = GXgetGridControlValue("ZONDSC",GXCurrentRow[55]) ;
   A20StsCod = GXgetGridIntegerValue("STSCOD",GXCurrentRow[55]) ;
   A34StsDsc = GXgetGridControlValue("STSDSC",GXCurrentRow[55]) ;
}
this._validate_row55=function()
{
   _Valid_Pubcod( ) ;
}
this._StandaloneModal=function()
{
   if ( AnyError == 0 && ( A19ZonCod != gxOldGridKey("A19ZonCodA33ZonDsc",55) ) )
   {
      gxajaxloadCrl('gxLoad_7',new Array("A19ZonCod"),new Array("A33ZonDsc"));
      if ( GXLastAjaxSt == 101 )
      {
         gxballoon.setError(gxFormat("No existe %1","Zona"));
         AnyError = 1 ;
      }
      else
      {
         gxSetGridKey("A19ZonCodA33ZonDsc",55,"A19ZonCod");
      }
   }
   if ( AnyError == 0 && ( A14EspCod != gxOldGridKey("A14EspCodA32EspDsc",55) ) )
   {
      gxajaxloadCrl('gxLoad_6',new Array("A14EspCod"),new Array("A32EspDsc"));
      if ( GXLastAjaxSt == 101 )
      {
         gxballoon.setError(gxFormat("No existe %1","Especies"));
         AnyError = 1 ;
      }
      else
      {
         gxSetGridKey("A14EspCodA32EspDsc",55,"A14EspCod");
      }
   }
   if ( AnyError == 0 && ( A13TpoPubC != gxOldGridKey("A13TpoPubCA31TpoPubD",55) ) )
   {
      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",55,"A13TpoPubC");
      }
   }
   if ( AnyError == 0 && ( A13TpoPubC != gxOldGridKey("A13TpoPubCA48StsFin",55) || A20StsCod != gxOldGridKey("A20StsCodA48StsFin",55) ) )
   {
      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",55,"A13TpoPubC");
         gxSetGridKey("A20StsCodA48StsFin",55,"A20StsCod");
      }
   }
}
this._Valid_Pubcod=function()
{
   try {
      if(  GXCurrentRow[55] ===0) return true;
      _ControlsToVariables( ) ;
      gxballoon = getGXGridBallon("PUBCOD", GXCurrentRow[55]);
      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.AV30ZonCod=0;
this.AV18Curren=0;
this.GXCurrentRow[55]=0;
this._consultapublicaciongrid=function()
{
}
this._init=function()
{
}
_GXValidFnc = new Array();
this.GXLastCtrlId =59;
_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[38]={lvl:2,grid:55,fnc:null,fld:"IMAGEN"};
_GXValidFnc[39]={lvl:2,grid:55,fnc:_Valid_Pubcod,fld:"PUBCOD"};
_GXValidFnc[40]={lvl:2,grid:55,fnc:null,fld:"PUBFCH"};
_GXValidFnc[41]={lvl:2,grid:55,fnc:null,fld:"TPOPUBCOD"};
_GXValidFnc[42]={lvl:2,grid:55,fnc:null,fld:"TPOPUBDSC"};
_GXValidFnc[43]={lvl:2,grid:55,fnc:null,fld:"PUBDSCCOR"};
_GXValidFnc[44]={lvl:2,grid:55,fnc:null,fld:"ESPCOD"};
_GXValidFnc[45]={lvl:2,grid:55,fnc:null,fld:"ESPDSC"};
_GXValidFnc[46]={lvl:2,grid:55,fnc:null,fld:"PUBEDAD"};
_GXValidFnc[47]={lvl:2,grid:55,fnc:null,fld:"PUBCOL"};
_GXValidFnc[48]={lvl:2,grid:55,fnc:null,fld:"PUBTAM"};
_GXValidFnc[49]={lvl:2,grid:55,fnc:null,fld:"PUBSEX"};
_GXValidFnc[50]={lvl:2,grid:55,fnc:null,fld:"ZONCOD"};
_GXValidFnc[51]={lvl:2,grid:55,fnc:null,fld:"ZONDSC"};
_GXValidFnc[52]={lvl:2,grid:55,fnc:null,fld:"STSCOD"};
_GXValidFnc[53]={lvl:2,grid:55,fnc:null,fld:"STSDSC"};
_GXValidFnc[54]={lvl:2,grid:55,fnc:null,fld:"DISPLAY"};
_GXValidFnc[59]={lvl:0,grid:0,fnc:null,fld:"CURRENTPAGE"};
_GXValidFnc[1]={lvl:0,grid:0,fnc:null,fld:"FORM"};
_SetStandaloneVars( ) ;