PSOSPMA3 ;BIRM/MFR - ASAP Definitions Listman Actions Handler ;11/11/15
Source file <PSOSPMA3.m>
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 |
---|---|---|
SHOWHID | ; Handles Show/Hide Details
; (PSOSHOW: 1: Show Segment Tree only; 2: Show Segments & Data Elements; 3: Show Data Element Details) |
|
COPYVER | ; Handles 'Copy ASAP Version' Action
|
|
CV | ; Loop Prompt
|
|
EDTDELIM | ; Handles the 'Edit Delimiters' Action
|
|
CUSSEG | ; Handles the 'Customize Segment' Action
|
|
CSL | ; Loop Re-Prompt
|
|
CSE | ; Error Re-Prompt
|
|
CUSELM | ; Handles the 'Customize Element' Action
|
|
CEL | ; Loop Re-Prompt
|
|
CEE | ; Error Re-Prompt
|
|
ASKFLD(FIELD,DEFAULT,PROMPT) | ; Prompt
|
|
ASKMEXPR(LEVEL,ELMID,MAXLEN,DEFAULT) | ; Prompt for M SET Expression
|
|
SECKEY() | ; Checking the Security Key PSO SPMP ADMIN for certain actions
|
|
LOCK() | ; Try to LOCK the SPMP ASAP RECORD DEFINITION file (#58.4)
|
|
BACK | ; Unlock ASAP Definition File Go Back to the list
|
|
EXIT | ; Exit without rebuilding the list
|
Name | Field # of Occurrence |
---|---|
^DIR | CV+2, CSE+13, CSE+35, CEE+14, CEE+58, ASKFLD+7 |
EN^DIWE | CEE+80 |
HDR^PSOSPML3 | SHOWHID+6, BACK+2 |
INIT^PSOSPML3 | SHOWHID+6, BACK+2 |
MEXPRHLP^PSOSPML3 | ASKMEXPR+11 |
LOADASAP^PSOSPMU0 | EDTDELIM+7, CSL+1, CSL+2, CSL+3, CEL+1, CEL+2, CEL+3 |
VERLIST^PSOSPMU0 | CV+3 |
$$CHKVAR^PSOSPMU3 | ASKMEXPR+13 |
$$CUSSEG^PSOSPMU3 | CSE+4 |
$$GETSEGID^PSOSPMU3 | CEE+15 |
$$VALID^PSOSPMU3 | ASKMEXPR+12 |
CHKCODE^PSOSPMU3 | ASKMEXPR+14 |
CLONEVER^PSOSPMU3 | CV+11 |
COPYELM^PSOSPMU3 | CEE+47 |
COPYSEG^PSOSPMU3 | CSE+27, CEE+43, CEE+94 |
SAVEELM^PSOSPMU3 | CEE+53, CEE+95 |
SAVESEG^PSOSPMU3 | CSE+30, CSE+81 |
SAVEVER^PSOSPMU3 | EDTDELIM+33 |
FULL^VALM1 | COPYVER+5, EDTDELIM+5, CUSSEG+6, CUSELM+6 |
$$UP^XLFSTR | EDTDELIM+22, CSE+16, CSE+45, CEE+16, CEE+17 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PS(58.4 - [#58.4] | LOCK+1, BACK+1 |
^TMP("PSOASDES" | CEE+76!, CEE+79*, CEE+82, CEE+83 |
^XUSEC("PSO SPMP ADMIN" | SECKEY+1 |
Name | Line Occurrences |
---|---|
$$ASKFLD | CV+8, CV+10, EDTDELIM+10, EDTDELIM+15, EDTDELIM+21, EDTDELIM+30, CSE+20, CSE+22, CSE+39, CSE+43 , CSE+52, CSE+55, CSE+65, CSE+79, CEE+28, CEE+31, CEE+38, CEE+64, CEE+67, CEE+70 , CEE+73, CEE+91 |
$$ASKMEXPR | CEE+36, CEE+88 |
$$LOCK | COPYVER+4, EDTDELIM+4, CUSSEG+5, CUSELM+5 |
$$SECKEY | COPYVER+3, EDTDELIM+3, CUSSEG+4, CUSELM+4 |
BACK | COPYVER+6, CV+2, CV+7, CV+10, CV+13, EDTDELIM+18, EDTDELIM+26, EDTDELIM+28, EDTDELIM+30, EDTDELIM+35 , CSE+13, CEE+14 |
CEE | CEE+15, CEE+18, CEE+19, CEE+22 |
CEL | CEE+97 |
CSE | CSE+15 |
CSL | CSE+83 |
CV | CV+4 |
EXIT | COPYVER+2, COPYVER+3, COPYVER+4, EDTDELIM+2, EDTDELIM+3, EDTDELIM+4, CUSSEG+3, CUSSEG+4, CUSSEG+5, CUSELM+3 , CUSELM+4, CUSELM+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ALLASAP | EDTDELIM+7, EDTDELIM+9, EDTDELIM+14, EDTDELIM+20, EDTDELIM+28, EDTDELIM+32*, EDTDELIM+33, CUSSEG+1~, CSL+3, CSE+30 , CSE+81, CEL+3 |
ALLASAP( | CSE+16, CSE+17, CSE+20, CSE+45, CSE+46, CSE+48, CSE+56, CSE+57, CSE+58, CSE+63 , CSE+64, CSE+70, CSE+71, CSE+72, CSE+73, CSE+74, CSE+75, CEE+16, CEE+18, CEE+20 , CEE+22, CEE+23, CEE+28, CEE+31, CEE+34, CEE+35, CEE+36, CEE+78, CEE+79, CEE+86 , CEE+87, CEE+88 |
ASKFLD | ASKFLD+5~, ASKFLD+6*, ASKFLD+9*, ASKFLD+11*, ASKFLD+12*, ASKFLD+13 |
ASKMEXPR | ASKMEXPR+6~, ASKMEXPR+10*, ASKMEXPR+17*, ASKMEXPR+18 |
CNT | CUSSEG+2~, CSE+9*, CSE+11*, CUSELM+2~, CEE+10*, CEE+12* |
CUSASAP | CUSSEG+1~, CSL+2, CUSELM+1~, CEL+2 |
CUSASAP( | CSE+3, CSE+4, CSE+25, CSE+29*, CSE+30, CSE+34, CSE+37*, CSE+39, CSE+40*, CSE+43 , CSE+44*, CSE+49*, CSE+52, CSE+53*, CSE+55, CSE+57, CSE+59*, CSE+62, CSE+63, CSE+64* , CSE+65, CSE+66, CSE+76*, CSE+81, CEE+3, CEE+4, CEE+5, CEE+41, CEE+43, CEE+49* , CEE+50*, CEE+51*, CEE+52, CEE+57, CEE+64, CEE+67, CEE+70, CEE+73, CEE+94 |
CUSELM | CUSELM+1~, CEE+21*, CEE+36, CEE+47, CEE+53, CEE+58, CEE+61, CEE+88, CEE+95 |
CUSELMS | CUSELM+2~, CEE+6 |
CUSELMS( | CEE+5*, CEE+10, CEE+11, CEE+12 |
CUSSEG | CUSSEG+1~, CSE+17*, CSE+18, CSE+20, CSE+25, CSE+26, CSE+27, CSE+29, CSE+30, CSE+34 , CSE+35, CSE+37, CSE+39, CSE+40, CSE+43, CSE+44, CSE+47, CSE+49, CSE+52, CSE+53 , CSE+55, CSE+57, CSE+59, CSE+62, CSE+63, CSE+64, CSE+65, CSE+66, CSE+76, CSE+81 |
CUSSEGS | CUSSEG+2~, CSE+5 |
CUSSEGS( | CSE+4*, CSE+9, CSE+10, CSE+11 |
DEFAULT | ASKFLD~, ASKFLD+6, ASKMEXPR~, ASKMEXPR+7, ASKMEXPR+9, ASKMEXPR+10 |
DEFTYPE | COPYVER+1~, CV+6*, CV+9*, CV+11 |
DIC | CUSELM+2~, CEE+80!* |
DIR | COPYVER+1~, CUSSEG+1~, CSE+1!, CSE+35!, CUSELM+1~, CEE+1!, CEE+58!, ASKFLD+5~ |
DIR("?" | CSE+6*, CSE+8*, CSE+10*, CSE+11*, CEE+7*, CEE+9*, CEE+11*, CEE+12* |
DIR("A" | CV+2*, CSE+12*, CSE+35*, CEE+13*, CEE+58*, ASKFLD+6* |
DIR("B" | CSE+35*, CEE+58*, ASKFLD+6* |
DIR(0 | CV+2*, CSE+12*, CSE+35*, CEE+13*, CEE+58*, ASKFLD+6* |
DIRUT | COPYVER+1~, CV+2, CUSSEG+1~, CSE+13, CSE+34, CUSELM+1~, CEE+14, CEE+57, ASKFLD+5~, ASKFLD+10 , ASKFLD+12 |
DONE | EDTDELIM+1~, EDTDELIM+9*, EDTDELIM+10, EDTDELIM+12*, EDTDELIM+14*, EDTDELIM+15, EDTDELIM+17*, EDTDELIM+20*, EDTDELIM+21, EDTDELIM+25* , CUSSEG+1~, CSE+42*, CSE+43, CSE+49*, CSE+54*, CSE+55, CSE+59*, CSE+62*, CSE+65, CSE+76* , CEE+85*, ASKFLD+5~, ASKFLD+7*, ASKFLD+9*, ASKFLD+10*, ASKFLD+11*, ASKMEXPR+6~, ASKMEXPR+7*, ASKMEXPR+8, ASKMEXPR+10* , ASKMEXPR+17* |
DTIME | ASKMEXPR+10 |
DTOUT | COPYVER+1~, CV+2, CUSSEG+1~, CSE+13, CSE+34, CUSELM+1~, CEE+14, CEE+57, ASKFLD+5~, ASKFLD+10 , ASKFLD+12 |
DUZ | SECKEY+1 |
DWPK | CUSELM+2~, CEE+80* |
ELM | CUSELM+2~, CEE+4*, CEE+5, CEE+10*, CEE+11, CEE+12 |
ELMDATA | CUSELM+1~, CEE+52!*, CEE+53, CEE+56!, CEE+61*, CEE+62*, CEE+65*, CEE+68*, CEE+71*, CEE+74* , CEE+88, CEE+95 |
ELMDATA("DES" | CEE+83* |
ELMDATA("VAL" | CEE+89* |
ELMDELIM | EDTDELIM+1~, EDTDELIM+9*, EDTDELIM+10, EDTDELIM+11*, EDTDELIM+28, EDTDELIM+32 |
ELMID | ASKMEXPR~, ASKMEXPR+11 |
ELMPOS | CUSELM+1~, CEE+19*, CEE+20, CEE+22, CEE+23, CEE+25*, CEE+26, CEE+28, CEE+31, CEE+34 , CEE+35, CEE+41, CEE+44, CEE+45, CEE+46, CEE+49, CEE+50, CEE+51, CEE+52, CEE+57 , CEE+62, CEE+64, CEE+67, CEE+70, CEE+73, CEE+78, CEE+79, CEE+86, CEE+87 |
ELMREQ | CUSELM+1~, CEE+32*, CEE+45, CEE+50 |
EOSCHR | EDTDELIM+1~, EDTDELIM+20*, EDTDELIM+21, EDTDELIM+24*, EDTDELIM+28, EDTDELIM+32 |
ERROR | ASKMEXPR+6~, ASKMEXPR+14 |
FIELD | ASKFLD~, ASKFLD+6 |
HLPTXT | CUSSEG+2~, CSE+1*, CSE+6, CSE+8, CUSELM+2~, CEE+1*, CEE+7, CEE+9 |
I | CUSELM+2~, CEE+34*, CEE+35, CEE+78*, CEE+79, CEE+82*, CEE+83, CEE+86*, CEE+87 |
LEVEL | ASKMEXPR~, ASKMEXPR+11, ASKMEXPR+13, ASKMEXPR+14 |
LINE | CUSELM+2~ |
LITERAL | CUSSEG+2~, CSE+14*, CSE+16 |
MAXLEN | CUSELM+1~, CEE+29*, CEE+36, CEE+44, CEE+49, ASKMEXPR~, ASKMEXPR+15, ASKMEXPR+16 |
MEXPR | CUSELM+2~, CEE+34*, CEE+35*, CEE+36, CEE+37*, CEE+46, CEE+51, CEE+85*, CEE+87*, CEE+88 |
NEWASVER | COPYVER+1~, CV+5*, CV+11, CV+12 |
NEWELM | CUSELM+1~, CEE+56*, CEE+59*, CEE+95 |
NEWSEG | CUSSEG+1~, CSE+33*, CSE+36*, CSE+81 |
OK | CUSSEG+1~, CSE+56*, CSE+58*, CSE+59 |
PARSEG | CUSSEG+1~, CSE+62*, CSE+63, CSE+64, CSE+69, CSE+70, CSE+71, CSE+72, CSE+73, CSE+74 , CSE+75 |
PROMPT | ASKFLD~, ASKFLD+6 |
>> PSOASVER | SHOWHID+3, COPYVER+2, COPYVER+6, CV+1, CV+7, CV+11, CV+12*, EDTDELIM+2, EDTDELIM+6, EDTDELIM+7 , EDTDELIM+33, CUSSEG+3, CSL+1, CSL+2, CSL+3, CSE+4, CSE+27, CSE+30, CSE+81, CUSELM+3 , CEL+1, CEL+2, CEL+3, CEE+43, CEE+47, CEE+53, CEE+94, CEE+95, ASKMEXPR+12 |
>> PSOSHOW | SHOWHID+5*, SHOWHID+6 |
QUIT | CUSSEG+1~, CSE+68*, CSE+69, CSE+70*, CSE+72*, CSE+74* |
SEG | CUSSEG+1~, CSE+3*, CSE+4, CSE+9*, CSE+10, CSE+11, CSE+56*, CSE+57, CSE+58, CEE+3* , CEE+4, CEE+5 |
SEGDELIM | EDTDELIM+1~, EDTDELIM+14*, EDTDELIM+15, EDTDELIM+16*, EDTDELIM+28, EDTDELIM+32 |
SEGID | CUSELM+1~, CEE+15*, CEE+16, CEE+17*, CEE+18, CEE+19, CEE+20, CEE+22, CEE+23, CEE+26 , CEE+28, CEE+31, CEE+34, CEE+35, CEE+36, CEE+41, CEE+43, CEE+44, CEE+45, CEE+46 , CEE+49, CEE+50, CEE+51, CEE+52, CEE+53, CEE+57, CEE+64, CEE+67, CEE+70, CEE+73 , CEE+78, CEE+79, CEE+86, CEE+87, CEE+88, CEE+94, CEE+95 |
SEGPOS | CUSSEG+1~ |
SEGREQ | CUSSEG+1~, CSE+21*, CSE+26, CSE+29 |
STDASAP | CUSSEG+1~, CSL+1, CSE+2, CSE+27, CUSELM+1~, CEL+1, CEE+2, CEE+43, CEE+47, CEE+94 |
STDASAP( | CSE+18, CSE+26*, CEE+26, CEE+44*, CEE+45*, CEE+46* |
>> VALMBCK | SHOWHID+2*, EXIT+1* |
>> VALMBG | SHOWHID+6* |
>> VALMCNT | BACK+2 |
>> VALMSG | SHOWHID+4*, COPYVER+2*, COPYVER+7*, EDTDELIM+2*, CUSSEG+3*, CUSELM+3*, SECKEY+1*, LOCK+2* |
VERS | COPYVER+1~, CV+3 |
VERS( | CV+4, CV+7 |
X | COPYVER+1~, CV+6*, CV+7, CV+8*, CV+9, CV+10*, EDTDELIM+1~, EDTDELIM+10*, EDTDELIM+11, EDTDELIM+15* , EDTDELIM+16, EDTDELIM+18, EDTDELIM+21*, EDTDELIM+22, EDTDELIM+24, EDTDELIM+26, EDTDELIM+30*, CUSSEG+1~, CSE+13, CSE+14* , CSE+15, CSE+16*, CSE+17, CSE+20*, CSE+21, CSE+22*, CSE+39*, CSE+40, CSE+43*, CSE+44 , CSE+45*, CSE+46, CSE+47, CSE+48, CSE+49, CSE+50, CSE+52*, CSE+53, CSE+55*, CSE+57 , CSE+59, CSE+60, CSE+65*, CSE+66, CSE+70, CSE+72, CSE+74, CSE+76, CSE+77, CSE+79* , CUSELM+1~, CEE+14, CEE+15, CEE+17*, CEE+19, CEE+21, CEE+28*, CEE+29, CEE+31*, CEE+32 , CEE+36*, CEE+37, CEE+38*, CEE+64*, CEE+65, CEE+67*, CEE+68, CEE+70*, CEE+71, CEE+73* , CEE+74, CEE+88*, CEE+89, CEE+91*, ASKFLD+5~, ASKFLD+8, ASKFLD+9, ASKFLD+10, ASKFLD+12, ASKMEXPR+7* , ASKMEXPR+9*, ASKMEXPR+10*, ASKMEXPR+11, ASKMEXPR+12, ASKMEXPR+13, ASKMEXPR+14, ASKMEXPR+15, ASKMEXPR+17 |
Y | COPYVER+1~, CV+4, CV+5, CUSSEG+1~, CSE+33*, CSE+34, CUSELM+1~, CEE+56*, CEE+57, ASKFLD+5~ , ASKFLD+11 |