SDECXUTL ;DALLAS/JCH - SCHEDULING ENHANCEMENTS 3 UTILITIES ;11/03/14 10:59am
Source file <SDECXUTL.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PADDT(DATE) | ; leading zeroes
|
|
| HFSOPEN(HANDLE) | ; Open file
|
|
| HFSCLOSE(HANDLE) | ; Close file
|
|
| GETQUART(SDDT) | ||
| DIVNAME(DIV) | ; Division name
|
|
| OUTPUT(TEXT,PAD,SDLCNT,SDEBUG,CLNTAG,GRPFLG,DIVTAG,XMLNODE) | ; Generic Set/Output
|
|
| XDATE(DATE,DTINC) | ; Date format
|
|
| BEGEND(DATE,BEGDT,ENDDT,DTINC,SDACTDT) | ; Accept activity Date, Set/Write formatted xml with begin and end dates
|
|
| NODATA(RESULT,TEXT) | ||
| SUPPLY(SDSTPAR) | ; SUPPLY
|
|
| SET(SDEXCLN,TMPDT,SDSUPPLY,SDSTPAR) | ||
| SDGRP(CLN,SDGRP) | ; Get external stop code from clinic
|
|
| STOPGRP(STP) | ||
| STOPIEN(CLN) | ||
| GETSUPM(DATE,RPT) | ; Get a months worth of supply for month containing DATE
; ^XTMP("SDCEX","Month","P",3140600,500,"APP","SUP")=543 |
|
| GETDEMM(DATE,RPT) | ||
| SETSDREC(SDLCNT,SDRPTYP,START,XMLNODE) | ||
| MONDEM(DEM,MONTH,SDLCNT) | ; Demand
|
|
| MONSUP(SUP,MONTH) | ; Supply
|
|
| GETDIVCL(SDNODE,DATINC,SDRPTYP,SDAT,SDFAC,DIV,DIVCLNAR) | ||
| DTNAM(DTINC,DTNAM) | ||
| SDETFM(DATE) | ; Convert ext date to fm
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
