Résultats de recherche
6 nov. 2009 · Re: MOVEA *ALL in RPG/free I had looked at %subarr before but up until a few minutes ago I was having brain cramp getting it to work. Below are 2 examples that work. The second being that the arary is initialized and eliminated the need for the %subarr function at all.
12 nov. 2007 · In free formatted RPG, what is the equivalent statement to this: /End-Free. C MOVEA D14A OFF. /Free. D14A represents an array that is 102 characters long. I am moving the array to a field that is also 102 long that is a precursor to writing the information to a file. When I try this statement. Off = D14A; RECONP5VX = Off;
25 avr. 2023 · Can you try and spell out in simple English what you are trying to do. Forget the MOVEA stuff etc. Right now you are passing in character fields and moving them a bit at a time to another character field. The most likely cause of errors is that the strings are not as long as you say. Just explain simply the task and we'll then know how to code it.
14 nov. 2007 · C MOVEL#WH,#N #STR C MOVEA#STR #ER,18 C MOVEA#ER #MSGDT C EXSR MSGSND C* Original message returned by API C MOVEA'CPF' #ID,1 C Z-ADDSQLER1 #XER1 C MOVEL#XID ##TMPS 4 C MOVEA##TMPS #ID,4 C MOVEA#ID #QSGID C CALL 'QMHSNDPM' C PARM #QSGID C PARM #QSGF C PARM SQLERM #QSGDT C PARM SQLERL #QSGDL C PARM #QSGTP C PARM #QSQUE C PARM #QSSTO C PARM #QSMKY ...
7 févr. 2017 · Most RPG/36 code will compile as RPG/400. We always just changed from RPG36 to RPG and compiled it. Most often it worked, although sometimes not (IIRC there were some F-spec settings that were valid for RPG/36 but not RPG/400). Another difference is that MOVEA works with numeric arrays in RPG II, but not in RPG IIII.
19 juin 2008 · Hi All, I have an requirement to generate the dynamic reports. I have to show the report of how many parts are sold on particular day. If i run the report on 19-Jun, then i need to show from Jun 1- t
22 oct. 2004 · MOVEA is the legacy** opcode for copying one array into another array. posDS is not an array, therefore cannot be used with a DS. (**legacy in that it still works, but has no free format equivalent and IBM recommend you use the %SUBARR() function or a loop instead).
22 juin 2010 · clp/clle code forum. e @w 80 1 e @p 1 3 80 * c *entry plist c parm prtmod 10 c parm fmtnme 10 c parm desc 30 c parm fmtlen 42 c parm fmtwid 42 c parm lenopt 3 c parm widopt 3 c parm qrystm 1 c parm qrysl 80 * c selec c qrystm wheq '1' c movea@p,1 @w c moveaprtmod @w,11 c movea@w qrysl c qrystm wheq '2' c movea@p,2 @w c moveafmtnme @w,10 c movea@w qrysl c qrystm wheq '3' c movea@p,3 @w c ...
15 nov. 2006 · 1. first do the dspdbr and get all the logical files related to physical file. 2. then for each logical file retrive data from QADBIFLD file specifying library and file name... here u will get all the fields used by the logical file... then to know the key field do the dspfd with (*accpth) on the logical file. Thanks.
28 févr. 2005 · Since SEU is giving the error, I think your first problem is the source "type". Type RPG does not support SQL. Try type SQLRPG. Note: I would strongly suggest that any SQL-in-RPG be done in RPGLE (thats RPG-IV). There are many enhancements to SQL in RPG-IV. jamief. Code400 Newbie. Join Date: Jan 2004. Posts: 9510.
