certificato di visita ad orario ... inserire orario?

Ho elaborato un testo in certificati per quando il paziente chiede l'attestazione di visita in orario in ambulatorio (per contemporanea eventuale visita fiscale o per permesso dal lavoro).

In automatico nel testo viene inserita la data di sistema.
E' possibile e se si sapete come inserire l'ORARIO DI SISTEMA?

grazie

LucaLeF ha scritto:Ho elaborato un testo in certificati per quando il paziente chiede l'attestazione di visita in orario in ambulatorio (per contemporanea eventuale visita fiscale o per permesso dal lavoro).

In automatico nel testo viene inserita la data di sistema.
E' possibile e se si sapete come inserire l'ORARIO DI SISTEMA?

grazie

Abbiamo già discusso in passato in merito alla possibilità di avere istruzioni più dettagliate su come scrivere (che linguaggio è utilizzato? quali funzioni/istruzioni sono disponibili?) i campi calcolati nei testi Millewin ma senza successo. 
Nessun aiuto da parte di Millewin.
Ci siamo sempre arrangiati studiando e modificando quelle poche istruzioni che sono già presenti nei testi di Milleutilità.
Sarebbe molto utile, per esempio, poter inserire automaticamente in un testo il risultato di un accertamento (es. glicemia, creatinina. etc).
Ma nessuno ci ha mai aiutato in tal senso.
Magari Renato potrebbe fare ancora un tentativo...

Tornando al tuo quesito, la maniera più semplice di inserire la data e l'ora  di sistema in un certificato è quella di creare due nuovi campi (es. DATASISTEMA ed ORASISTEMA, cliccando su inserisci campo e poi aggiungi campo calcolato) in cui scrivere (cliccando sul tasto modifica formula) rispettivamente la seguente istruzione return Date() per ottenere la data e return Time() per ottenere ora minuti e secondi.

Spero di essere stato chiaro, se ci sono problemi scrivi.

Formidabilissimo! Funziona

non è corretto ? vabbè ma chi parla più l'italiano tra parolacce inglese e ignoranza

questa la formula del campo calcolato. d'intuito ho messo PBgeTime laddove in data c'era PBgeDate, non so se era necessario 

a := CtoD(Ricetta.XCE_INIMAL)
cRet := PBgeTime( 'ora visita ', a, 'Certificato visita ad orario' )
Return time()

LucaLeF ha scritto:...
questa la formula del campo calcolato...

a := CtoD(Ricetta.XCE_INIMAL)
cRet := PBgeTime( 'ora visita ', a, 'Certificato visita ad orario' )
Return time()

Ciao Luca
Il quale testo hai trovato queste istruzioni?
Puoi mettere a disposizione il file?
Anche se hai altre istruzioni interessanti postale.
Felice di esserti stato utile!

Il quale testo hai trovato queste istruzioni?
boh?!
Puoi mettere a disposizione il file? 
eccolo in formato A5 orizzontale stampato su ricetta bianca

