Új hozzászólás Aktív témák

  • oli83

    tag

    Sziasztok!

    Szeretnék Any-s módszerrel stringeket másolgatni.
    Korábban ezzel a módszerrel már mindenfélét másoltam, és teljesen korrektül működött. Most azonban szeretném String másolásához is kipróbálni ezt. Azonban valami gatya, van nem igazán történik meg, amit szeretnék ezért becsatolom a progi részletet.
    50karakterből álló Stringet szeretnék, szintén ugyanilyen hosszú Stringbe másolni.

    LAR1 P##Start
    L B#16#10
    T LB [AR1,P#0.0]
    L B#16#13
    T LB [AR1,P#1.0]
    L 52 // <=========== kérdéses hossz
    T LW [AR1,P#2.0]
    L DINO
    T LW [AR1,P#4.0]
    L #PG_Nr
    L 52
    *I
    SLD 3
    L P##PG
    +D
    L DW#16#85000000
    OD
    T LD [AR1,P#6.0]

    LAR1 P##Ziel
    L B#16#10
    T LB [AR1,P#0.0]
    L B#16#13
    T LB [AR1,P#1.0]
    L 52 // <=========== kérdéses hossz
    T LW [AR1,P#2.0]
    L DINO
    T LW [AR1,P#4.0]
    L P##Aktuelle
    L DW#16#85000000
    OD
    T LD [AR1,P#6.0]

    CALL "BLKMOV"
    SRCBLK :=#Start
    RET_VAL:=#Ret
    DSTBLK :=#Ziel

    Továbbá szeretném megkérdezni még, hogy nincs e véletlenül valami jó kis módszeretek arra, hogyan lehetne egybe Stringet monitorozni? Ha DB-t/iDB-t nyitok, akkor nem akarja, és VAT-táblába karakterenként nézve elég sok mindent kellene monitorozni...

    oli83

Új hozzászólás Aktív témák