Ask Question, Ask an Expert

+61-413 786 465

info@mywordsolution.com

Ask COBOL Expert


Home >> COBOL

RULES OF MOVE VERB:

 The Data movement is managed by the rules which are as shown below:

(a) The contents of the identifier - 1 or the value of the literal - 1 is moved to the identifier - 2, identifier - 3, etc. Note that there may be more than one receiving field whereas there should be only one sending field, the contents of all the receiving fields will be substituted by the value of the sending field. The contents of identifier - 1 stay unchanged.

(b) Whenever the sending field is numeric and the receiving field is numeric or numeric edited (that is picture holds edit symbols) the data movement is termed as numeric data transfer.  In such situation the dominant factor in the movement is the alignment of the decimal points of the two fields.  For the aim of this alignment, the numeric fields for which the place of the decimal point is not explicitly indicated, the decimal point is supposed to be at the right of the rightmost digit.  If the receiving field is not large sufficient to hold the data received, the truncation can take place at either and depending on whether the fractional part, integral part or both can or cannot be accommodated. Though, if significant the integral positions are likely to be lost, a warning to which effect is issued by the compiler. On the other hand, when the receiving field is bigger than the sending field, zero- fill will acquire place in the unused positions to keep the numeric value unchanged.

(c) Whenever both the sending and receiving fields are alphanumeric, alphabetic or alphanumeric edited, the data movement is termed as the alphanumeric data transfer.  In such situation the receiving area is filled from left to right and space fill occurs to the right if the receiving area is bigger than the sending field. Whenever the receiving area is smaller, the truncation occurs from the right and the compiler gives a warning to that effect.

Preferably, both the sending and receiving fields must belong to similar category. Though, quite often it becomes essential to transfer a data to a field having various categories.  Identifier - 1, identifier - 2, identifier - 3, etc., can be group items.  In such situations, the move is very often used.  This is when we wish to initialize a record area by spaces. For illustration, the statements MOVE SPACES TO REC-AREA will space- fill the whole area represented by the group name REC-AREA.

COBOL, Programming

  • Category:- COBOL
  • Reference No.:- M9511835

Have any Question?


Related Questions in COBOL

Write a program that will provide a list of their employees

Write a program that will provide a list of their employees with the following information: Field Size Type Additional Information Employee Number 5 Alphanumeric Employee Name 20 Alphanumeric Position Title (PT) 10 Alpha ...

  • 4,153,160 Questions Asked
  • 13,132 Experts
  • 2,558,936 Questions Answered

Ask Experts for help!!

Looking for Assignment Help?

Start excelling in your Courses, Get help with Assignment

Write us your full requirement for evaluation and you will receive response within 20 minutes turnaround time.

Ask Now Help with Problems, Get a Best Answer

Why might a bank avoid the use of interest rate swaps even

Why might a bank avoid the use of interest rate swaps, even when the institution is exposed to significant interest rate

Describe the difference between zero coupon bonds and

Describe the difference between zero coupon bonds and coupon bonds. Under what conditions will a coupon bond sell at a p

Compute the present value of an annuity of 880 per year

Compute the present value of an annuity of $ 880 per year for 16 years, given a discount rate of 6 percent per annum. As

Compute the present value of an 1150 payment made in ten

Compute the present value of an $1,150 payment made in ten years when the discount rate is 12 percent. (Do not round int

Compute the present value of an annuity of 699 per year

Compute the present value of an annuity of $ 699 per year for 19 years, given a discount rate of 6 percent per annum. As