GECSSGET ;WISC/RFJ/KLD-get data from stack file ;13 Oct 98
Source file <GECSSGET.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DATA(DOCID,CODESHET) | ; return data from stack file for docid (.01 field)
; pass codeshet=1 for code sheet data also ; data will be returned in gecsdata |
|
| STATUS(DOCID) | ; return status of docid (.01 field)
; return -1 if entry not found |
|
| PADSPACE(DOCID) | ; return docid with padded spaces
|
|
| KEYLOOK(GECSKEY,CODESHET) | ; lookup and return document data based on a lookup key
; codeshet passed to data to return the document code sheet data |
|
| GETID(IEN) | ; return .01 field of file #2100.1
|
| FileNo | Call Tags |
|---|---|
| ^GECS(2100.1 - [#2100.1] | Classic Fileman Calls, GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(2100.1 | STATUS+6 |
| ^GECS(2100.1 - [#2100.1] | DATA+6, STATUS+4, STATUS+5, KEYLOOK+5, KEYLOOK+8 |
| Name | Line Occurrences |
|---|---|
| $$PADSPACE | DATA+5, STATUS+3 |
| DATA | KEYLOOK+11 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | DATA+4~, STATUS+2~, PADSPACE+1~, PADSPACE+2*, PADSPACE+3*, PADSPACE+4 |
| CODESHET | DATA~, DATA+8, KEYLOOK~, KEYLOOK+11 |
| D0 | DATA+4~ |
| DA | DATA+4~, DATA+6*, DATA+9, STATUS+2~, STATUS+4*, STATUS+5 |
| DIC | DATA+4~, DATA+7* |
| DIQ | DATA+4~, DATA+7* |
| DIQ(0 | DATA+7* |
| DIQ2 | DATA+4~ |
| DOCID | DATA~, DATA+5*, DATA+6, STATUS~, STATUS+3*, STATUS+4, PADSPACE~, PADSPACE+2, PADSPACE+3 |
| DR | DATA+4~, DATA+7*, DATA+8* |
| GECSDA | KEYLOOK+2~, KEYLOOK+5*, KEYLOOK+6, KEYLOOK+8 |
| GECSDATA | DATA+3!, DATA+9* |
| GECSDOC | KEYLOOK+2~, KEYLOOK+8*, KEYLOOK+9, KEYLOOK+11 |
| GECSKEY | KEYLOOK~, KEYLOOK+3, KEYLOOK+5 |
| ID | GETID+2~, GETID+3*, GETID+4 |
| IEN | GETID~, GETID+3 |
| STATUS | STATUS+2~, STATUS+5*, STATUS+6 |