hexagon logo

Cncini

Hallo Leute,

ich habe meine CNCINI soweit bearbeitet, dass ich mit meiner Vorlage sozusagen ein Neues Programm schreiben kann.
Ich wollte nur einmal wissen, ob ich die WKP Daten zusätzlich in mein Programmkopf bekommen kann. Ich füge noch Bilder hinzu, damit ihr versteht, worum es genau geht.
(Daten vom Bild WKP automatisch in Bild CNCINI einfügen)


Mit freundlichem Gruß

Hien

Attached Files
Parents
  • Thank you for your help. I did it like this.

    ~KOPF1=''
    ~STR1='! Materialnummer....:'
    ~STR2=' '
    ~STR3='~Mat'
    CONCAT (NAM=~KOPF1, STR=(~STR1, ~STR2, ~STR3), RLS=N, INI=Y)

    ~KOPF2=''
    ~STR4='! Zeichnungsnummer..:'
    ~STR5=' '
    ~STR6='~ZNG'
    ~STR7='_'
    ~STR8='~Ind'
    CONCAT (NAM=~KOPF2, STR=(~STR4, ~STR5, ~STR6, ~STR7, ~STR8), RLS=N, INI=Y)


    ~KOPF3=''
    ~STR10='! Bezeichnung.......:'
    ~STR11=' '
    ~STR12='~Bez'
    ~STR13='_'
    ~STR14='~ROTEXGR'
    CONCAT (NAM=~KOPF3, STR=(~STR10, ~STR11, ~STR12, ~STR13, ~STR14), INI=Y)

    ~KOPF4=''
    ~STR15='! Bemerkung.........:'
    ~STR16=' '
    ~STR17='~Bem'
    CONCAT (NAM=~KOPF4, STR=(~STR15, ~STR16, ~STR17), RLS=N, INI=Y)

    CVCHSTXT (CHS=~KOPF1, LIN=1, TXT=KOPF)
    CVCHSTXT (CHS=~KOPF2, LIN=2, TXT=KOPF)
    CVCHSTXT (CHS=~KOPF3, LIN=3, TXT=KOPF)
    CVCHSTXT (CHS=~KOPF4, LIN=4, TXT=KOPF)

    TextToFile (NAM=LDBTXT:KOPF, FIL=C:\Quindos7Lib\Projekt- Programme\KOPF\KOPF.txt)
    PURGE (FIL=C:\Quindos7Lib\Projekt- Programme\KOPF\, KEP=0, SDI=Y)
    INSPRC (TXT=LDBTXT:KOPF, EOB=N, FRA=99)


    I put it into a procedure. Is there any way to hide the procedure?
Reply
  • Thank you for your help. I did it like this.

    ~KOPF1=''
    ~STR1='! Materialnummer....:'
    ~STR2=' '
    ~STR3='~Mat'
    CONCAT (NAM=~KOPF1, STR=(~STR1, ~STR2, ~STR3), RLS=N, INI=Y)

    ~KOPF2=''
    ~STR4='! Zeichnungsnummer..:'
    ~STR5=' '
    ~STR6='~ZNG'
    ~STR7='_'
    ~STR8='~Ind'
    CONCAT (NAM=~KOPF2, STR=(~STR4, ~STR5, ~STR6, ~STR7, ~STR8), RLS=N, INI=Y)


    ~KOPF3=''
    ~STR10='! Bezeichnung.......:'
    ~STR11=' '
    ~STR12='~Bez'
    ~STR13='_'
    ~STR14='~ROTEXGR'
    CONCAT (NAM=~KOPF3, STR=(~STR10, ~STR11, ~STR12, ~STR13, ~STR14), INI=Y)

    ~KOPF4=''
    ~STR15='! Bemerkung.........:'
    ~STR16=' '
    ~STR17='~Bem'
    CONCAT (NAM=~KOPF4, STR=(~STR15, ~STR16, ~STR17), RLS=N, INI=Y)

    CVCHSTXT (CHS=~KOPF1, LIN=1, TXT=KOPF)
    CVCHSTXT (CHS=~KOPF2, LIN=2, TXT=KOPF)
    CVCHSTXT (CHS=~KOPF3, LIN=3, TXT=KOPF)
    CVCHSTXT (CHS=~KOPF4, LIN=4, TXT=KOPF)

    TextToFile (NAM=LDBTXT:KOPF, FIL=C:\Quindos7Lib\Projekt- Programme\KOPF\KOPF.txt)
    PURGE (FIL=C:\Quindos7Lib\Projekt- Programme\KOPF\, KEP=0, SDI=Y)
    INSPRC (TXT=LDBTXT:KOPF, EOB=N, FRA=99)


    I put it into a procedure. Is there any way to hide the procedure?
Children
No Data