Do you need the APPEND clause on the WRITESEQ? =========================================================== Norman Morgan <> [EMAIL PROTECTED] <> http://www.brake.com =========================================================== Foreign aid might be defined as a transfer from poor people in rich countries to rich people in poor countries. ===========================================================
> -----Original Message----- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] Behalf Of Jay Falck > Sent: Friday, December 17, 2004 12:50 PM > To: [EMAIL PROTECTED] > Subject: RE: [U2] [UD]WRITESEQ quirkiness > > > Being UV rather than UD, I'm only taking a guess. Is it possible the > destination file system is either full or quota controlled? Since the only > difference between the two output items is the size, I would check disk > space. > > Jay > > -----Original Message----- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] On Behalf Of Dana Baron > Sent: Friday, December 17, 2004 12:11 PM > To: U2-Users (E-mail) > Subject: [U2] [UD]WRITESEQ quirkiness > > Here's a puzzler: what is it that causes the ELSE clause to be > executed in a > WRITESEQ block when the only apparent change is the content of the data to > be written. I've included a section of code below followed by the output > from two subsequent calls. In the first, the code executes the THEN clause > and prints SENDING... In the second, the ELSE clause is executed producing > the ERROR WRITING... results. Any thoughts? Could it be that there is a > limit to the size of the data that wan be written using WRITESEQ? > > This code segment: > > ****************** > SAVE_MESSAGE_FILE: > > UNIX_DIR = "/unidata/lodginglink/" > SAVE_DIR = "/unidata/lodginglink/save/" > DATE_PART = DATE() > TIME_PART = TIME() > MSG_PART = UHLL.ITEM<UHLL.TXN.ID.AMC> : > UHLL.ITEM<UHLL.SEQ.NUM.AMC> > FILE_NAME = DATE_PART:TIME_PART:MSG_PART:".out" > > OPENSEQ UNIX_DIR, FILE_NAME TO FILE_POINTER THEN > OK_TO_CONTINUE = TRUE. > END > PRINT "OPENSEQ STATUS IS " : > PRINT STATUS() > > MSG_HEX = OCONV(MSG_OUT,"MX") > WRITESEQ MSG_HEX ON FILE_POINTER THEN > IF TRACE.ON THEN > PRINT "SENDING: " : MSG_OUT > END > END ELSE > PRINT "ERROR WRITING" > PRINT "ASCII MESSAGE IS " : MSG_OUT > PRINT "HEX MESSAGE IS " : MSG_HEX > PRINT "FILE NAME IS " : FILE_NAME > END > CLOSESEQ FILE_POINTER > > SAVE_MESSAGE_FILE_EXIT: > RETURN > ******* > > Produces this output: > > OPENSEQ STATUS IS 0 > SENDING: ^B451900000389999^C1 > OPENSEQ STATUS IS 0 > ERROR WRITING > ASCII MESSAGE IS ^B254440000369999008019DISHONGH, GEORGIA > L1060091*1163482144001015100101740043801175003SY11770010^C0 > HEX MESSAGE IS > 02323534343430303030333639393939303038303139444953484F4E47482C2047 > 454F524749 > 41204C313036303039312A31313633343832313434303031303135313030313031 > 3734303034 > 33383031313735303033535931313737303031300330 > FILE NAME IS 135014589700369999.out > > > Dana Baron > System Manager > Smugglers' Notch Resort > ------- > 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/ > -- > No virus found in this incoming message. > Checked by AVG Anti-Virus. > Version: 7.0.296 / Virus Database: 265.5.4 - Release Date: 12/15/2004 > -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.296 / Virus Database: 265.5.4 - Release Date: 12/15/2004 ------- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
