basically, the screen is 24*80, all we know that,
after if we like this,
Code:
DFHMDF POS=(006,073), C
LENGTH=006, C
ATTRB=(ASKIP,BRT), C
OUTLINE=UNDER, C
COLOR=TURQUOISE, C
PS=8, C
GINIT=' ãYçfá '
DFHMDF POS=(006,081), C
LENGTH=001, C
ATTRB=(ASKIP,FSET)
DFHMDF POS=(006,081), C
LENGTH=001, C
ATTRB=(PROT,BRT,FSET)
will it create error or not, if not create any error why so.
but if i compile am not getting any error. why so am not getting.
basically, the screen is 24*80, all we know that,
after if we like this,
...
...
...
will it create error or not, if not create any error why so.
but if i compile am not getting any error. why so am not getting.
please resolve this
we all understand that for many ( almost all ) of us english is not the first language,
but everybody should make the effort to ask in a comprehensible way
it is sad to notice that You did not try a bit!
please reword in a less confusing way Your question!
do not double post the same issue on different forums!
even if the IDs are different the wording is exactly the same
( ibmmainframeforum.com/viewtopic.php?f=17&t=4985 )
people answering are mostly the same!
take a decision on which forum You want to keep the discussion
AIF (&POS(1) LT 1 OR &POS(1) GT 240).MDFE04
AIF (&POS(2) LT 1 OR &POS(2) GT 240).MDFE04
&FPOS SETA (((&POS(1)-1)*(&COLS))+(&POS(2)-1)) CALCULATE POSITION
The macro checks that row and column are between 1 and 240,
then it calculates the offset from top of screen using the classic formula: (((Row-1)*Width)+(Col-1))
So, in your case (6,81) is equivalent to (7,1)
Why does it work like this ? you will have to ask IBM.
BTW, in the example you gave you should have a return code of 4 and a MNOTE because you have overlapping fields.
__________________________________
there was a time I was able to write assembler macros... and read dumps... Ahh, that was the good old time...
