Sponsored Content
Full Discussion: COBOL issue
Operating Systems Solaris COBOL issue Post 92527 by Jayaprakash T on Monday 12th of December 2005 10:12:48 AM
Old 12-12-2005
COBOL issue

Hi,

I am working on a Mainframe to UNIX replatforming project.
we are facing problems with COBOL COMP-3 fields. We are using the Mainframe emulator software to download the data which has COMP-3 fields and using it as input to the same COBOL programs which were copied from Mainframe and did the required changes to make it compatible to UNIX environment. when we tried to read the data, the COMP-3 fields are taking extra bytes data from other fields.

For example,

FIELD1 of COMP-3 type takes 4 bytes in Mainframe
FIELD2 of COMP-3 type takes 5 bytes in Mainframe

But when used in UNIX,

FIELD1 data has shown as 2 bytes in pysical file and since it occupies 4 bytes rest of the 2 bytes it is conceiving from the rest of the record. so obviously next field FIELD2 will have lost first two bytes of its data and hence it takes 5 bytes from the rest of the record.

Please suggest how to overcome this problem.

Thanks,
JP
 

10 More Discussions You Might Find Interesting

1. Solaris

Cobol linking in Unix

I'm trying to call a C mod from COBOL but I'm currently having difficulty linking my COBOL program with a C module that I've just developed. I've tried using cbllink -v -l -k -BSF CMPCACVN.cbl test.lib but I've got an error that states cbllink: not found. I've also tried using buildclient -C -w -o... (0 Replies)
Discussion started by: soulfactory2002
0 Replies

2. UNIX for Dummies Questions & Answers

Cobol On Unix

Hi , Could anyone please tell me about the whole procedure for compiling, linking the cobol program on unix platform. As i am mainframe guy and very new to unix, any help will be very appriciated, Regards, -Vinit (2 Replies)
Discussion started by: vinit_cyberguy
2 Replies

3. Gentoo

COBOL on linux?!

Hello guys, I'm searching for a good COBOL compiler which runs on linux. In fact I have found one but I'm really lost with its installation!! I don't know how to install it and how it works. In fact I'm not so good in linux and I always have problems with installation, but this time it's... (1 Reply)
Discussion started by: HSN
1 Replies

4. UNIX and Linux Applications

Rm-cobol 85

Does anyone use the following Cobol compiler: RM/COBOL-85 Compiler - Version 5.15.00 for SCO Unix 386. I am looking for a file that might be part of the distribution named "osmain.o" Thanks. (0 Replies)
Discussion started by: jgt
0 Replies

5. Programming

cobol programme

I have some compile programme .crn now I want to run .crn programme on express cobol which allow only *.gnt programme any solution to run *.crn programme (0 Replies)
Discussion started by: bibi
0 Replies

6. Programming

cobol crn programme run on express cobol as .gnt

can i run .crn programme in express cobol which support to .gnt programme .... Plz tell me solution (2 Replies)
Discussion started by: bibi
2 Replies

7. Shell Programming and Scripting

Calling script from RM cobol and returning value to cobol

Is there a way you can return a value from a script that is called from a rm cobol program... 01 WS-COMD-LINE-PGM X(39) value sh ./getUserId.sh 12345" 01 WS-RETURN-SYS-CODE PIC 9(8). CALL "SYSTEM" USING WS-COMD-LINE-PGM GIVING WS-RETURN-SYS-CODE. ... (1 Reply)
Discussion started by: pavanmp
1 Replies

8. SCO

cobol installation

Dear All, while installing mfcobol in sco open unix 5 in piv m/cs, when run #sh ./install this error massage is comming load error file lmfnewdb error code 198 pc=0 call=-1 seg=0 198 load failor chmod warrning can not acess /opt/lib/mflmf/mflmfdb no such file or directory (error-2)... (0 Replies)
Discussion started by: sudhir69
0 Replies

9. Linux

Cobol on Linux

Hello, I have got a specific requirement of running a COBOL code on EL5. Not sure if GCC includes the compiler for COBOL. Currently what I can think of installing openCOBOL in EL5 server and hand it over to developers. From what I think need to do is, compile COBOL code using openCOBOL ... (5 Replies)
Discussion started by: niravkamdar
5 Replies

10. Programming

cobol compiler for suse

