Domino Code Fragment

Code Name*
Compose Form in Other Database		Date*
04/28/2024		Source (or email address if you prefer)*
Rlatulippe@romac.com
IP address:.18.224.59.231
Description*
Button : Application request Asks if user wishes to continue, the saves audit trail information for the transaction, and launches the appropriate DB compose form Note: Notice where the @Compose is located in the button formula (at the end !!). This was necessary so the File save, window close would execute on the initiating form (Request router), not on the target compose form command.		Type*
Formula		Categories*
(Misc)
Implementation:
Required Client:
Server:
Limitations:
Comments:
Files/Graphics attachments (if applicable): Code:
REM;
TEMP := @Prompt([YESNO]; "Create application request"; " Do you wish to compose an application development request for a *NEW* application?? It will be routed to the Development Team for evaluation. They will contact you about this request within the next x hours/days");
REM;
REM " If No, then exit formula, else - continue ";
@If(TEMP = 0; @Return(""); "");
REM;
REM " Set request Type and Formname for audit trail ";
FIELD Type := "request";
FIELD Form := "Audit form";
REM;
REM " Save audit document so user does not have to do it";
@Command([ViewRefreshFields]);
@Command([FileSave]);
@Command([FileCloseWindow]);
@Command([FileCloseWindow]);
REM;
REM " Compose appropriate DB form & not add DB to desktop ";
REM " Note: They will need to save composed doc and exit from DB view "
@Command([FileOpenDatabase]; "yourserver" : "General\\Reqstdb.nsf"; ""; ""; ""; "1");
@Command([Compose]; ""; "Request Form")