PRCPEILM ;WISC/RFJ-edit inventory items (list manager) ;01 Dec 93
Source file <PRCPEILM.m>
| Package | Total | Call Graph |
|---|---|---|
| IFCAP | 9 | (COSTS,DRUGACCT,ISSUNITS,LEVELS,OUTSTRAN,QUANTITY,SET,SOURCES,SPECIAL)^PRCPEIL0 $$STORELOC^PRCPESTO BLDSEG^PRCPHLFM ($$PURCHASE,$$REUSABLE)^PRCPU441 $$ITEM^PRCPUITM (ADD,CLEAR,SHOWWHO)^PRCPULOC $$KEY^PRCPUREP ^PRCPUSEL $$INVNAME^PRCPUX1 |
| List Manager | 2 | EN^VALM FULL^VALM1 |
| VA FileMan | 1 | EN^DIQ1 |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| V | ;;5.1;IFCAP;**1,171,244**;Oct 20, 2000;Build 9
|
|
| EN | ; called from protocol file from within another protocol
|
|
| HDR | ; build header
|
|
| INIT | ; build array
|
|
| DESCRIP | ; build descriptive array
|
|
| EXIT | ; exit and clean up
|
|
| DIQ(DR) | ; diq call to retrieve data for dr fields
|
|
| CHECK() | ; screen for manager access to option
; return 1 for access, 0 for no access |
| Name | Field # of Occurrence |
|---|---|
| EN^DIQ1 | DIQ+4 |
| COSTS^PRCPEIL0 | INIT+7 |
| DRUGACCT^PRCPEIL0 | INIT+10 |
| ISSUNITS^PRCPEIL0 | INIT+4 |
| LEVELS^PRCPEIL0 | INIT+5 |
| OUTSTRAN^PRCPEIL0 | INIT+8 |
| QUANTITY^PRCPEIL0 | INIT+6 |
| SET^PRCPEIL0 | DESCRIP+2, DESCRIP+3, DESCRIP+4, DESCRIP+6, DESCRIP+7, DESCRIP+8, DESCRIP+10, DESCRIP+13, DESCRIP+14 |
| SOURCES^PRCPEIL0 | INIT+11 |
| SPECIAL^PRCPEIL0 | INIT+9 |
| $$STORELOC^PRCPESTO | DESCRIP+9 |
| BLDSEG^PRCPHLFM | EN+7 |
| $$PURCHASE^PRCPU441 | DESCRIP+11 |
| $$REUSABLE^PRCPU441 | DESCRIP+12 |
| $$ITEM^PRCPUITM | EN+3 |
| ADD^PRCPULOC | EN+5 |
| CLEAR^PRCPULOC | EN+8 |
| SHOWWHO^PRCPULOC | EN+4 |
| $$KEY^PRCPUREP | CHECK+2 |
| ^PRCPUSEL | V+28 |
| $$INVNAME^PRCPUX1 | HDR+1 |
| EN^VALM | EN+6 |
| FULL^VALM1 | EN+6 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PRC(441 - [#441] | DESCRIP+4 |
| ^PRCP(445 - [#445] | EN+4, EN+7, EN+9, INIT+10, DESCRIP+9 |
| ^PRCP(445.7 - [#445.7] | DESCRIP+11 |
| ^PRCP(445.8 - [#445.8] | DESCRIP+11 |
| ^TMP($J | INIT+1!, EXIT+1! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | DESCRIP+9* |
| CLREND | EN+1~, DESCRIP+1*, DESCRIP+2, DESCRIP+3, DESCRIP+4, DESCRIP+6, DESCRIP+7, DESCRIP+8, DESCRIP+10, DESCRIP+13 , DESCRIP+14 |
| COLUMN | EN+1~, DESCRIP+1*, DESCRIP+2, DESCRIP+4, DESCRIP+6, DESCRIP+7, DESCRIP+8, DESCRIP+10, DESCRIP+13, DESCRIP+14 |
| D0 | DIQ+1~ |
| DA | DIQ+1~, DIQ+2* |
| DA(1 | DIQ+2* |
| DIC | DIQ+1~, DIQ+3* |
| >> DILOCKTM | EN+4 |
| DIQ | DIQ+1~, DIQ+4* |
| DIQ(0 | DIQ+2* |
| DIQ2 | DIQ+1~ |
| DR | DIQ~ |
| DUZ | CHECK+2 |
| >> IORVOFF | DESCRIP+2 |
| >> IORVON | DESCRIP+2 |
| ITEMDA | EN+1~, EN+3*, EN+4, EN+7, EN+9, HDR+1, DESCRIP+4, DESCRIP+9, DESCRIP+11, DESCRIP+12 , DIQ+2 |
| LINE | EN+1~, DESCRIP+1*, DESCRIP+2, DESCRIP+3, DESCRIP+4, DESCRIP+6, DESCRIP+7, DESCRIP+8, DESCRIP+10, DESCRIP+13 , DESCRIP+14 |
| >> PRCP("DPTYPE" | EN+2 |
| >> PRCP("I" | V+28, EN+2, EN+3, DESCRIP+9 |
| PRCPDATA | EN+1~, INIT+1! |
| PRCPINPT | EN+1~, EN+2*, EN+4, EN+5, EN+7, EN+8, EN+9, HDR+1, INIT+10, DIQ+2 , DIQ+3 |
| PRCPTYPE | EN+1~, EN+2*, CHECK+2 |
| >> VALMCNT | INIT+12* |
| >> VALMHDR(1 | HDR+1* |
| >> X | DESCRIP+9*, DESCRIP+10, DESCRIP+11*, DESCRIP+12*, DESCRIP+13 |
