Jump to content
Macro Express Forums

m204prgmr

Members
  • Posts

    103
  • Joined

  • Last visited

Posts posted by m204prgmr

  1. Renee,

    What did you want to happen after ME has finished searching.

    If I have this right, you are searching a .txt document with ME for certain text and when that string is found, you start up an Excel document and search Excel for the same text?

     

    If this is correct, where is the initial search string coming from? Can you copy and paste your code please into a reply?

    Thanks

    Robert

  2. Hi Joe,

    You are correct in that, the blocks start with JES and I am looking for certain bits of information from certain lines before the next JES.

     

    I will include at the bottom of this reply the updated code where I am only grabbing any WAITING FOR CPU messages. I wanted to keep moving forward and was uncertain if anyone would reply to my original. The attached is the generated output. Notice in the output that, if there is a value the 5th column, the line just before it is a duplicate. I need to eliminate the duplicate too.

     

    thanks,

    Robert

     

    <TVAR2:10:01:,><IFOTH:01:2:C:\Epilog\testmeomega1.txt><DOFILE:08:NN:C:\Epilog\testmeomega.txt>><ENDIF><IFOTH:09:2:C:\Epilog\testmeomega1.txt><TMVAR2:20:99:00:000:000:C:\Epilog\testmeomega.txtF><ENDIF><TVAR2:20:01:Job Name,ELAP,Start/Stop,Date,Waiting for CPU><TMVAR2:20:20:00:000:000:C:\Epilog\testmeomega.txtT><TVAR2:21:01:,,,,,><TMVAR2:20:21:00:000:000:C:\Epilog\testmeomega.txtT><BTFBEG:001:000001:000000:C:\Epilog\EPILOG1152006.txt><IFVAR2:1:01:7:JES><TMVAR2:11:01:00:001:008:><TMVAR2:10:02:01:001:008:><TMVAR2:08:02:10:000:000:><ENDIF><REM2:****** Get ELAP Time, Start and Stop Time, Date of run (start and stop time = same date ******><TMVAR2:10:95:01:003:004:><IFVAR2:1:95:1:FROM><IVAR2:01:13:1:ON><TMVAR2:10:15:01:028:050:><IVAR2:02:13:15:ON><IFVAR2:2:01:1:27><TMVAR2:10:03:01:065:008:><TMVAR2:10:04:01:011:015:><TMVAR2:10:05:01:029:009:><TMVAR2:08:03:10:000:000:><TMVAR2:08:04:10:000:000:><TMVAR2:08:05:10:000:000:><TMVAR2:07:02:00:000:000:%T3%><TMVAR2:07:02:00:000:000:%T4%><TMVAR2:07:02:00:000:000:%T5%><DIS:<TMVAR2:20:02:00:000:000:C:\Epilog\testmeomega.txtT><ENDIF><DIS:<TMVAR2:20:02:00:000:000:C:\Epilog\testmeomega.txtT><IFVAR2:2:02:1:12><REM2:****** Get ELAP Time, Start and Stop Time, Date of run (start and stop time = date roll over ******><TMVAR2:10:06:01:065:007:><TMVAR2:08:06:10:000:000:><TMVAR2:07:02:00:000:000:%T6%><TMVAR2:10:07:01:011:006:><TVAR2:25:01: TO><TMVAR2:08:07:25:000:000:><TMVAR2:10:08:01:032:006:><TMVAR2:10:09:01:020:008:><TMVAR2:10:11:01:041:009:><TMVAR2:08:08:10:000:000:><TMVAR2:08:09:25:000:000:><TMVAR2:08:11:10:000:000:><TMVAR2:07:02:00:000:000:%T7%><TMVAR2:07:02:00:000:000:%T8%><TMVAR2:07:02:00:000:000:%T9%><TMVAR2:07:02:00:000:000:%T11%><DIS:<TMVAR2:20:02:00:000:000:C:\Epilog\testmeomega.txtT><ENDIF><TMVAR2:20:02:00:000:000:C:\Epilog\testmeomega.txtT><ENDIF><VARSR:02><REM2:****** Get CPU Delay information ******><IFVAR2:1:01:7:WAITING FOR CPU><TMVAR2:10:06:01:023:007:><DIS:<TMVAR2:08:06:10:000:000:><TMVAR2:07:02:00:000:000:%T6%><TMVAR2:20:02:00:000:000:C:\Epilog\testmeomega.txtT><DIS:<TBOX4:T:1:CenterCenter000278000200:000:%T1%><ENDIF><BTFEND><LAUNCHDEL2:0:01C:\Epilog\testmeomega.txt>

    test_meomega_for_forum.txt

  3. Renee,

    T is for Text. One example is you can look for specific text in each line ME reads in when you are processing the file. N is for integer. One example of using this to find the starting position of something in your line (T1). Have you tried to process your Excell as a .csv file? Save the Excell sheet as a .csv if you have not and use it that way and you will not have to use the keyboard commands.

  4. Good morning,

    I am at a brick wall in trying to finish this comma delimited output and can use some help. Attached is a snippet of EPILOG1152006.txt, the document I am processing. In it are blocks of information for each job with the prefix TSI that the mainframe runs in batch. Some of the blocks of information will contain WAITING FOR CPU or they will contain ECB WAIT (W/ STIMER) or they will contain SWAPPED WITH WTOR. And some blocks may contain one or two or maybe all three of the above. In the attachment, all three do not appear in the same block, that I have found.

    My problem it seems is I am only capturing SWAPPED WITH WTOR and when that happens, there is a second identical line printed but without SWAPPED WITH WTOR.

    I would like to capture any or all of th above that appear in each block.

     

    I don't know how to use SWITCH or if it will help. The example in HELP is vague to me and does not show the code of how to do a TEXT DISPLAY. Or I am really missing it. I toyed with using OR and ELSE but maybe I am not using them correctly.

     

    Thanks and I hope everyone has a great Sunday. The code is below my signature

    Robert

     

     

    <TVAR2:10:01:,><IFOTH:01:2:C:\Epilog\testmeomega.txt><DOFILE:08:NN:C:\Epilog\testmeomega.txt>><ENDIF><IFOTH:09:2:C:\Epilog\testmeomega.txt><TMVAR2:20:02:00:000:000:C:\Epilog\testmeomega.txtF><ENDIF><TVAR2:20:01:Job Name,ELAP,Start/Stop,Date,Waiting for CPU><TMVAR2:20:20:00:000:000:C:\Epilog\testmeomega.txtT><TVAR2:21:01:,,,,,><TMVAR2:20:21:00:000:000:C:\Epilog\testmeomega.txtT><BTFBEG:001:000001:000000:C:\Epilog\EPILOG1152006.txt><IFVAR2:1:01:7:JES><TMVAR2:11:01:00:001:008:><TMVAR2:10:02:01:001:008:><TMVAR2:08:02:10:000:000:><ENDIF><REM2:****** Get ELAP Time, Start and Stop Time, Date of run (start and stop time = same date ******><IFVAR2:1:01:7:FROM><IVAR2:01:13:1:ON><TMVAR2:10:15:01:028:050:><IVAR2:02:13:15:ON><IFVAR2:2:01:1:27><TMVAR2:10:03:01:065:008:><TMVAR2:08:03:10:000:000:><TMVAR2:07:02:00:000:000:%T3%><TMVAR2:10:04:01:011:015:><TMVAR2:08:04:10:000:000:><TMVAR2:07:02:00:000:000:%T4%><TMVAR2:10:05:01:029:009:><TMVAR2:08:05:10:000:000:><TMVAR2:07:02:00:000:000:%T5%><ENDIF><IFVAR2:2:02:1:12><REM2:****** Get ELAP Time, Start and Stop Time, Date of run (start and stop time = date roll over ******><TMVAR2:10:06:01:065:007:><TMVAR2:08:06:10:000:000:><TMVAR2:07:02:00:000:000:%T6%><TMVAR2:10:07:01:011:006:><TVAR2:25:01: TO><TMVAR2:08:07:25:000:000:><TMVAR2:07:02:00:000:000:%T7%><TMVAR2:10:08:01:032:006:><TMVAR2:08:08:10:000:000:><TMVAR2:07:02:00:000:000:%T8%><TMVAR2:10:09:01:020:008:><TMVAR2:08:09:25:000:000:><TMVAR2:07:02:00:000:000:%T9%><TMVAR2:10:11:01:041:009:><TMVAR2:08:11:10:000:000:><TMVAR2:07:02:00:000:000:%T11%><ENDIF><TMVAR2:20:02:00:000:000:C:\Epilog\testmeomega.txtT><ENDIF><REM2:****** Get Delay information ******><TMVAR2:10:50:01:002:017:><IFVAR2:1:50:7:SWAPPED><TMVAR2:10:12:01:002:020:><TMVAR2:08:12:10:000:000:><TMVAR2:07:02:00:000:000:%T12%><TMVAR2:20:02:00:000:000:C:\Epilog\testmeomega.txtT><ELSE><IFVAR2:1:50:7:ECB WAIT (W/ STIMER)><TMVAR2:10:12:01:002:020:><TMVAR2:08:12:10:000:000:><TMVAR2:07:02:00:000:000:%T12%><TMVAR2:20:02:00:000:000:C:\Epilog\testmeomega.txtT><ELSE><IFVAR2:1:50:1:WAITING FOR CPU><TBOX4:T:1:CenterCenter000278000200:000:%T50%><TMVAR2:10:12:01:002:020:><TMVAR2:08:12:10:000:000:><TMVAR2:07:02:00:000:000:%T12%><TMVAR2:20:02:00:000:000:C:\Epilog\testmeomega.txtT><ENDIF><ENDIF><ENDIF><BTFEND><LAUNCHDEL2:0:01C:\Epilog\testmeomega.txt>

    EPILOG1152006.txt

  5. Randall,

    the Date conversion appears to be working very well. Thanks so much for all of your help.

    Robert

     

    btw....I gave up on trying to make the other document pretty. I decided that portion did not need to look any certain way, I just needed the name, date info, and know if was active or not.

  6. I'm pulling what hair is left, out...LOL

     

    There are 3 pieces of unwanted text in my output that I cannot get rid of. I've tried padding, replacing, etc. If someone can take a peek and give some advice that would be swell. I have 8 others just like the attached but with different generation dataset names. Thanks in advance

     

     

     

     

    <CLEARVAR1:T:ALL><CLEARVAR1:N:ALL><DOFILE:08:NN:c:\hisp1.txt>><BTFBEG:001:000001:000000:c:\hisp.txt><IFVAR2:1:01:8:IDCAMS SYSTEM SERVICES><TMVAR2:21:01:01:000:000:IDCAMS SYSTEM SERVICES ><ENDIF><IFVAR2:1:01:7:HISP><IFVAR2:1:01:8:HIST><IVAR2:01:13:1:HISP.TSI.GMC.EXTRACT1.INPAT.><TMVAR2:10:02:01:016:051:><TMVAR2:20:02:00:000:000:C:\hisp1.txtF><ENDIF><ENDIF><IFVAR2:1:01:7:CREATION--------><IFVAR2:1:01:8:HIST><IVAR2:01:13:1:CREATION--------><TMVAR2:10:04:01:053:060:><TMVAR2:04:04:00:000:000:><TMVAR2:10:06:01:058:060:><TVAR2:03:01: ><IFVAR2:1:06:4:308><TMVAR2:20:03:00:000:000:C:\hisp1.txtF><TMVAR2:20:04:00:000:000:C:\hisp1.txtF><ELSE><TMVAR2:20:03:00:000:000:C:\hisp1.txtF><TMVAR2:20:04:00:000:000:C:\hisp1.txtT><ENDIF><ENDIF><ENDIF><IFVAR2:1:01:7:STATUS------------><IFVAR2:1:01:8:HIST><IVAR2:01:13:1:STATUS------------><TMVAR2:10:05:01:026:031:><TMVAR2:04:05:00:000:000:><TMVAR2:20:03:00:000:000:C:\hisp1.txtF><TMVAR2:20:05:00:000:000:C:\hisp1.txtT><ENDIF><ENDIF><BTFEND>

    hisp.txt

  7. Hauptbuch.txt looks pretty interesting.

    The words that are surrounded by ( ) ...some have another word after and some don't. It looks like if you remove all of the spell text information that explains the spell, you're left with the data that you need to manipulate. And it seems that a search for the left paren indicates a new line?

  8. This looks pretty exciting but it's hard to tell what to do with the story.

    Can you remove the story and give a better example of what the data is for each line?

    With this being present;

     

    Dancing Lights

    (Alteration)

    Range: 40 yds. + 10 yds./level Components: V, S, M

     

    and this being your requested output;

     

    "Dancing Lights";"(Alteration)";"40 yds. + 10 yds./level";"V, S, M"

     

    I'm having a hard time seeing what the next row would be..maybe I'm old..:)

    Would this be next;

    "Dancing Lights";"(Alteration)";"2 rds./levell";"1"

    "Dancing Lights";"(Alteration)";"special";"none"

  9. Has anyone had one Excel document open, added at least one worksheet to that document and inserted a comma delimited .txt file into the new worksheet.

    I have 4 .txt documents that I want to put into 1 Excel window using the worksheet tabs. Oh, and I need to rename the tabs.. :lol:

     

    thanks B)

  10. Thanks Kevin,

    I figured out the other night that I should be using the Text File Process for the outside loop. Here is what I currently have for a check of two text fields in the same line.

     

    <REM2:><REM2:Process the text file><BTFBEG:020:000001:000000:C:\inits1.txt><ADFBEG:F11:001:000001:000000:C:\initsforchange\%T20%><IFVAR2:1:01:8:?&><AND><IFVAR2:1:01:8:TSI SAVE KEY><AND><IFVAR2:1:01:7:ORD CHAR><AND><IFVAR2:1:01:7:T KEY><TVAR2:30:01:bingo><ENDIF><ADFEND><REM2:><REM2:Move the odd text file><IFVAR2:1:30:7:bingo><DOFILE:07:YN:C:\initsforchange\%T20%>c:\Troubled procs KEY and ORD CHAR\%T20%><ENDIF><REM2:><REM2:Clear the Variables ><CLEARVAR1:T:ALL><BTFEND><REM2:>

  11. What is the best practice for running one ASCII file process within another?

    I have a text file with just names and I want to use those names in a variable that is inserted into the second ASCII file process. The names text file looks like this:

    INIT_ACTASS.txt

    INIT_ACTCLIN1.txt

    INIT_ACTFIN1.txt

    INIT_ACTGHP1.txt

    INIT_ACTMDL.txt

     

    thanks

  12. Floyd,

    You're the best, thank you.

    Question, you used AND between the IF statements.

    Is it necessary? Or does it remove any non forseen problems. I just assumed (from Model 204 programming logic) that one IF followed by another is saying that the second condition will never be engaged unless the first IF statement is satisfied.

    Thanks again.

  13. Good Morning,

    I have 90+ text files that I need to be edited by finding the text KEY and replace it with ORD CHAR. I'm using ASCII file processing. I can find the work KEY and I can replace it with ORD CHAR, %T% will show this to me 3 times in my text display. I am having trouble saving my work and don't know what is missing. Below is a sample of the ME code and below that is a sample text file I am using.

     

    <ADFBEG:F11:001:000001:000000:c:\ACTASSMEtestfile.txt><TVAR2:05:01:KEY><TVAR2:08:01:ORD CHAR><IFVAR2:1:01:8:?&ACTASS ><IFVAR2:1:01:8:NKEY><IFVAR2:4:01:7:T5T><TMVAR2:21:01:00:000:000:KEY%T8%><ENDIF><TBOX4:T:1:CenterCenter000278000200:000:The new line changed%T1%><ENDIF><ENDIF><ADFEND><LAUNCHDEL2:0:01c:\ACTASSMEtestfile.txt>

     

     

    IN FILE ?&ACTASS DEFINE FIELD 'FISCAL YEAR' -

    ( NFRV NKEY NCOD STR NNR VIS UP NORD )

    IN FILE ?&ACTASS DEFINE FIELD 'INOUT CODE' -

    ( DEF NFRV KEY NCOD STR NNR VIS UP NORD )

    IN FILE ?&ACTASS DEFINE FIELD 'IP NUMBER' -

    ( DEF NFRV KEY NCOD STR NNR VIS UP NORD )

    IN FILE ?&ACTASS DEFINE FIELD 'IPD MNEMONIC' -

    ( NFRV NKEY NCOD STR NNR VIS UP NORD )

    IN FILE ?&ACTASS DEFINE FIELD 'IPD NUMBER' -

    ( DEF NFRV KEY NCOD STR NNR VIS UP NORD )

    IN FILE ?&ACTASS DEFINE FIELD 'LAST CASE CHANGE DATE' -

    ( NFRV NKEY NCOD STR NNR VIS UP NORD )

     

     

    Any help would be appreciated..thanks

    "We will intuitivly know how to handle things which use to baffle us.." ...LOL this one is driving me nuts..

  14. Randal,

    Your code created the file but it was all on one row extending all the way out to column IV with an error message that the file did not load completly... ;) .

     

    What I am looking to do is to take a .txt file like this and create a .csv using ME

     

    1076261599 20050906 GW101253 -137.46

    1076261599 20050908 GW101147 7.00

    1076261599 20050908 GW101147 -7.00

    1076261599 20050908 GW101147 73.00

    1076261599 20050908 GW101147 -73.00

    1089063001 330 20050808 GW999995 -2700.00

    1089063001 M21 20050808 GW999995 -5400.00

    1089063001 20050901 GW104984 -167.00

    1093868602 M22 20050822 GW555557 115.10

    1093868602 C76 20050822 GW555557 -115.10

    1093868602 C76 20050824 GW555557 115.10

    1093868602 M22 20050824 GW555557 -115.10

    1093868602 M22 20050826 GW101675 4966.63

    1093868602 M22 20050826 GW101675 -4966.63

    1093868602 M22 20050826 GW999987 115.10

    1093868602 D25 20050826 GW999987 -115.10

    1093868602 D25 20050831 GW101147 115.10

×
×
  • Create New...