ORDD41 ;slc/KCM,MKB-Build menus in XUTL (file 101.41) ;10:36 AM 11 Feb 1999
Source file <ORDD41.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SET(DLG) | ; -- create dialog menu in ^XUTL("XQORM")
|
|
| KILL(DLG) | ; -- Cleanup ^XUTL("XQORM")
|
|
| UP(X) | ;Convert X to upper case
|
|
| REDO | ; -- Rebuild menu in ^XUTL when changed
|
|
| REDOM | ; -- Rebuild menu(s) in ^XUTL when DISPLAY TEXT changed
|
|
| REDOX | ; -- Rebuild menu in ^XUTL when ITEMS changed
|
|
| TREE | ; -- Ck menu tree to ensure new item is not an ancestor
; Input Xform for Item field #2 of Items subfile #101.412 ; expecting DA, DA(1), X from FileMan |
|
| TREE1 | ; -- Look for X in ancestors
|
|
| TREE2 | ; -- Back up another level
|
|
| LIST(MENU) | ; -- List items on MENU for ?-help in editor
|
|
| LOCK(MENU) | ; -- Lock [and rebuild?] Order Dialog menu
|
|
| LKQ | ||
| UNLOCK(MENU) | ; -- Unlock Order Dialog menu
|
|
| REBLD(MENU,RES) | ; -- Lock, rebuild Order Dialog menu
|
| Name | Line Occurrences |
|---|---|
| Function Call: READ |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^ORD(101.41 - [#101.41] | Classic Fileman Calls |