Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: ENPLS2

Package: Engineering

Routine: ENPLS2


Information

ENPLS2 ;WISC/SAB - Select Items from List ;12/4/07 13:24

Source Information

Source file <ENPLS2.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; entry point
; input global
; ^TMP($J,"SCR)=number of entries in list^screen title
; ^TMP($J,"SCR",0)=col 1 x pos;col 1 hdr^...^col n x pos;col n hdr
; ^TMP($J,"SCR",id)=col 1 value^col 2 value^...^col n value
; output
; optional ENACL( selected items
BLD ; build screen
ACT ; prompt for selection
EXIT ;
EN2(ENGNOFF) ;Entry point to suppress Form Feed at end
SHD ; Screen Header
PYLIST ; Progam and Year list of project applications

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: BLD+6
Function Call: WRITE
  • Prompt: $J(ENID,3)
  • Line Location: BLD+8
Function Call: WRITE
  • Prompt: ?ENF("C"_ENI,"X"),$P(ENX,U,ENI)
  • Line Location: BLD+9
Function Call: WRITE
  • Prompt: !
  • Line Location: ACT+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SHD+1
Function Call: WRITE
  • Prompt: ENF("HD"),?65,"Screen ",ENF("S")," of ",ENF("SM"),!!
  • Line Location: SHD+2
Function Call: WRITE
  • Prompt: "ID#"
  • Line Location: SHD+3
Function Call: WRITE
  • Prompt: ?ENF("C"_ENI,"X"),ENF("C"_ENI,"HD")
  • Line Location: SHD+4
Function Call: WRITE
  • Prompt: !
  • Line Location: SHD+5
Function Call: WRITE
  • Prompt: "---"
  • Line Location: SHD+6
Function Call: WRITE
  • Prompt: ?ENF("C"_ENI,"X"),$E(ENF("DASH"),1,ENF("C"_ENI,"L"))
  • Line Location: SHD+7
Function Call: WRITE
  • Prompt: !
  • Line Location: SHD+8
Function Call: WRITE
  • Prompt: !!,"No Projects matched selection criteria!",!
  • Line Location: PYLIST+17
Info |  Source |  Entry Points |  Interaction Calls