©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
XLFDT ;ISC-SF/STAFF - Date/Time Functions ;03/27/2003 14:09 [ 07/29/2004 9:01 AM ]
Source file <XLFDT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DOW(X,Y) | ;Day of Week
|
|
| HDIFF(X1,X2,X3) | ;$H diff in two dates, X3 same as FMDIFF.
|
|
| NOW() | ;Current Date/time in FM.
|
|
| DT() | ;Current Date in FM.
|
|
| WITHIN(XLSCH,XLD) | ;See if D/T is within schedule
|
|
| FMADD(X,D,H,M,S) | ;Add to FM date
|
|
| FMTHL7(%P1) | ;Convert FM date/time to HL7 format
|
|
| F2H(X) | ;Internal to this routine use
|
|
| H2F(%H) | ;Internal to this routine use
|
|
| TZ() | ;Return current Time Zone from Mailman parameter file
|
|
| HADD(X,D,H,M,S) | ;Add to $H date
|
|
| SEC(%) | ;Convert $H to seconds.
|
|
| A2 | ||
| HTFM(%H,%F) | ;$H to FM, %F=1 for date only
|
|
| SCH(SCH,LTM,FF) | ;Find the next D/T given a schedule, start time.
|
|
| FMTH(X,%F) | ;FM to $H, %F=1 for date only
|
|
| FMDIFF(X1,X2,X3) | ;FM diff in two dates. if X3=1 in days, if X3=2 in seconds.
|
|
| H | ;Build %H from FM
|
|
| T2 | ||
| YMD | ;21608 = 28 feb 1900, 94657 = 28 feb 2100, 141 $H base year
|
|
| HR(%V) | ;Check $H in valid range
|
|
| HL7TFM(%P1,%P2,%P3) | ;Convert HL7 D/T to FM.
|
|
| FR(%V) | ;Check FM in valid range
|
|
| HTE(%H,%F) | ;$H to external
|
|
| D2 | ||
| FMTE(Y,%F) | ;FM to external
|
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^XMB(1 - [#4.3] | TZ+2 |
| ^XMB(4.4 - [#4.4] | TZ+2 |
| Name | Line Occurrences |
|---|---|
| $$F2H | FMADD+3 |
| $$FMADD | FMTHL7+4, HL7TFM+24, HL7TFM+30, HL7TFM+34 |
| $$FMTH | SEC+1 |
| $$FR | FMTH+2, FMTHL7+2, FMDIFF+3, FMADD+2 |
| $$H2F | FMADD+5 |
| $$HR | HTFM+2, HTE+1, HDIFF+2, HADD+2 |
| $$HTFM | HTE+3, NOW+1, DT+1 |
| $$TZ | FMTHL7+7, HL7TFM+6, HL7TFM+33 |
| A2 | HADD+3, FMADD+3 |
| D2 | HDIFF+5 |
| H | FMTH+4, F2H+2, DOW+1, FMDIFF+4 |
| T2 | HTE+3 |
| YMD | HTFM+4, H2F+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | HTFM+1~, H2F+1~, YMD+1*, YMD+2, YMD+3*, YMD+4, H+1~, H+7*, HL7TFM+28*, HL7TFM+29 , HL7TFM+33*, D2+1*, SEC~, SEC+1*, SEC+2, %H~, %H+1 |
| %A | FMTH+1~, FMTH+3*, FMTH+4, F2H+1~ |
| %D | HTFM+1~, H2F+1~, YMD+2*, YMD+3, H+1~, H+2*, H+6, H+7, DOW+1~ |
| %F | HTFM~, HTFM+1*, HTFM+3, HTFM+4, FMTH~, FMTH+1*, FMTH+3, FMTH+4, HTE~, HTE+3* , FMTE~, FMTE+2* |
| %H | HTFM~, HTFM+2, HTFM+3*, H2F~, YMD+1, YMD+3, FMTH+1~, FMTH+4*, FMTH+5, F2H+1~ , F2H+3, H+1*, H+6*, H+7*, HTE~, HTE+1, HTE+3, HL7TFM+4~, HL7TFM+29*, HL7TFM+30 , HL7TFM+33*, HL7TFM+34, DOW+1~, FMDIFF+1~, FMDIFF+4, D2, HDIFF+1~, HDIFF+4*, HADD+1~, HADD+3* , A2*, A2+2*, FMADD+1~, FMADD+3*, FMADD+4*, FMADD+5 |
| %L | H+1~, H+5*, H+7 |
| %LTZ | HL7TFM+4~, HL7TFM+6*, HL7TFM+20, HL7TFM+26 |
| %M | HTFM+1~, H2F+1~, YMD+2*, YMD+3, H+1~, H+2*, H+5, H+6, H+7, HL7TFM+4~ , HL7TFM+29*, HL7TFM+30, HL7TFM+33*, HL7TFM+34, DOW+1~ |
| %P | FMADD+1~, FMADD+3*, FMADD+4 |
| %P1 | FMTHL7~, FMTHL7+1*, FMTHL7+2, FMTHL7+3*, FMTHL7+4*, FMTHL7+5*, FMTHL7+7*, FMTHL7+8, HL7TFM~, HL7TFM+4 , HL7TFM+5, HL7TFM+8, HL7TFM+9*, HL7TFM+13*, HL7TFM+15*, HL7TFM+16, HL7TFM+17*, HL7TFM+22*, HL7TFM+24*, HL7TFM+27 , HL7TFM+30*, HL7TFM+32, HL7TFM+34*, HL7TFM+35 |
| %P2 | HL7TFM~, HL7TFM+6*, HL7TFM+19*, HL7TFM+20, HL7TFM+26*, HL7TFM+27, HL7TFM+32 |
| %P3 | HL7TFM~, HL7TFM+6*, HL7TFM+7, HL7TFM+15, HL7TFM+35 |
| %R | HTE+2~, FMTE+2~, T2+1 |
| %S | TZ+1~, TZ+2*, TZ+3 |
| %SN | HL7TFM+4~, HL7TFM+8*, HL7TFM+9, HL7TFM+10 |
| %T | HTFM+1~, HTFM+4, H2F+1~, H2F+2, YMD+4*, H+1~, H+3*, H+7, HTE+2~, FMTE+2~ , T2*, FMTHL7+1~, FMTHL7+3*, FMTHL7+4*, FMTHL7+6*, FMTHL7+7, HL7TFM+4~, HL7TFM+5*, HL7TFM+7, DOW+1~ , HDIFF+1~, HADD+1~, HADD+3*, A2*, A2+2, A2+3*, FMADD+1~, FMADD+3*, FMADD+4*, FMADD+5 , TZ+1~, TZ+2*, TZ+3 |
| %TZ | HL7TFM+4~, HL7TFM+6*, HL7TFM+9*, HL7TFM+10*, HL7TFM+18, HL7TFM+20*, HL7TFM+26, HL7TFM+28 |
| %U | HL7TFM+4~ |
| %V | FR~, FR+1, HR~, HR+1 |
| %Y | HTFM+1~, H2F+1~, YMD+1*, YMD+2, YMD+3, FMTH+1~, F2H+1~, H+1*, H+2*, H+5 , H+7*, DOW+1~, DOW+2, FMDIFF+1~ |
| D | HADD~, A2, FMADD~ |
| FF | SCH~ |
| H | HADD~, A2, FMADD~ |
| LTM | SCH~ |
| M | HADD~, A2, FMADD~ |
| S | HADD~, A2, FMADD~ |
| SCH | SCH~ |
| X | HTFM+1~, HTFM+4*, HTFM+5, H2F+1~, H2F+2*, H2F+3, YMD+3*, FMTH~, FMTH+2, FMTH+3 , F2H~, H+1, H+2, H+3, DOW~, FMDIFF+1~, FMDIFF+4*, D2*, D2+1*, D2+2 , HDIFF+1~, HADD~, HADD+2, HADD+3, FMADD~, FMADD+2, FMADD+3 |
| X1 | FMDIFF~, FMDIFF+2*, FMDIFF+3*, FMDIFF+4*, D2, HDIFF~, HDIFF+2*, HDIFF+4* |
| X1(1 | FMDIFF+4*, D2, HDIFF+4* |
| X2 | FMDIFF~, FMDIFF+2*, FMDIFF+3*, FMDIFF+4, HDIFF~, HDIFF+2*, HDIFF+4 |
| X3 | FMDIFF~, FMDIFF+2*, D2, D2+1, HDIFF~, HDIFF+3* |
| XLD | WITHIN~ |
| XLSCH | WITHIN~ |
| Y | HTE+2~, HTE+3*, FMTE~, FMTE+1, T2, DOW~, DOW+1 |