Announcement

Collapse
No announcement yet.

extract part of a string

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

  • #16


    Right, sorry, with all those variables I assumed you were using Picaso, should have looked at the forum you posted in.

    Regardless, you code still works fine for me, if you don't want to post it on the forum email it to me, mark at 4dsystems dot com dot au.

    Here's the code I ran


    #platform "GOLDELOX"
    // #STACK 400
    #inherit "4DGL_16bitColours.fnc"

    func main()
    // Déclaration Variables reception
    var chr, e;
    e := 0;
    var controleID[3];
    var idrecu[3];
    // Création des chaines a controler
    var newID[2];
    var oldID[2];
    to(newID) ;
    print("IDN") ;
    to(oldID) ;
    print("IDO") ;
    // Déclaration des variables pour controler l'ID dans la carte SD
    var char;
    var idmemoire[2];
    var extraitIDmemoire[2];
    //************************************************** ********************************
    // Variable Gestion chaine caractere
    // var LG_chaine_recu;
    var chaine_recu[26] ;
    var chaine_extraitID[2] ;
    var chaine_extraitDesign[8] ;
    var chaine_extraitHT[3];
    var chaine_extraitTTC[3];
    var chaine_extraitTVA[3];
    var chaine_extraitStock[3];
    var chaine_extraitEtiq[2];
    var chaine_extraitPKG[3];

    var pos_separID,pos_separDES,pos_separHT,pos_separTTC,pos_separTVA,pos_separStock;
    var pos_separEtiq,pos_separPKG;

    // Variable etiquette
    var etiq[2],promo[2] ,image[2],solde[2],video[2];
    var res_etiq ,res_promo ;//,res_image,res_solde;//,res_video;

    to(etiq);
    print("E1");
    to(promo);
    print("P1");
    to(image);
    print("I1");
    to(solde);
    print("S1");
    to(video);
    print("V1");


    //************************************************** ***************************

    print("Hello World") ; // replace with your code

    repeat // maybe replace
    forever // this as well

    endfunc
    Mark

    Comment

    Working...
    X