#Caché

Let us check whether this is available to others

DraftDraftDraftDraftDraftDraftDraftDraftDraftDraft

NewNewNewNewNewNewNewNewNewNewNew

Index to Articles

Under Construction

Index to Articles

NewBie's Corner Session 14 Inline Do & Nested Do with Implied Quit and For Loop

Welcome to NewBie's Corner, a weekly or biweekly post covering basic Caché Material.

InterSystems Caché provides a GUI (Graphical User Interface) based Integrated Development Environment (IDE) called Caché Studio. Developers can use Studio to create and maintain applications.

The following concepts of Inline Do, Nested Do, Implied Quit and For Loop is difficult to explain in a manner that everyone understands. However, these concepts work well with each other.

Hi all,

          Is there any possibilities to set the null password for user account in cache 2016?

Thanks,

sansa.

In our last lesson, we added a form to Edit our existing Widgets, and save them back to the server.  However, our Form was not well strcutured and our Save button had no intelligence, and was not fully visible.  So today, we will apply some Material components and Angular style to make the form more useful

Let's open EditWidget.csp, and make some changes.  First, we want to change the component from an md-card to an md-dialog.

test

This code snippet uses GZIP to compress and decompress a file in the file system. Change default file paths to customize code to compress/decompress your files:

Class objectscript.GZIP Extends %RegisteredObject
{
	classmethod test() {
		//Export Global(s) uncompressed
		set filename="C:\Temp\myglobal.xml"
		do $System.OBJ.Export("^oddEXTR.gbl",filename)
		//Open exported Globals
		set uncompressed = ##class(%FileBinaryStream).%New()
		set uncompressed.Filename=filename
		Set compressed = "C:\temp\mycomglobal.xml"
		//Open File Device over Gzip and Copy Uncompressed information to it
		Open compressed:("WUNK":::/GZIP=1:/NOXY=1:/OBUFSIZE=32768):0
		Use compressed
		do uncompressed.OutputToDevice()
		close compressed
		//Create New File  
		set out = ##class(%FileBinaryStream).%New()
		set out.Filename= "C:\Temp\decomp.xml"
		//Open compressed File and save information uncompressed over gzip
		Set file=##class(%File).%New(compressed)
		Do file.Open("RUK:::/GZIP=1:/NOXY=1")
		while ' file.AtEnd
		{
		    set line = file.ReadLine()
		    do out.Write(line)
		}
		do out.%Save()
	}
}

GitHub: https://github.com/intersystems-community/code-snippets/blob/master/src/cls/objectscript/GZIP.cls

Hi All, I am taking a namespace and routines from one table for particular user.if the user have name space and routine means it execute well but after executed the routine it is automatically quit and close the session.I need to keep the same namespace after executing the routine. Please help to proceed further anyone.

Hi All, I configured the crystal report SAP 2011 with IIS 10 in windows server 2012 r2 standard,when I tried to open it shows failed to open the connection error .database is Cache.how to recover that problem.

Hello everyone,

I have the following problem in generating a PDF report in ZEN, which has many items, a general total of approximately 30,000 items, but gives an error, I can generate a report with a maximum of 8,000 items, which may be wrong.

==========

Class Ideal.ListaEstoquePDF Extends %ZEN.Report.

test

@evgeny test

test