SDECFUNC ;ALB/SAT - VISTA SCHEDULING RPCS ;JAN 15, 2016
Source file <SDECFUNC.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FNDPATRN(STR,PAT) | ;PEP - Find pattern in string. Return beginning position.
|
|
| GETPATRN(STR,PAT) | ;PEP - Retrieve pattern from string.
|
|
| INTSET(FILE,FIELD,EXTVAL) | ;PEP - Get Intnl Field Value Given Extnl Field Value
; For a set of codes type field |
|
| EXTSET(FILE,FIELD,INTVAL) | ;PEP - Get Extnl Field Value Given Intnl Field Value
; For a set of codes type field |
|
| DECFRAC(X) | ;PEP - Convert Decimal to Fraction (X contains Decimal number).
|
|
| C(X,Y) | ;PEP - Center X in field length Y/IOM/80.
|
|
| GDT(JDT) | ;PEP - Return Gregorian Date, given Julian Date.
|
|
| JDT(XBDT) | ;PEP - Return Julian Date, given FM date.
|
|
| USR() | ;PEP - Return name of current user for ^VA(200.
|
|
| LOC() | ;PEP - Return location name from file 4 based on DUZ(2).
|
|
| CV(X) | ;PEP - Given a Namespace, return current version.
|
|
| FNAME(N) | ;PEP - Given File number, return File Name.
|
|
| FGLOB(N) | ;PEP - Given File number, return File Global.
|
|
| ZEROTH(A,B,C,D,E,F,G,H,I,J,K) | ;PEP - Return dd 0th node. A is file #, rest fields.
|
