// *** WalySoft ***
// Show Picture

// se asignan en el HTML
var bUseWSVPic=true;
var cMultimedia='';
var cThumbMultimedia='';
var cTipoArchivoMultimedia='';
var nThumbs=0;
var cSinImagenFile='../opacIMGs/SinImagen.jpg';
var aImgsSrcs = new Array();

function showpic( cURLPicture )
{
	if( bUseWSVPic ) {
		// window.location = 'http://walysoft2.com.ar/pergamo/wsvpic/wsvpic.html?pic='+cURLPicture; 
		window.open( 'http://walysoft2.com.ar/pergamo/wsvpic/wsvpic.html?pic='+cURLPicture, '_blank', 'resizable=yes' );
	}
	else {
		var cHTML =  '<html><head>\n';
		cHTML += '<link rel="stylesheet" type="text/css" href="../opacHTML/PGScrStyles.css">\n';
		cHTML += '<title>Imagen</title>\n';
		cHTML += '</head><body>\n';
		cHTML += '<p class="wsStdBold"><a href="javascript:history.back()">Volver</p>\n';
		cHTML += '<table><tr>\n';
		cHTML += '<td style="width:120px"><img class="wsImgMedia" src="' + cURLPicture + '" width="120"></td>\n';
		cHTML += '<td style="text-align: center; width:100%"><img class="wsImgMedia" src="' + cURLPicture + '"></td></tr>\n';
		cHTML += '</table>\n';
		cHTML += '<p class="wsStdBold"><a href="javascript:history.back()">Volver</p>\n';
		cHTML +=  '</body></html>\n';

		document.open();
		document.write( cHTML );
		document.close();
	}
} 

function ThumbCodeFull( cImage, cThumb, cTipo, cIMGName, bDelayedLoad, bShowDefault, nWidth, nHeight ) {
	var cDimensiones='';
    if( nWidth  != null ) cDimensiones += ' width="'+nWidth+'"';
    if( nHeight != null ) cDimensiones += ' height="'+nHeight+'"';
	if( bShowDefault == null ) bShowDefault = false; 
	if( ( bDelayedLoad == null ) || ( cIMGName == null ) ) bDelayedLoad = false; 

	if( ( cImage !== '' ) && ( cTipo == 'I' ) ) {
		document.write( '<a href=javascript:showpic("' + cImage + '")>' );
		if( cThumb !== '' ) { 
			document.write( '<img class="wsImgMedia shadow"'+cDimensiones+' alt="Vista Previa" title="Vista Previa" ' );
			if( cIMGName != null ) {
				++nThumbs;
				document.write( 'name="' + cIMGName+nThumbs + '" ' );
				if( ! bDelayedLoad ) 
					document.write( 'src="' + cThumb + '" ' );
				else {
					// document.write( 'src="' + cSinImagenFile + '" ' );
					aImgsSrcs[cIMGName+nThumbs] = cThumb;
				}
			}
			document.write( '/>' );
		}
		document.write( '</a>' );
	} else if( bShowDefault ) 
		document.write( '<img class="wsImgMedia shadow"'+cDimensiones+' alt="sin imagen" title="Sin Imagen" src="'+ cSinImagenFile +'" />' );
}

function ThumbCode( cImage, cThumb, cTipo, cIMGName ) {
	ThumbCodeFull( cImage, cThumb, cTipo, cIMGName );
}

// Las imagenes de Thumbs, se cargan al final, por si el server fuera lento, que no demore la
// visualización de los datos.
// las siguientes dos funciones se crean con esa intención.
function ThumbCodeAuto() {
	ThumbCodeFull( cMultimedia, cThumbMultimedia, cTipoArchivoMultimedia, 'ImgThumb', true );
}

function GetThumbs() {
  try {
 	for ( var i in aImgsSrcs )
		document.images[i].src=aImgsSrcs[i];
  } catch(e) {} // IE , document.images puede resultar null
}