[RTF]
{\rtf1\ansi\ansicpg1252\uc1\deff0{\fonttbl
{\f0\fswiss\fcharset0\fprq2 Arial;}
{\f1\froman\fcharset0\fprq2 Times New Roman;}
{\f2\fswiss\fcharset0\fprq2 Tahoma;}
{\f3\fmodern\fcharset0\fprq1 Courier New;}
{\f4\fmodern\fcharset0\fprq2 Free 3 of 9;}
{\f5\froman\fcharset2\fprq2 Symbol;}}
{\colortbl;\red0\green0\blue0;\red255\green255\blue255;\red0\green0\blue0;\red0\green255\blue255;}
{\stylesheet{\s0\itap0\nowidctlpar\f0\fs24 [Normal];}{\*\cs10\additive Default Paragraph Font;}}
{\*\generator TX_RTF32 13.0.501.501;}
\deftab1134\paperw11905\paperh16838\margl193\margt0\margr0\margb0\widowctrl
{\*\background{\shp{\*\shpinst\shpleft0\shptop0\shpright0\shpbottom0\shpfhdr0\shpbxmargin\shpbxignore\shpbymargin\shpbyignore\shpwr0\shpwrk0\shpfblwtxt1\shplid1025{\sp{\sn shapeType}{\sv 1}}{\sp{\sn fFlipH}{\sv 0}}{\sp{\sn fFlipV}{\sv 0}}{\sp{\sn fillColor}{\sv 16777215}}{\sp{\sn fFilled}{\sv 1}}{\sp{\sn lineWidth}{\sv 0}}{\sp{\sn fLine}{\sv 0}}{\sp{\sn fBackground}{\sv 1}}{\sp{\sn fLayoutInCell}{\sv 1}}}}}\pard\itap0\nowidctlpar\ri436\tx283\tx10062\tx10200\tx11050\tx11900\tx12750\tx13600\tx14450\tx15300\tx16150\tx17000\tx17850\tx18700\tx19550\plain\f1\fs20\cf3\dn6        \tab\plain\f2\fs24\par\pard\itap0\nowidctlpar\ri436\tx3968\tx5102\tx6236\tx7086\tx7937\tx8500\tx9350\tx10200\tx11050\tx11900\tx12750\tx13600\tx14450\tx15300\plain\f3\fs24\cf3\par\pard\itap0\nowidctlpar\ri436\tx283\tqr\tx4110\tx5244\tx6377\tx7228\tx8078\tx8500\tx9350\tx10200\tx11050\tx11900\tx12750\tx13600\tx14450\plain\f1\fs20\cf3\tab\plain\f2\fs24\par\pard\itap0\nowidctlpar\ri436\tx1275\tx5527\tx5950\tx6800\tx7650\tx8500\tx9350\tx10200\tx11050\tx11900\tx12750\tx13600\tx14450\tx15300\plain\f4\fs56\cf3\par\plain\f2\fs24\par\pard\itap0\nowidctlpar\ri436\tx566\tx850\tx1700\tx2550\tx3400\tx4250\tx5100\tx5950\tx6800\tx7650\tx8500\tx9350\tx10200\tx11050\plain\f3\fs24\cf3\par\pard\itap0\nowidctlpar\ri436\tx566\tx2692\tx5811\tx7937\tx8500\tx9350\tx10200\tx11050\tx11900\tx12750\tx13600\tx14450\tx15300\tx16150\tab\plain\f2\fs24\par\pard\itap0\nowidctlpar\ri436\tx850\tx1700\tx2550\tx3400\tx4250\tx5100\tx5950\tx6800\tx7650\tx8500\tx9350\tx10200\tx11050\tx11900\plain\f3\fs24\cf3    Certifico di aver visitato in data \plain\f3\fs24\cf3\cb4\chshdng0\chcfpat0\chcbpat4{\txfielddef{\*\txfieldstart\txfieldtype0\txfieldflags128\txfielddata 7b005800560049005f0044004100540041007d000000}{\*\txfieldtext \{XVI_DATA\}}{\field\fldlock{\*\fldinst { MERGEFIELD \{XVI_DATA\}}}{\fldrslt{\{XVI_DATA\}}}}}\plain\f3\fs24\cf3  \plain\f2\fs24\par\plain\f3\fs24\cf3  alle ore \plain\f2\fs24\cb4\chshdng0\chcfpat0\chcbpat4{\txfielddef{\*\txfieldstart\txfieldtype0\txfieldflags128\txfielddata 7b0043005500530054004f004d0031007d000000}{\*\txfieldtext \{CUSTOM1\}}{\field\fldlock{\*\fldinst { MERGEFIELD \{CUSTOM1\}}}{\fldrslt{\{CUSTOM1\}}}}}\plain\f3\fs24\cf3  \plain\f3\fs24\cf3\cb4\chshdng0\chcfpat0\chcbpat4{\txfielddef{\*\txfieldstart\txfieldtype0\txfieldflags128\txfielddata 7b005800500041005f004e004f004d0045007d000000}{\*\txfieldtext \{XPA_NOME\}}{\field\fldlock{\*\fldinst { MERGEFIELD \{XPA_NOME\}}}{\fldrslt{\{XPA_NOME\}}}}}\plain\f3\fs24\cf3  nat\plain\f3\fs24\cf3\cb4\chshdng0\chcfpat0\chcbpat4{\txfielddef{\*\txfieldstart\txfieldtype0\txfieldflags128\txfielddata 7b005800500041005f004d0046007d000000}{\*\txfieldtext \{XPA_MF\}}{\field\fldlock{\*\fldinst { MERGEFIELD \{XPA_MF\}}}{\fldrslt{\{XPA_MF\}}}}}\plain\f3\fs24\cf3  \plain\f3\fs24\cf3\cb4\chshdng0\chcfpat0\chcbpat4{\txfielddef{\*\txfieldstart\txfieldtype0\txfieldflags128\txfielddata 7b005800500041005f0044004e004100530043007d000000}{\*\txfieldtext \{XPA_DNASC\}}{\field\fldlock{\*\fldinst { MERGEFIELD \{XPA_DNASC\}}}{\fldrslt{\{XPA_DNASC\}}}}}\plain\f3\fs24\cf3 .\plain\f2\fs24\par\pard\itap0\nowidctlpar\ri436\tx283\tx7511\tx8787\tx9350\tx10200\tx11050\tx11900\tx12750\tx13600\tx14450\tx15300\tx16150\tx17000\tx17850\plain\f2\fs24\cb4\chshdng0\chcfpat0\chcbpat4{\txfielddef{\*\txfieldstart\txfieldtype0\txfieldflags128\txfielddata 7b0043005500530054004f004d0032007d000000}{\*\txfieldtext \{CUSTOM2\}}{\field\fldlock{\*\fldinst { MERGEFIELD \{CUSTOM2\}}}{\fldrslt{\{CUSTOM2\}}}}}\plain\f2\fs24\par\plain\f3\fs24\cf3  Il mio orario di ambulatorio \loch\f3\hich\f3\'e8 il seguente\tab\tab\tab\plain\f2\fs24\par\pard\itap0\nowidctlpar\ri436\tx283\tx2551\tx3400\tx4250\tx5100\tx5950\tx6800\tx7650\tx8500\tx9350\tx10200\tx11050\tx11900\tx12750\plain\f3\fs24\cf3  Lun-Mar-Gio-Ven\tab ore 15.30-18.30 \plain\f2\fs24\par\plain\f3\fs24\cf3  Merc ore 8.30-11.30\tab\plain\f2\fs24\par\pard\itap0\nowidctlpar\ri436\tx283\tx7511\tx7650\tx8500\tx9350\tx10200\tx11050\tx11900\tx12750\tx13600\tx14450\tx15300\tx16150\tx17000\plain\f3\fs20\cf3\tab\tab\plain\f1\fs16\cf3\cb4\chshdng0\chcfpat0\chcbpat4{\txfielddef{\*\txfieldstart\txfieldtype0\txfieldflags128\txfielddata 7b005800550054005f0043004f0044005200450047007d000000}{\*\txfieldtext \{XUT_CODREG\}}{\field\fldlock{\*\fldinst { MERGEFIELD \{XUT_CODREG\}}}{\fldrslt{\{XUT_CODREG\}}}}}\plain\f1\fs16\cf3  \plain\f1\fs16\cf3\cb4\chshdng0\chcfpat0\chcbpat4{\txfielddef{\*\txfieldstart\txfieldtype0\txfieldflags128\txfielddata 7b005800550054005f004e004f004d0045007d000000}{\*\txfieldtext \{XUT_NOME\}}{\field\fldlock{\*\fldinst { MERGEFIELD \{XUT_NOME\}}}{\fldrslt{\{XUT_NOME\}}}}}\plain\f2\fs24\par\pard\itap0\nowidctlpar\ri436\tx7511\tx7650\tx8500\tx9350\tx10200\tx11050\tx11900\tx12750\tx13600\tx14450\tx15300\tx16150\tx17000\tx17850\plain\f3\fs18\cf3\tab\plain\f1\fs16\cf3\cb4\chshdng0\chcfpat0\chcbpat4{\txfielddef{\*\txfieldstart\txfieldtype0\txfieldflags128\txfielddata 7b005800550054005f0049004e0044007d000000}{\*\txfieldtext \{XUT_IND\}}{\field\fldlock{\*\fldinst { MERGEFIELD \{XUT_IND\}}}{\fldrslt{\{XUT_IND\}}}}}\plain\f1\fs16\cf3  \plain\f1\fs16\cf3\cb4\chshdng0\chcfpat0\chcbpat4{\txfielddef{\*\txfieldstart\txfieldtype0\txfieldflags128\txfielddata 7b005800550054005f00430049005400540041007d000000}{\*\txfieldtext \{XUT_CITTA\}}{\field\fldlock{\*\fldinst { MERGEFIELD \{XUT_CITTA\}}}{\fldrslt{\{XUT_CITTA\}}}}}\plain\f2\fs24\par\plain\f3\fs18\cf3\tab\plain\f1\fs16\cf3\cb4\chshdng0\chcfpat0\chcbpat4{\txfielddef{\*\txfieldstart\txfieldtype0\txfieldflags128\txfielddata 7b005800550054005f00540045004c007d000000}{\*\txfieldtext \{XUT_TEL\}}{\field\fldlock{\*\fldinst { MERGEFIELD \{XUT_TEL\}}}{\fldrslt{\{XUT_TEL\}}}}}\plain\f2\fs24\par\pard\itap0\nowidctlpar\ri436\tx566\tx2976\tx5385\tx5950\tx6800\tx7650\tx8500\tx9350\tx10200\tx11050\tx11900\tx12750\tx13600\tx14450\plain\f3\fs28\cf3\tab\plain\f3\fs24\cf3\tab\tab\plain\f3\fs26\cf3\cb4\chshdng0\chcfpat0\chcbpat4\dn8{\txfielddef{\*\txfieldstart\txfieldtype0\txfieldflags128\txfielddata 7b00560049005f0044004100540041007d000000}{\*\txfieldtext \{VI_DATA\}}{\field\fldlock{\*\fldinst { MERGEFIELD \{VI_DATA\}}}{\fldrslt{\{VI_DATA\}}}}}\plain\f3\fs26\cf3\tab\plain\f2\fs24\par\pard\itap0\nowidctlpar}
[CUSTOM1]
a := CtoD(Ricetta.XCE_INIMAL)
cRet := PBgeTime( 'ora visita ', a, 'Certificato visita ad orario' )
Return time()
[D_CUSTOM1]
Descrizioneora visita
[CUSTOM2]
cRet := PBgetText( 'event motivo SE assenza visfiscale ',70, '                                                                 ', 'visita ad orario' )
Return cRet
[D_CUSTOM2]
Descrizionemotivo
[Opzioni]