hi could you please suggest me any cobol compiler for suse linux. any help would me much appreciated .. -- thanks rakesh kumar (7 Replies)
Discussion started by: rakeshkumar
7 Replies
Jifty::Test::WWW::Mechanize(3pm)			User Contributed Perl Documentation			  Jifty::Test::WWW::Mechanize(3pm)

NAME
Jifty::Test::WWW::Mechanize - Subclass of Test::WWW::Mechanize with extra Jifty features METHODS
new Overrides Test::WWW::Mechanize's "new" to automatically give the bot a cookie jar. request We override WWW::Mechanize's default request method so accept-encoding is not set to gzip by default. moniker_for ACTION, FIELD1 => VALUE1, FIELD2 => VALUE2 Finds the moniker of the first action of type ACTION whose "constructor" field FIELD1 is VALUE1, and so on. my $mon = $mech->moniker_for('MyApp::Action::UpdateInfo'); If there is only one action of type ACTION, be sure not to pass any more arguments to this method, or the method will return undef. NOTE that if you're using this in a series of different pages or forms, you'll need to run it again for each new form: $mech->fill_in_action_ok($mech->moniker_for('MyApp::Action::UpdateInfo'), owner_id => 'someone'); $mech->submit_html_ok(); is($mech->action_field_value($mech->moniker_for("MyApp::Action::UpdateInfo"), 'owner_id'), 'someone', "Owner was reassigned properly to owner 'someone'"); fill_in_action MONIKER, FIELD1 => VALUE1, FIELD2 => VALUE2, ... Finds the fields on the current page with the names FIELD1, FIELD2, etc in the MONIKER action, and fills them in. Returns the HTML::Form object of the form that the action is in, or undef if it can't find all the fields. fill_in_action_ok MONIKER, FIELD1 => VALUE1, FIELD2 => VALUE2, ... Finds the fields on the current page with the names FIELD1, FIELD2, etc in the MONIKER action, and fills them in. Returns the HTML::Form object of the form that the action is in, or undef if it can't find all the fields. Also, passes if it finds all of the fields and fails if any of the fields are missing. action_form MONIKER [ARGUMENTNAMES] Returns the form (as an HTML::Form object) corresponding to the given moniker (which also contains inputs for the given argumentnames), and also selects it as the current form. Returns undef if it can't be found. action_field_input MONIKER, FIELD Finds the field on the current page with the names FIELD in the action MONIKER, and returns its HTML::Form::Input, or undef if it can't be found. action_field_value MONIKER, FIELD Finds the field on the current page with the names FIELD in the action MONIKER, and returns its value, or undef if it can't be found. send_action CLASS ARGUMENT => VALUE, [ ... ] Sends a request to the server via the webservices API, and returns the Jifty::Result of the action. "CLASS" specifies the class of the action, and all parameters thereafter supply argument keys and values. The URI of the page is unchanged after this; this is accomplished by using the "back button" after making the webservice request. fragment_request PATH ARGUMENT => VALUE, [ ... ] Makes a request for the fragment at PATH, using the webservices API, and returns the string of the result. field_error_text MONIKER, FIELD Finds the error span on the current page for the name FIELD in the action MONIKER, and returns the text (tags stripped) from it. (If the field can't be found, return undef). uri WWW::Mechanize has a bug where it returns the wrong value for "uri" after redirect. This fixes that. See http://rt.cpan.org/NoAuth/Bug.html?id=9059 get_html_ok URL Calls "get" URL, followed by testing the HTML using Test::HTML::Lint. html_ok [STRING] Tests the current "content" using Test::HTML::Lint. If passed a string, tests against that instead of the current content. submit_html_ok Calls "submit", followed by testing the HTML using Test::HTML::Lint. follow_link_ok Calls "follow_link", followed by testing the HTML using Test::HTML::Lint. Warns if it cannot find the specified link (you should use "ok" on "find_link" first to check its existence). warnings_like WARNING, [REASON] Tests that the warnings generated by the server (since the last such check) match the given "WARNING", which should be a regular expression. If an array reference of regular expressions is passed as "WARNING", checks that one warning per element was received. no_warnings_ok [REASON] Checks that no warnings were generated by the server (since the last such check). session Returns the server-side Jifty::Web::Session object associated with this Mechanize object. continuation [ID] Returns the current continuation of the Mechanize object, if any. Or, given an ID, returns the continuation with that ID. current_user Returns the Jifty::CurrentUser object or descendant, if any. perl v5.14.2 2011-04-14 Jifty::Test::WWW::Mechanize(3pm)
All times are GMT -4. The time now is 08:59 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy