Problème Lisp Som

[CalGory]

Bonjour,

 

J'ai récupérer sur le forum autodesk un lisp de Patrick_35 "som". Qui génère un sommaire ou liste de folio suivant certain attribut remplis.

J'essaye de l'adapter sur mon bloc cartouche mais j'ai cette erreur.

Pourriez-vous m'aider ?

 

voici l'erreur produite:

 

Analyse rétrospective:

[0.48] (VL-BT)

[1.44] (*ERROR* "liste d'associations incorrecte: (nil)")

[2.39] (_call-err-hook #<SUBR @000000002e9c5e58 *ERROR*> "liste d'associations

incorrecte: (nil)")

[3.33] (sys-error "liste d'associations incorrecte: (nil)")

:ERROR-BREAK.28 nil

[4.25] (ASSOC 3 ((2 . "PLAN EN ELEVATION - EXISTANT") (2 . "PLAN EN ELEVATION -

EXISTANT") (2 . "PLAN EN ELEVATION - EXISTANT") (2 . "PLAN EN ELEVATION -

EXISTANT") (2 . "PLAN EN ELEVATION - EXISTANT") (2 . "PLAN EN ELEVATION -

EXISTANT") (2 . "PLAN EN ELEVATION - EXISTANT") (2 . "PLAN EN ELEVATION -

EXISTANT") (2 . "PLAN EN ELEVATION - EXISTANT") (2 . "PLAN EN ELEVATION -

EXISTANT") (2 . "PLAN EN ELEVATION - EXISTANT") (2 . "PLAN EN ELEVATION -

EXISTANT") (2 . "PLAN EN ELEVATION - EXISTANT") (2 . "PLAN EN ELEVATION -

EXISTANT") (0 . "06") (1 . "A3") nil))

[5.19] (C:SOM)

[6.15] (#<SUBR @0000000033ab95c0 -rts_top->)

[7.12] (#<SUBR @000000002e928700 veval-str-body> "(C:SOM)" T #<FILE internal>)

:CALLBACK-ENTRY.6 (:CALLBACK-ENTRY)

:ARQ-SUBR-CALLBACK.3 (nil 0)

 

Pour info les numéros de folio ce font via un champ qui récupère le numéro de la présentation que je génère grâce à l'excellent lisp "ron" (encore un très bon Lisp de Patrick_35) qui me renomme toutes les présentations.

 

Merci d'avance pour votre aide et un grand merci à tout les lispeurs confirmés qui nous aide à nous humbles néophites ;) .

[CalGory]

Réussi à passer à une étape suivante ou a rajouter un problème ^^

Maitenant j'ai ceci:

 

Analyse rétrospective:

[0.53] (VL-BT)

[1.49] (*ERROR* "type d'argument incorrect: stringp nil")

[2.44] (_call-err-hook #<SUBR @0000000037c9a110 *ERROR*> "type d'argument

incorrect: stringp nil")

[3.38] (sys-error "type d'argument incorrect: stringp nil")

:ERROR-BREAK.33 "type d'argument incorrect: stringp nil"

[4.30] (STRCAT "PLAN EN ELEVATION - EXISTANT" " - " nil)

:XTSF-MARK.23 (FOREACH nil #<SUBR @0000000033d3f200 nil> (Rest-List TXT))

[5.20] (C:SOM) LAP+2104

[6.15] (#<SUBR @0000000037c9a3e0 -rts_top->)

[7.12] (#<SUBR @000000002ecb8700 veval-str-body> "(C:SOM)" T #<FILE internal>)

:CALLBACK-ENTRY.6 (:CALLBACK-ENTRY)

:ARQ-SUBR-CALLBACK.3 (nil 0)

[Patrick_35]

Salut

 

Le plus simple est de donner un exemple ainsi que le lisp

 

@+

[CalGory]

Bonjour Patrick,

 

Voilà la bête, le client viens de gentillement nous imposer une liste des folios du coup je vais devoir modifié pas mal de chose et je sais pas par ou commencer.

 

Est ce que ce ne serais pas plus rapide de reprendre une programmation de 0 à ton avis ?

 

Merci

 

Greg

[Patrick_35]

Salut

 

C'est à toi de voir. Il est toujours intéressant de regarder un lisp.

Le plus simple est de tester ligne par ligne, de regarder les résultats et d'essayer de comprendre comment il fonctionne.

Si tu fais ton propre lisp et si ton client un jour change quelque chose, tu sauras adapter ton lisp sans problème.

 

Je te laisse méditer un peu là-dessus avant de regarder ce que tu as fait.

 

@+

[CalGory]

Ok, merci du conseil ^^