[U2] Unidata sessions stop at any time
Hello Unidata 7.1.0 on Windows 2008 installed 2 weeks ago. 80 users logged on Unidata sessions stop at any time Event viewer show these messages Error19/03/2011 11:42:17Application Error1000(100) Aplicación con errores udt.exe, versión 7.1.0.3146, marca de hora 0x42c2d61b, módulo con errores unknown, versión 0.0.0.0, marca de tiempo 0x, código de excepción 0x8026, desplazamiento con errores 0x7549a57d, Id. de proceso 0x38bc, hora de inicio de la aplicación 0x01cbe65488e6d5b1. (1100 occurs) Error19/03/2011 12:05:21UniData Telnet1004NingunoTelnet set client binary mode failed.. (13 occurs) Error19/03/2011 11:41:47UniData Telnet1004NingunoTelnet Client/Site licensing inquiry failed.. (42 occurs) How can I fix this ??? Regards, Marco Rojas ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] Simple SB screen display question
Hi Try this REFRESH = -2 Regards, Marco > Date: Wed, 30 Nov 2011 12:30:31 -0800 > From: bob_woodw...@k2sports.com > To: u2-users@listserver.u2ug.org > Subject: [U2] Simple SB screen display question > > Hi folks, > > > > I sent this to the SB-Solutions list first but I think something is > messed up with my registration there. > > > > Anyway, I have a simple need, I think. I have a screen that has a MV > field that I want to display the first two values when I leave the > field. The user may enter a number of values and in the process after > I'm going to a basic program where I'm doing some data manipulation. > When I'm done, I have everything in RECORD<14,1> and <14,2> with the > rest of the values cleared. On the screen, the last two values, which > are now empty, is what's displayed. How can I re-display the now > updated contents of RECORD<14> (and VALUE)? I thought REFRESH = 2 would > do it but no joy. > > > > Thanks. > > BobW > > > > ___ > U2-Users mailing list > U2-Users@listserver.u2ug.org > http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] End of Month date routine
TODAY = DATE() EOM = TODAY - TODAY"DD" + 32 EOM = EOM - EOM"DD" > To: u2-users@listserver.u2ug.org > From: wjhon...@aol.com > Date: Mon, 5 Dec 2011 15:16:02 -0500 > Subject: Re: [U2] End of Month date routine > > > Doesn't work on my system Anthony. > The This month o gives the month and year ok > but the attempt to iconv that sets it to zero, it doesn't pad the "01" into > it or something > so i just get 31 at that point. > > I think you were expecting that it would take "12 2011" and make it into "12 > 01 2011" or whatever > but it's not working > > > > > -Original Message- > From: George Gallen > To: U2 Users List > Sent: Mon, Dec 5, 2011 12:10 pm > Subject: Re: [U2] End of Month date routine > > > Haven't checked it, but what happens on 01/31 by adding 31, it should take > you > arch, backing up > Will give you 02/xx (28 or 29)? > George > -Original Message- > rom: u2-users-boun...@listserver.u2ug.org > [mailto:u2-users-boun...@listserver.u2ug.org] > n Behalf Of Wols Lists > ent: Monday, December 05, 2011 3:05 PM > o: u2-users@listserver.u2ug.org > ubject: Re: [U2] End of Month date routine > On 05/12/11 19:03, Wjhonson wrote: > > Does someone have a routine that, no matter what day you run it, returns the > nd of Month Date ? > (Assume the end of month date, is the calendar end of month date not some > crewy business date) > Hmmm... no-one seems to have done my approach ... > TODAY = @DATE > HIS.MONTH.O = OCONV (TODAY, "DMY") ;* strip day off > EXT.MONTH.I = ICONV( THIS.MONTH.O, "D") + 31 ;* random day next month > EXT.MONTH.O = OCONV( NEXT.MONTH.I, "DMY") ;* strip day off > AST.DAY.I = ICONV( NEXT.MONTH.O, "D") - 1 ;* subract one day > If you don't have a day in your i/oconv it defaults to 1, so the logic > orks. Unfortunately you can't combine the first three lines because > here's no number you can pick that will guarantee to land you in next > onth whatever today's date :-( > Cheers, > ol > __ > 2-Users mailing list > 2-us...@listserver.u2ug.org > ttp://listserver.u2ug.org/mailman/listinfo/u2-users > __ > 2-Users mailing list > 2-us...@listserver.u2ug.org > ttp://listserver.u2ug.org/mailman/listinfo/u2-users > > ___ > U2-Users mailing list > U2-Users@listserver.u2ug.org > http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] End of Month date routine
TODAY = ICONV("31 JAN 2011", "D") ;* 15737 EOM = TODAY - TODAY"DD" + 32;* 15737 - 31 + 32 = 15738 EOM = EOM - EOM"DD" ;* 15738 - 15738"DD" PRINT EOM ;* 15738 - 1 = 15737 * OCONV(15737, "D") = "31 JAN 2011" * WORKS FINE - UDT 7.1.7 (AIX) > Date: Mon, 5 Dec 2011 15:52:40 -0500 > From: dlaan...@hubbardsupply.com > To: u2-users@listserver.u2ug.org > Subject: Re: [U2] End of Month date routine > > No, this will fail on January 31st, every year. > > Sincerely, > David Laansma > IT Manager > Hubbard Supply Co. > Direct: 810-342-7143 > Office: 810-234-8681 > Fax: 810-234-6142 > www.hubbardsupply.com > "Delivering Products, Services and Innovative Solutions" > > > -----Original Message----- > From: u2-users-boun...@listserver.u2ug.org > [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Marco Antonio > Rojas Castro > Sent: Monday, December 05, 2011 3:49 PM > To: u2-users@listserver.u2ug.org > Subject: Re: [U2] End of Month date routine > > > TODAY = DATE() > EOM = TODAY - TODAY"DD" + 32 > EOM = EOM - EOM"DD" > > > > > To: u2-users@listserver.u2ug.org > > From: wjhon...@aol.com > > Date: Mon, 5 Dec 2011 15:16:02 -0500 > > Subject: Re: [U2] End of Month date routine > > > > > > Doesn't work on my system Anthony. > > The This month o gives the month and year ok but the attempt to iconv > > that sets it to zero, it doesn't pad the "01" into it or something so > > i just get 31 at that point. > > > > I think you were expecting that it would take "12 2011" and make it > > into "12 01 2011" or whatever but it's not working > > > > > > > > > > -Original Message- > > From: George Gallen > > To: U2 Users List > > Sent: Mon, Dec 5, 2011 12:10 pm > > Subject: Re: [U2] End of Month date routine > > > > > > Haven't checked it, but what happens on 01/31 by adding 31, it should > > take you arch, backing up Will give you 02/xx (28 or 29)? > > George > > -Original Message- > > rom: u2-users-boun...@listserver.u2ug.org > > [mailto:u2-users-boun...@listserver.u2ug.org] > > n Behalf Of Wols Lists > > ent: Monday, December 05, 2011 3:05 PM > > o: u2-users@listserver.u2ug.org > > ubject: Re: [U2] End of Month date routine On 05/12/11 19:03, Wjhonson > > > wrote: > > > > Does someone have a routine that, no matter what day you run it, > > returns the nd of Month Date ? > > (Assume the end of month date, is the calendar end of month date not > > some crewy business date) Hmmm... no-one seems to have done my > > approach ... > > TODAY = @DATE > > HIS.MONTH.O = OCONV (TODAY, "DMY") ;* strip day off EXT.MONTH.I = > > ICONV( THIS.MONTH.O, "D") + 31 ;* random day next month EXT.MONTH.O = > > OCONV( NEXT.MONTH.I, "DMY") ;* strip day off AST.DAY.I = ICONV( > > NEXT.MONTH.O, "D") - 1 ;* subract one day If you don't have a day in > > your i/oconv it defaults to 1, so the logic orks. Unfortunately you > > can't combine the first three lines because here's no number you can > > pick that will guarantee to land you in next onth whatever today's > > date :-( Cheers, ol __ > > 2-Users mailing list > > 2-us...@listserver.u2ug.org > > ttp://listserver.u2ug.org/mailman/listinfo/u2-users > > __ > > 2-Users mailing list > > 2-us...@listserver.u2ug.org > > ttp://listserver.u2ug.org/mailman/listinfo/u2-users > > > > ___ > > U2-Users mailing list > > U2-Users@listserver.u2ug.org > > http://listserver.u2ug.org/mailman/listinfo/u2-users > > ___ > U2-Users mailing list > U2-Users@listserver.u2ug.org > http://listserver.u2ug.org/mailman/listinfo/u2-users > ___ > U2-Users mailing list > U2-Users@listserver.u2ug.org > http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] UD Directory File Pointer
try this 001: DIR 002: \\MYSERVER\HELP\ 003: D_VOC Regards, Marco > Date: Wed, 29 Feb 2012 15:02:10 -0800 > From: wphask...@advantos.net > To: U2-users@listserver.u2ug.org > Subject: [U2] UD Directory File Pointer > > I trip over this every time I try it. Can someone clue me in whether > this actually works? > > 7 Dev (0)-> AE VOC QFILE > Top of "QFILE" in "VOC", 3 lines, 52 characters. > *--: P > 001: DIR > 002: \\MYSERVER\HELP > 003: D_VOC > Bottom. > *--: EX > Quit "QFILE" in file "VOC" unchanged. > > 7 Dev (0)-> LIST QFILE > errno=2: No such file or directory > can not stat() in U_get_fileid(),fname=\\MYSERVER\HELP. > Open file error. > > 7 Dev (0)-> !dir \\myserver\help > Volume in drive \\myserver\help is E-Data > Volume Serial Number is 6635-B087 > > Directory of \\myserver\help > > 10/21/2011 10:50 PM . > 10/21/2011 10:50 PM .. > 08/07/2011 01:52 PM 8,967 1_1.html > 08/07/2011 01:52 PM 13,112 1_2.html > 08/07/2011 01:52 PM 16,672 1_3.html > 08/07/2011 01:52 PM 4,906 1_4.html > 08/07/2011 01:52 PM 7,387 1_4_1.html > . > . > > The directory is "shared" with everyone on a Windows 2008 R2 server. UD > and the directory are on different machines. I'm logged in as the > administrator. Thanks, > > Bill > > ___ > U2-Users mailing list > U2-Users@listserver.u2ug.org > http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
Re: [U2] SB+ screen question
Try using the process like default expression (mandatory). ┌Enter Field─┐ │ Field NamePAID.DATE│ │ Disp Prpt (N/S{nn}/A) N│ │ Input Field (Y/N) N│ │ Mandatory (Y/N) N│ │ Control/Dep/Read D│ │ Window Size│ │ Prompt Col 29 Row4 │ │ Input Col 29 Row4 │ │ Process Before D:P("PROCCESS")[M] │ │ Process After │ │ Intuitive Help │ └┘ > From: bl...@shaklee.com > To: u2-users@listserver.u2ug.org > Date: Mon, 12 Mar 2012 15:20:26 -0700 > Subject: Re: [U2] SB+ screen question > > Yes they are MV fields. There is nothing on the LI# or Award fields. The > sequencing is left to right with no extra processing and they are just @WORK > variables. > > I tried to move the process from Process After entrty slot to the Validation > slot and it behaves a little better but it still skips from line 1 to 2 and > so on without stopping at the Earned Date field. > > -Original Message- > From: u2-users-boun...@listserver.u2ug.org > [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Woodward, Bob > Sent: Monday, March 12, 2012 2:15 PM > To: U2 Users List > Subject: Re: [U2] SB+ screen question > > > So are these MV fields or SV fields? Also, you only have a process-after on > the Earned Date? Nothing on the LI# or Award fields? I'm also assuming your > sequence of prompting in the screen is straight forward, left to right for > these 4 prompts, and you have no extra processes on the DICT entries for > these. You said they are just @WORK variables, right? > > > -Original Message- > From: u2-users-boun...@listserver.u2ug.org > [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Lunt, Bruce > Sent: Monday, March 12, 2012 1:53 PM > To: 'U2 Users List' > Subject: Re: [U2] SB+ screen question > > Hi Bob, > > Thanks for the reply. I agree with you - Kevin's book is fantastic! I have > been using it for many years and still refer to it when I need guidance. As > for the problem: Maybe I am using the wrong processing slot. What I have is > something like this: > > LI# Award Earned Date Paid Date > --- - --- --- > 999 x DD MMM DD MMM > > I have the LI# field as input but do nothing else with it. I have the Award > field as no input; display only. I have the Earned Date field as input with > a Process After process to determine what to do with the Paid Date. In the > process I will populate the Paid Date if it is not already there. I will > change the Paid Date to be the same as the Earned Date if the Earned Date > was changed and the Paid date was the same as the original Earned Date. If > the Paid Date is not the same as the original Earned Date I will leave the > Paid Date alone. And lastly, the Paid Date field is diplay only. > > To me, this means that I have to prompt the user for the Earned Date - I > cannot skip the field until I know if they are wanting to change the field > so I then will know what to do with the Paid Date. If they do not change the > Earned Date then I will leave the Paid Date as it is. > > I also put a DISP line showing the value of the original Earned Date and the > current one in the Process After for the Earned Date and it will show > correctly the first time I enter the screen (after I hit enter in the the > Earned Date field.) but it will show after I enter the LI# field, the next > time I open the screen and skip the Earned Date field. > > Thanks again, > Bruce > > > > -Original Message- > From: u2-users-boun...@listserver.u2ug.org > [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Woodward, Bob > Sent: Monday, March 12, 2012 12:09 PM > To: U2 Users List > Subject: Re: [U2] SB+ screen question > > > Hi Bruce, > > It may have to do with your concept of how the work flow is going in screen > and the way your process is working to control your entry. If you have > access to a copy of Kevin King's green System Builder book "SB+ Solutions", > check the sections in "Special Processing for Multivalued Fields" starting > on page 3-145. Specifically where it talks about the fact that in an > Multivalue field, the Process Before the Prompt is only executed one time > for the first value, not before each value of the field. This might be > where you're having the problem. > > I love this book, by the way!!! Thanks Kevin! > > BobW > > -Original Message- > From: u2-users-boun...@listserver.u2ug.org > [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Lunt, Bruce > Sent: Monday, March 12, 2012 10:40 AM > To: u2-users@listserver.u2ug.org > Subject: [U2] SB+ screen question > > Hi All, > > I have created a new screen in SB+. The data is built into the work record > and then I want to have the user be able to go through the lines one at a > time in order to change a
RE: [U2] UniData equivalent of GETBASIC
Hi David in unidata 6.0 try this RUNTHISPROG = SYSTEM(40) regards, Marco From: "David Wolverton" <[EMAIL PROTECTED]> Reply-To: [EMAIL PROTECTED] To: <[EMAIL PROTECTED]> Subject: [U2] UniData equivalent of GETBASIC Date: Thu, 13 May 2004 12:51:55 -0500 In UniVerse, they have GETBASIC which pulls in command line information from executing a Basic program What is the equivalent process in UniData, for example, if I have RUNTHISPROG opta optb Where RUNTHISPROG is a cataloged program, what would I do to 'see' opta and optb? DW --- u2-users mailing list [EMAIL PROTECTED] http://www.u2ug.org/listinfo/u2-users _ MSN Amor: busca tu = naranja http://latam.msn.com/amor/ --- u2-users mailing list [EMAIL PROTECTED] http://www.u2ug.org/listinfo/u2-users
Re: [U2] Is it possible to nest 'LOOP / WHILE READNEXT / REPEAT' loops?
In that case, use the remove command here's an example SUBROUTINE PROGRAMA.PRG *-- $INCLUDE DMSKELCODE COMMON $INCLUDE DMSKELCODE SBPLUS.EQU *--- CONFIDENCIAL - * Escrito por .- Marco Rojas * Fecha Creada .- 06/22/2004 6:12 pm * Descripcion .- *-- CALL SB.OPEN.FILE('SO', F.SO, RTN.FLAG) ; IF RTN.FLAG THEN RETURN CALL SB.OPEN.FILE('PMT', F.PMT, RTN.FLAG) ; IF RTN.FLAG THEN RETURN EXECUTE 'SELECT SO WITH INV.IDS = "1020"' CAPTURING OUT READSELECT A.SO.ID ELSE A.SO.ID = '' LOOP REMOVE SO.ID FROM A.SO.ID SETTING DM1 READ R.SO FROM F.SO, SO.ID THEN EXECUTE 'SELECT PMT WITH SO.ID = "':SO.ID:'"' CAPTURING OUT READSELECT A.PMT.ID ELSE A.PMT.ID = '' LOOP REMOVE PMT.ID FROM A.PMT.ID SETTING DM2 READV PMT.AMT FROM F.PMT, PMT.ID, 5 ELSE PMT.AMT = 0 TOT.PMT.AMT += PMT.AMT UNTIL DM2 = 0 DO REPEAT END UNTIL DM1 = 0 DO REPEAT RETURN From: Robert Stearns <[EMAIL PROTECTED]> Reply-To: [EMAIL PROTECTED] To: [EMAIL PROTECTED] Subject: Re: [U2] Is it possible to nest 'LOOP / WHILE READNEXT / REPEAT' loops? Date: Tue, 22 Jun 2004 15:56:56 -0400 Use the FROM option. Amy Cook wrote: UniData, BASICTYPE P While debugging something I'm working on, I figured out I couldn't use the LOOP / WHILE READNEXT / REPEAT as I had originally planned...seems if you nest one inside the other, it loses track of which 'next' you're asking for (I'm sure this is by design, I just either haven't run across it yet, or am not using an option that is available to me...) For instance, in the code below, if my first active select list at line 003 contained 2 record ID's (1 & 2), and my second active select list at line 011 also contained 2 record ID's, (A & B), then by the time I read in my first SOD.ID at line 013, it was reading the 2nd record of my first active select list (i.e. '2' instead of 'A') 001: CMD = 'SELECT SOHDR WITH DATE GE "':BEG.DT:'" AND WITH DATE LE "':END.DT:'"' 002: CMD = CMD:' AND WITH STATUS NE "C" AND WITH PROD_LINE = "':ITP:'"' 003: EXECUTE CMD CAPTURING JUNK;*need error trap 004: LOOP 005: WHILE READNEXT ITEM.ID DO 006:READ SOH.REC FROM SOH,ITEM.ID ELSE SOH.REC='' 007:BILL2 = SOH.REC<2> ;*bill-to cust 008:SLSPROG.ID = SOH.REC<15> 009:READV SLSPROG FROM SYST,"OSC*":SLSPROG.ID,4 ELSE SLSPROG='' ;*SlsProg Desc 010:CMD1 = 'SELECT SODET = "':ITEM.ID:']"' 011:EXECUTE CMD1 CAPTURING SOD.JUNK 012:LOOP 013:WHILE READNEXT SOD.ID DO 014: READ SOD.REC FROM SOD,SOD.ID ELSE SOD.REC='' ;*line record Anyway...does anyone have either (a) a way to nest READNEXT's, or (b) another suggestion? ...I was thinking maybe a count on the records of the 2nd file that meet my criteria, then a FOR/NEXT...? --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/ _ Charla con tus amigos en lmnea mediante MSN Messenger: http://messenger.latam.msn.com/ --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
[U2] Terminate user process
I installed unidata 6.0.12 on a windows 2000 server all works ok, but we can't end user process UDTNO USRNBR UID USRNAME USRTYPE TTY IP-ADDRESSTIME DATE 11568 263565 lasimbaya udt pts/1 147.135.150.44 06:27:28 Sep 08 2004 2 956 263642 nsolorzan udt pts/2 147.135.150.53 06:30:05 Sep 08 2004 31228 263418 destrella udt pts/3 147.135.151.101 06:30:24 Sep 08 2004 4 712 263955 adurango udt pts/4 147.135.150.32 06:30:41 Sep 08 2004 !STOPUDT 1568 You don't have access to stop process 1568 all the users are domain user, even with domain administrator can't do this neither using the task manager pls, tell me what can i do thanks _ MSN Amor: busca tu = naranja http://latam.msn.com/amor/ --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
[U2] Unidata error
--- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] UniData Indexes
450 Lynx formatting failed: open3: exec of lynx --stdin --dump --force_html --hiddenlinks=ignore --localhost --image_links --nolist --noredir --noreferer --realm failed at /etc/smrsh/demime line 1519 --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] UniData Indexes
Try this SUBROUTINE VER.INDICES.PRG *-- $INCLUDE DMSKELCODE COMMON $INCLUDE DMSKELCODE SBPLUS.EQU *-- * Escrito por .- Marco Rojas * Fecha Creada .- 13/06/02 12:15:50 * Descripcion .- MUESTRA LOS INDICES DEL ARCHIVO *-- ARCHIVO = PARAM CALL SB.OPEN.FILE(ARCHIVO, F.ARCH, FLAG) ; IF FLAG THEN RETURN A.IDX = INDICES(F.ARCH) N.IDX = DCOUNT(A.IDX,@AM) RES = 'Archivo ': ARCHIVO :' - ': N.IDX :' INDICES' FOR I = 1 TO N.IDX R.IDX = INDICES(F.ARCH, A.IDX) RES := @VM: A.IDX :' ': R.IDX<1,1> :' ': R.IDX<6> :' / Regenerar ':R.IDX<1,4> LIN = CHANGE(R.IDX<2>, ';', @AM) N.LIN = DCOUNT(LIN, @AM) FOR J = 1 TO N.LIN RES := @VM: ' ': TRIM(LIN) NEXT I NEXT I CALL SB.PROCESS('S:SELECT ':RES:' (B0,0') RETURN Original Message Follows From: Andy Squires <[EMAIL PROTECTED]> Reply-To: u2-users@listserver.u2ug.org To: u2-users@listserver.u2ug.org Subject: Re: [U2] UniData Indexes Date: Mon, 9 May 2005 12:42:42 -0400 (EDT) Yes, that's correct. I want to see each index, not just whether or not there is an index. Thanks, Andy On Mon, 9 May 2005 [EMAIL PROTECTED] wrote: That is only going to tell you which files are indexed and not show each index (which is probably what you were asking for). -- Original message -- > In Universe I do... > > COMO ON SCOTT > SELECTF > SET.INDEX INFORM > COMO OFF > > Not sure if this works in UD though. > > -- Original message -- > > > Hi all, > > > > Is there a way to get a list of all indexes on all files in a particular > > account? The only way I thought > > to do this was to loop through a list of all the files and do a LIST.INDEX > > command. Seems like there > > should be a better way. > > > > This is on UniData 6.0. > > > > Thanks, > > > > Andy > > > > > > | Andy Squires -- Systems Analyst | > > | Office of Information Technology -- American University | > > | (202) 885-2785 | > > --- > > u2-users mailing list > > u2-users@listserver.u2ug.org > > To unsubscribe please visit http://listserver.u2ug.org/ > --- > u2-users mailing list > u2-users@listserver.u2ug.org > To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ | Andy Squires -- Systems Analyst | | Office of Information Technology -- American University | | (202) 885-2785 | --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] UniData Indexes
You need this SUBROUTINE ALL_INDICES.PRG *-- $INCLUDE DMSKELCODE COMMON $INCLUDE DMSKELCODE SBPLUS.EQU *-- * Escrito por .- Marco Rojas * Descripcion .- LIST ALL INDEX IN AN ACCONUT *-- EXECUTE 'SETPTR ,3,BANNER INDICES,NFMT,BRIEF' CAPTURING OUT PRINTER ON EXECUTE 'SELECT VOC WITH F1 = "F"' CAPTURING OUT READSELECT A.FILES ELSE A.FILES = '' LOOP REMOVE FILE.NAME FROM A.FILES SETTING DM OPEN FILE.NAME TO F.HANDLE THEN A.IDX = INDICES(F.HANDLE) IF A.IDX<1> THEN PRINT FILE.NAME PRINT CHANGE(A.IDX, @AM, ', ') END PRINT CLOSE F.HANDLE END UNTIL DM = 0 DO REPEAT PRINTER OFF PRINTER CLOSE * THEN EDIT FILE _HOLD_ ITEM INDICES RETURN Original Message Follows From: Andy Squires <[EMAIL PROTECTED]> Reply-To: u2-users@listserver.u2ug.org To: u2-users@listserver.u2ug.org Subject: Re: [U2] UniData Indexes Date: Mon, 9 May 2005 12:42:42 -0400 (EDT) Yes, that's correct. I want to see each index, not just whether or not there is an index. Thanks, Andy On Mon, 9 May 2005 [EMAIL PROTECTED] wrote: > That is only going to tell you which files are indexed and not show each index (which is probably what you were asking for). > > -- Original message -- > > > In Universe I do... > > > > COMO ON SCOTT > > SELECTF > > SET.INDEX INFORM > > COMO OFF > > > > Not sure if this works in UD though. > > > > -- Original message -- > > > > > Hi all, > > > > > > Is there a way to get a list of all indexes on all files in a particular > > > account? The only way I thought > > > to do this was to loop through a list of all the files and do a LIST.INDEX > > > command. Seems like there > > > should be a better way. > > > > > > This is on UniData 6.0. > > > > > > Thanks, > > > > > > Andy > > > > > > > > > | Andy Squires -- Systems Analyst | > > > | Office of Information Technology -- American University | > > > | (202) 885-2785 | > > > --- > > > u2-users mailing list > > > u2-users@listserver.u2ug.org > > > To unsubscribe please visit http://listserver.u2ug.org/ > > --- > > u2-users mailing list > > u2-users@listserver.u2ug.org > > To unsubscribe please visit http://listserver.u2ug.org/ > --- > u2-users mailing list > u2-users@listserver.u2ug.org > To unsubscribe please visit http://listserver.u2ug.org/ > | Andy Squires -- Systems Analyst | | Office of Information Technology -- American University | | (202) 885-2785 | --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] [ud] Sub-second delay?
H = SYSTEM(12) ;* TIME IN MILISECONDS LOOP H2 = SYSTEM(12) IF H2 - H > 500 THEN EXIT ;* 500 MS ELAPSED REPEAT > Date: Mon, 27 Aug 2012 10:17:01 -0600 > From: ke...@precisonline.com > To: u2-users@listserver.u2ug.org > Subject: Re: [U2] [ud] Sub-second delay? > > Ah crap, this client is Unidata 6.1 and NAP is not supported. I'm not > seeing it in the 7.1 or 7.2 docs either. Looks to be a UV thing, right? > > On Mon, Aug 27, 2012 at 9:41 AM, David L. Wasylenko wrote: > > > NAP 500 > > > > ... david ... > > > > David L. Wasylenko > > President, Pick Professionals, Inc > > w) 314 558 1482 > > d...@pickpro.com > > > > -Original Message- > > From: u2-users-boun...@listserver.u2ug.org [mailto: > > u2-users-boun...@listserver.u2ug.org] On Behalf Of Kevin King > > Sent: Monday, August 27, 2012 10:46 AM > > To: U2 Users List > > Subject: [U2] [ud] Sub-second delay? > > > > Is there anything in Unidata (7.1, in particular) that can do a sub-second > > delay, like maybe a half second? > > ___ > > U2-Users mailing list > > U2-Users@listserver.u2ug.org > > http://listserver.u2ug.org/mailman/listinfo/u2-users > > ___ > > U2-Users mailing list > > U2-Users@listserver.u2ug.org > > http://listserver.u2ug.org/mailman/listinfo/u2-users > > > ___ > U2-Users mailing list > U2-Users@listserver.u2ug.org > http://listserver.u2ug.org/mailman/listinfo/u2-users ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users