1130 Commercial Subroutine Package - All about the IBM 1130 ...

ADDA1A3A1DECA3A1CARRYDECA1DIVDPACKDUNPKEDITFILLGETICOMPIONDKEYBDMOVE -4-MPYNCOMPNSIGNNZONEPACKPRINTPUNCHPUTP1403P1442READR2501SKIPSTACKSUBS1403TYPERUNPACWHOLEMOVEFormat: CALL MOVE(JCARD,J,JLAST,KCARD,K)Function: Moves data from one array to another array.Parameter description:JCARD - The name of a one-dimensional integer array defined in a DIMENSIONstatement. This is the array from which data is moved. The data maybe stored in JCARD in any format, one character per word.J - An integer constant, an integer expression, or an integer variable. Thisis the position of the first character of JCARD to be moved (the left-handend of a field).JLAST - An integer constant, an integer expression, or an integer variable,greater than or equal to J. This is the position of the last character ofJCARD to be moved (the right-hand end of a field).KCARD - The name of a one-dimensional integer array defined in a DIMENSIONstatement. This is the array to which data is moved, one character perword.K - An integer constant, an integer expression, or an integer variable. Thisis the position of the first character of KCARD to which data will bemoved (the left-hand end of a field).Detailed description: Characters are moved, left to right, from the sending field,• JCARD, starting with JCARD(J) and ending with JCARD(JLAST), to the receiving fieldKCARD, starting with KCARD(K). More detailed information may be found in the MOVEflowchart and listing.