SDECDIQ1 ;ALB/SAT - VISTA SCHEDULING RPCS ;JAN 15, 2016
Source file <SDECDIQ1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DOC | ;
|
|
| EN | ;PEP - Returns single entries
|
|
| ENP(DIC,DA,DR,DIQ,XBFMT) | ;PEP - param pass into EN
|
|
| ENPM(DIC,DA,DR,DIQ,XBFMT) | ;PEP - param pass into EN
|
|
| ENM | ;PEP - get multiple entries
|
|
| ENDIQ1 | ;EP - call EN^DIQ1
|
|
| ENDIQ1X | ;EP - to call DIQ1 with new
|
|
| ENDIQ1XN | ;EP
|
|
| EXIT | ;EP
|
|
| PULLDIQ1 | ;EP - PULL FROM ^UTILITY("DIQ1",$J)
|
|
| 0 | ||
| 1 | ||
| 2 | ||
| DICFNGL(X) | ;EP - set XBFN & XBGL0 return 1 error
|
|
| DICFNGLX | ;
|
|
| VAL(DIC,DA,DR) | ;PEP - extrinsic pull a value for a field
|
|
| VALI(DIC,DA,DR) | ;PEP - extrinsic pull a value for a field
|
|
| PARSE(XBDA) | ;PEP - parse DA literal into da array
|
|
| DIC(XBFN) | ;PEP - Extrinsic entry to return DIC from global
|
|
| LEVELS | ;EP - setup XB_FN_DA_DR_FLD arrays for upper levels it they exist
|
|
| PARENT | ; gather parent information
; build elements from XBFN(XBLVL) |
|
| EPAR | ;
|
|
| SETDIQ1 | ;EP - set DR(fn and DA(fn arrays for DIQ1
|