go to post Alexey Maslov · Apr 13, 2017 ... studio will complain when you try and quit a for loop with a valueQUIT from inside a loop is considered quitting a loop rather then a function, so it should always be without a value....but it wont complain when you try and quit with nothing on the methodAccording to language definition, each function can be called as a function (set x=$$function(...)) or as a routine (do function(...)). The call type can be recognized inside the function using a construct: quit:$quit ReturnValue quit ; $quit=1 if called as a $$function()Methods are compiled to functions and behave the same way.
go to post Alexey Maslov · Apr 6, 2017 Thank you, Ray.Most production sites wouldn't plan their backups this way because it means that the only operation you can do on the backup image is restore the whole thing and start Caché.Another reason of doing so can be the number of articles, docs, learning materials which taught us _always_ perform ExternalFreeze accompanied with ExternalThaw on every external snapshot making.
go to post Alexey Maslov · Apr 5, 2017 support staff can't access the System Management PortalYour support staff may want to keep one open session with SMP for troubleshooting.
go to post Alexey Maslov · Apr 5, 2017 crash-consistent snapshot of the entire system, including all CACHE.DAT files, the manager directory, journals, and the WIJ.Ray, may I ask you to clarify this a bit?Is any snapshot of the entire system can be considered crash-consistent?
go to post Alexey Maslov · Apr 4, 2017 if you need to start an ECP data server in a mode that prevents application servers from connecting to itFor such cases we implemented a facility which stops all users' sessions and disables new logons ECP-wide (on application level). Our aim was to prevent extra Caché restarts on data servers by any price, as each restart means loosing the global cache and slowing down of many app functions for ~1 hour or even longer.Without this facility maybe I'd choose to temporarily stop %Service_ECP.
go to post Alexey Maslov · Apr 3, 2017 RTFM, should I say to myself. <Database> tag is required, according to documentation: <Database> Required; within <Configuration>. Defines one or more databases used in the namespace. Taking in account that there was no need in any database [re]configuration, the problematic fragment was scaled down to: <!-- Configure the database that should exist upto this step: we don't need it, but the tag is required --> <Database Name="${MainDB}" Create="no" /> And it was enough to make it working. Despite of nasty message logged: 2017-04-03 12:32:18 1 CreateDatabase: Creating database USER1 in D:\InterSystems\Cache10\mgr\ with resource nothing bad happened neither with CACHESYS, nor with USER1 databases.
go to post Alexey Maslov · Apr 2, 2017 only need to delete all created filesGood point. Besides, if there was <Configuration> section involved, you need to revert all configuration changes it had done. And it's not as easy as rename previous cache.cpfXXXXX back to cache.cpf, because %Installer commits every single change, so you need to remember which cache.cpfXXXXX was active before you started your experiments.It seems it's usually easier to remove all changes made by %Installer manually, using SMP and some File Manager tool, or if there are too many of them, just run the setup being tested against another Cache instance which I can easily remove and reinstall from scratch.
go to post Alexey Maslov · Apr 1, 2017 Thanks for taking part, Eduard. According to this record: 2017-03-31 19:24:51 0 : USER1 is ready to be configured using USER1 and %DB_%DEFAULT MainDB was neither undefined nor empty. My post was mainly about %Installer's usage; doesn't it use transactions internally by itself? I didn't notice any transaction tags in it's language definition. As to the log level, my other scripts (not this one) are intended to be used during Cache installation. I don't know how to adjust the log level in this case, therefore I used to deliberately set it equal to "0" to be sure that my debug messages will be logged; having finished debugging, I just change all Level="0" to Level="3"
go to post Alexey Maslov · Apr 1, 2017 Don't you think that naming the file "1.xml.gz" would be more clear?
go to post Alexey Maslov · Apr 1, 2017 Thanks for taking part, Eduard. According to this record: 2017-03-31 19:24:51 0 : USER1 is ready to be configured using USER1 and %DB_%DEFAULT MainDB was neither undefined nor empty. My post was mainly about %Installer's usage; doesn't it use transactions internally by itself? I didn't notice any transaction tags in it's language definition. As to the log level, my other scripts (not this one) are intended to be used during Cache installation. I don't know how to adjust the log level in this case, therefore I used to deliberately set it equal to "0" to be sure that my debug messages will be logged; having been finished with debugging, I just change all Level="0" to Level="3"
go to post Alexey Maslov · Mar 31, 2017 I've got into another issue trying to write a code which should configure some global mapping to already existing namespace. Here is its skeleton: Include %occInclude /// Create simple global mapping (main DB and cachetemp only) Class %z.Mapping Extends %Library.RegisteredObject { /// Application Definition XData qMS [ XMLNamespace = INSTALLER ] { <Manifest> <If Condition='$L("${NAMESPACE}")=0'> <!-- Report an error if the namespace wasn't specified --> <Error Status="$$$NamespaceDoesNotExist"> <Arg Value="${NAMESPACE}"/> </Error> </If> <If Condition='$zcvt("${NAMESPACE}","U")="%SYS"'> <!-- Report an error if the namespace = %SYS --> <Error Status="$$$GeneralError"> <Arg Value="${NAMESPACE} should not be %SYS"/> </Error> </If> <Invoke Class="%z.Mapping" Method="GetMainDB" CheckStatus="0" Return="MainDB" > <Arg Value="${NAMESPACE}"/> </Invoke> <If Condition='$L("${MainDB}")=0'> <!-- Report an error if the globals database was not detected --> <Error Status="$$$GeneralError"> <Arg Value="${NAMESPACE} has no Globals database" /> </Error> </If> <Var Name="DBRESOURCE" Value="%DB_%DEFAULT"/> <Namespace Name="${NAMESPACE}" Create="no" > <Log Level="0" Text="${NAMESPACE} is ready to be configured using ${MainDB} and ${DBRESOURCE}" /> <Configuration> <!-- ??? Configure the database that should exist upto this step --> <Database Name="${MainDB}" Dir="${MainDB}" Create="no" Resource="${DBRESOURCE}" PublicPermissions="" /> <!-- ??? Configure the database that should exist upto this step --> <GlobalMapping Global="Q("0!"):(END)" From="CACHETEMP"/> <GlobalMapping Global="Q("0mseSTATUS"):("0mseSTATUS~")" From="${MainDB}"/> <GlobalMapping Global="Qa" From="CACHETEMP"/> <GlobalMapping Global="Qi" From="CACHETEMP"/> <GlobalMapping Global="Qi("MO")" From="${MainDB}"/> </Configuration> </Namespace> </Manifest> } /// This is a method generator whose code is generated by XGL. ClassMethod setup(ByRef pVars, pLogLevel As %Integer, pInstaller As %Installer.Installer, pLogger As %Installer.AbstractLogger) As %Status [ CodeMode = objectgenerator, Internal ] { #; Let our XGL document generate code for this method. Quit ##class(%Installer.Manifest).%Generate(%compiledclass, %code, "qMS") } ClassMethod GetMainDB(pNamespace) As %String { new $namespace s $namespace="%SYS" s sc=##class(Config.Namespaces).Get(pNamespace,.p) if 'sc d $system.OBJ.DisplayError(sc) set ret="" g gmdbq s ret=p("Globals") gmdbq quit ret } /// Invoke the installer passing in some variables /// zn "USER1" s sc=$system.OBJ.Load("mapping.xml","ck") d:'sc $system.Status.DisplayError(sc) /// s sc=##class(%z.Mapping).RunInstallWithLog($zu(12)_"mapping.log",2) d:'sc $system.Status.DisplayError(sc) /// ClassMethod RunInstallWithLog(pLogfile As %String, pLogLevel = 1) As %Status { #dim tVars #dim tStatus As %Status Set tVars("NAMESPACE") = $zu(5) // Construct a file logger #dim tLogger As %Installer.FileLogger = ##class(%Installer.FileLogger).%New(1,pLogfile) // Invoke the installer Set tStatus = ..setup(.tVars,pLogLevel,,tLogger) Do:$$$ISERR(tStatus) $system.OBJ.DisplayError(tStatus) Quit tStatus } } I've started it at the same Cache instance where I wrote it with following commands: zn "USER1" s sc=##class(%z.Mapping).RunInstallWithLog($zu(12)_"mapping.log",2) d:'sc $system.Status.DisplayError(sc) And it works. But if I'm excluding an [unneeded] code fragment that resides between two lines: <!-- ??? Configure the database that should exist upto this step --> I'm getting several errors, please see below. Why this fragment is still needed nevertheless I marked my namespace with Create="no" attribute? 2017-03-31 19:24:51 0 %z.Mapping: Installation starting at 2017-03-31 19:24:51, LogLevel=2 2017-03-31 19:24:51 0 : USER1 is ready to be configured using USER1 and %DB_%DEFAULT 2017-03-31 19:24:51 1 CreateNamespace: Creating namespace USER1 using / 2017-03-31 19:24:51 2 CreateNamespace: Modifying namespace USER1 2017-03-31 19:24:51 0 %z.Mapping: ERROR #5002: Cache error: <SUBSCRIPT>%LoadData+6^Config.Databases.1 ^SYS("CONFIG","CACHE","Databases","") ERROR #5659: Property 'Config.Namespaces::Globals(3@Config.Namespaces,ID=CACHE||Namespaces||USER1)' required ERROR #7202: Datatype value '' length less than MINLEN allowed of 1 ERROR #5659: Property 'Config.Namespaces::Routines(3@Config.Namespaces,ID=CACHE||Namespaces||USER1)' required ERROR #7202: Datatype value '' length less than MINLEN allowed of 1 2017-03-31 19:24:51 0 %z.Mapping: ERROR #ConfigFailed: Unknown status code: <Ins>ConfigFailed (,,,,,,,) > ERROR #5002: Cache error: <SUBSCRIPT>%LoadData+6^Config.Databases.1 ^SYS("CONFIG","CACHE","Databases","") > ERROR #5659: Property 'Config.Namespaces::Globals(3@Config.Namespaces,ID=CACHE||Namespaces||USER1)' required > ERROR #7202: Datatype value '' length less than MINLEN allowed of 1 > ERROR #5659: Property 'Config.Namespaces::Routines(3@Config.Namespaces,ID=CACHE||Namespaces||USER1)' required > ERROR #7202: Datatype value '' length less than MINLEN allowed of 1 2017-03-31 19:24:51 0 %z.Mapping: Installation failed at 2017-03-31 19:24:51 2017-03-31 19:24:51 0 %Installer: Elapsed time .178622s
go to post Alexey Maslov · Mar 28, 2017 Timothy, Both options succeded. Thank you so much! Just FYI, your 1st option <Var Name="AddClassesErrors" Value="",5202,5373,"" /> generated a code: Do tInstaller.SetVariable("AddClassesErrors",""",5202,5373,""") and the 2nd one <Var Name="AddClassesErrors" Value="#{"5202,5373"}" /> generated: Do tInstaller.SetVariable("AddClassesErrors",tInstaller.Evaluate("#{""5202,5373""}"))
go to post Alexey Maslov · Mar 28, 2017 Timothy, Both options succeded. Thank you so much! Just FYI, your 1st option <Var Name="AddClassesErrors" Value="",5202,5373,"" /> generated a code: Do tInstaller.SetVariable("AddClassesErrors",""",5202,5373,""") and the 2nd one <Var Name="AddClassesErrors" Value="#{"5202,5373"}" /> generated: Do tInstaller.SetVariable("AddClassesErrors",tInstaller.Evaluate("#{""5202,5373""}"))
go to post Alexey Maslov · Mar 28, 2017 Hi Timothy and Sergey, Timothy, putting the literal codes list inside a variable doesn't help much: I'm getting the same error. Thank you anyway. P.S. The reason of the issue is a wrong code for variable evaluation, e.g. <Var Name="AddClassesErrors" Value="5202,5373" /> is transformed to Do tInstaller.SetVariable("AddClassesErrors","5202","5373")
go to post Alexey Maslov · Mar 22, 2017 Luca,It was clear that we can use VMs from the very beginning of the project, and maybe we'll take this approach at last. I've just looked at the Docker's side willing to search more light/reliable alternative.Thank you again.
go to post Alexey Maslov · Mar 22, 2017 Thanks, Dmitry and Luca.Meanwhile I read some docs and interviewed colleagues who had more experience with Docker than me (while w/o Caché inside). What I've got out of it: Docker doesn't fit well to this very case of mine, which is mostly associated with deployment of already developed app rather than with new development. The reasons are:- Only one containerized app at the client's server (our case) doesn't mean so many benefits as if it would be several ones;- Windows issues which Luca already mentioned;- I completely agree that "data should reside on a host volume..." with only one remark: most likely that all this stuff will be maintained at the client's site by not very well skilled IT personal. It seems that in case of Doker/host volume/etc its configuring will be more complex than rolling up Cache for Windows installation with all possible settings prepared by %Installer based class.
go to post Alexey Maslov · Mar 15, 2017 AFAIK, docker encourages to implement microservices. What about classic Cache based app deployment, can docker be useful in this case? By classic I mean the system accessible via several services (ActiveX, TCP sockets, SOAP and REST), multi-tasking, etc with initial 1-2 GB database inside. At the moment I'm to choose a solution to roll up several dozen of rather small systems of such kind. Should I look at docker technology in this very case?I am bound to ver. 2015.1.4. Host OS most likely will be Windows 2008/2012, while I'd prefer to deploy our system on Linux, that's why I am searching a light solution how to virtualize or containerize it. Thank you!
go to post Alexey Maslov · Mar 6, 2017 Several years ago our company (SP.ARM) had developed Krasnoyarsk Kray Regional HIS, which was finally deployed using haproxy to balance CacheActiveX traffic load among 7 ECP application servers. This kind of traffic is based on the same protocol as ODBC, so the behavior should be quite the same (long sessions via 1972/tcp). To achieve high availability of the proxy server, it was deployed in two similar copies connected with ucarp.Our initial solution for load balancing and high availability of proxy was based on LVS+keepalived, but the engineers of maintainer company (Rostelecom) prefered to use haproxy+ucarp as they felt themselves more comfortable with them; we didn't mind.
go to post Alexey Maslov · Mar 5, 2017 Hi Michael,Using Studio's keyboard heavily, I can add to your list:Shift-F2 - jump to previous bookmarkF6, Shift-F6 - switch to next and previous opened routine/class windowCtrl-F7 - compile current routine/classF7 - [re]compile the whole projectCtrl-F9, F9, Shift-F9 - deal with break points (similar logic as with bookmarks)Ctrl-E, Ctrl-Shift-E - switch to full commands/functions names, switch back to shortcutsCtrl-Shift-O - open projectCtrl-O - open routine/class/etc.P.S. Have not tried Atelier yet.
go to post Alexey Maslov · Feb 22, 2017 Mark, may I ask your for some clarification? You wrote:As a result THP are not used for shared memory, and are only used for each individual process. What's a problem here? Shared memory can use "normal" huge pages, meanwhile individual processes - THP. The memory layout on our developers' serber shows that it's possible.# uname -aLinux ubtst 4.4.0-59-generic #80-Ubuntu SMP Fri Jan 6 17:47:47 UTC 2017 x86_64 x86_64 x86_64 GNU/Linux# cat /sys/kernel/mm/transparent_hugepage/enabled[always] madvise never# tail -11 /proc/meminfoAnonHugePages: 131072 kBCmaTotal: 0 kBCmaFree: 0 kBHugePages_Total: 1890HugePages_Free: 1546HugePages_Rsvd: 898HugePages_Surp: 0Hugepagesize: 2048 kBDirectMap4k: 243808 kBDirectMap2M: 19580928 kBDirectMap1G: 49283072 kB# ccontrol listConfiguration 'CACHE1' directory: /opt/cache1 versionid: 2015.1.4.803.0.16768 ...# cat /opt/cache1/mgr/cconsole.log | grep Allocated...01/27/17-16:41:57:276 (1425) 0 Allocated 1242MB shared memory using Huge Pages: 1024MB global buffers, 64MB routine buffers# grep -e AnonHugePages /proc/*/smaps | awk '{ if($2>4) print $0} ' | awk -F "/" '{print $0; system("ps -fp " $3)} '.../proc/165553/smaps:AnonHugePages: 2048 kBUID PID PPID C STIME TTY TIME CMDcacheusr 165553 1524 0 фев07 ? 00:00:00 cache -s/opt/cache1/mgr -cj -p18 SuperServer^%SYS.SERVER...