Search results for query: *

You can also get around this by making the call to the second program dynamic. You have this code as a static call. to make dymanic in your working storage create: 05 ws-program pic x(08) value 'BPB0003' and change you call to: CALL WS-PROGRAM USING X003-PARAMETROS. The good thing about...

I can think of couple possiblities: 1) if using and advance ship notice (856), this can inform them of what was order and what is actually shipping showing the shortage. 2) you can send an PO Change (860, i think) adjusting the quanity. 3) been awhile since i worked with the 855, but is there...

YOu will need to make sure that the 'ID' field is defined in the same format in all 4 dataset. I did not get that message if they were all the same, as soon as I changed one from numeric to char then I get the convert error message.

I pesonally would code it like below. Removes the need for the pre-read and places all the necessary code into one nice tight performing routine. Provides for a single READ and a single EXIT. If additional code is needed then it is easy to add and perform the neccessay paragraphs depending if a...

Thanks, that is just what I was looking for.

Is there a way in a MVS Cobol program to tell which CICS Region I am running in. I have to do different things depending on if running in test or production.

If this is defines as just an "N 1/35 " max Total Length is 35 digits and the decimal point must be sent in the data to show where in the data it is to reside. If define as "N4 1/35" then Max length is 35 digits with and last 4 digits residing after the decimal point (trailing zeros will be...

Thanks for all the suggestions. I had to use the "winsockfix" to get this back up and working. Seems that the intial scan with SPYWARE Doctor flages some of the registery enties as bad and deleted them. The 'winsockfix' utility rest those entries and i was able to get connected. Seems quite a...

I have uninstalled SPYWARE DOCTOR. My Connection is via a router, but other computers attached to this have no issues not even the wireless. So my connection to the internet is no an issue. Sorry meant the network drivers....

I recently did a upgrade on SPYWARE DOCTOR and after it finished installing and the inital scan was done, I could no longer get connected to the internet. I have attempted both a IPCONFIG /Renew and a repair on the devices. both come back with unable to refresh the ip address. I have check...

Guess I am confused why you care about any of the other exception code other then '18' '1018' and '7018'? When the query is run only the records that have these exception codes are going to be in the result set. The query is probably getting confused by bing told to only items with these three...

I believe that you have a conflict on your where clause: where i.date='11/1/2006' and (substr(i.num,1,3)='123') and (e.code in ('18','1018','7018')) AND ( E.CODE NOT BETWEEN '1' AND '17' AND E.CODE NOT BETWEEN '19' AND '75') AND ( E.CODE NOT BETWEEN '1001' AND '1017' AND...

I like it, where can i get that background.

The only thing that I see that is missing in this script is to add some error checking around the FTP to report if i can not find the file after the listing is made. Should be a simple addition and no problem, was good to get back into doing some Perl Scripting agian.

I have modified the script to save the current filename, convert the space to Underscores, then compare them to see which type of ftp needs to be done. check this out and see if it does what is needed. foreach $file (@all_files) { $file1 = $file; # save...

Not sure if you have gotten this to work yet. Here is something that you can try. I was not able to get it to work with the code in blue, but was able to set a variable and used that to determine the next steps. let me know if this works for you. #!/usr/bin/perl use Net::FTP; my $now =...

I have also found this to be an issue. http://www.mythicsoft.com/agentransack/ Agent Ransack is a free tool for finding files and information on your hard drive fast and efficiently. When searching the contents of files Agent Ransack displays the text found so you can quickly browse the...

you can also use the CNTL/ALT and other arrow keys to rotate the screen, comes in handy when receiveing some docuemnts that have been sent upside down or sidewise. can get the orintation correct for viewing

have to think back as to what an If is evaluated into, either 0 (false) or 1 (true). SAS treats any thing other then zero as a true conditions: ie.. if 2 then somthing (Will always be true) What is happening in the "else if level = 2 or 3 then" is first the Level = 2 is checked (false, since...

If all he is wanting to do is concat some field then "STRING" is the way to go. STRING ADDRESS1 delimited by spaces ', ' delimited by size address2 delimited by spaces space delimited by size City delimited by spaces ', '...