Duplicar formulario PERO SOLO algunos campos

Hola:
Tengo un formulario que se llama "Licencia" en el que para facilitar el trabajo al usuario, quiero poner un botón llamado "Duplicar" que le permita cerrar y salvar la Licencia y que se abriera otra LicenciaB en la que sólo ciertos campos (nombre/dirección...) coincidan con la Licencia, pero que también exista la posibilidad de crear una nueva Licencia con todos los campos en blanco.
Hasta ahora he intentado con fórmulas:
******************************
@Command([FileSave]);
@Command([FileCloseWindow]);
@PostedCommand([Compose];"License");
Choice1:=@PickList ([Custom]; "" ;"LicRepetir"; "Select a product" ;"Please select the products";2);
@SetField("Kyw_CustName";@DbLookup("":"No Cache";" ";"LicRepetir" ;Choice1;3));
****************************************
Pero no funciona porque realiza los cambios en la "LicenciaA" que además se queda abierta y no hace nada en la LicenciaB.
También lo he intentado con LotusScript(del cual soy totalmente desconocedora):
++++++++++++++++++++++++++++++++++++++++++
Sub Click(Source As Button)
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim doc2 As NotesDocument
Dim itemA As NotesItem
Dim view As NotesView
Set db = session.CurrentDatabase
Set view = db.GetView("LicRepetir")
Set doc2= New NotesDocument(db)
doc2.Form= "License"
Set doc =view.GetFirstDocument
Set itemA = doc.GetFirstItem("Kyw_CustName")
Call itemA.CopyItemToDocument(doc2, "")
Call doc2.save(True, False)
Call doc.save(True,False)
End Sub
************************************************
Pero tampoco me funciona porque no cierra la Licencia y no abre la LicenciaB, por lo cual no encuentro si está creada o no.
¿Cómo lo puedo hacer?
Mil gracias por la ayuda!
{"Lat":40.4464245155347,"Lng":-3.69153499603271}

1 Respuesta

Respuesta
1
Perdona por el tiempo en responder, seguro que ya lo tienes solucionado. Puedes dar propiedades al formulario para que las fórmulas hereden. Es decir, los campos nombre, apellidos, etc., pueden ser editables pero con valor predeterminado el mismo campo. De esta forma cada vez que hagas un @command([compose];"License") el nuevo formulario aparecerá con los valores de los campos del documento anterior.
Muchas gracias por tu respuesta.
Efectivamente ya lo hice de la manera siguiente:
Añadiendo al principio del código en lotus Script
Dim ws as New NotesUiWorkspace
Dim uidoc2 as NotesUiDocument
y al final del código,:
Set uidoc2=ws.EditDocument(True,doc2,True)
Pero tu aportación me parece muy útil y la verdad es que me hubiera ahorrado mi pelea con el lotus script.
Mil gracias

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas