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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PRCBSA

Package: IFCAP

Routine: PRCBSA


Information

PRCBSA ;WISC@ALTOONA/CTB-BOC EDIT ;4/30/93 3:01 PM

Source Information

Source file <PRCBSA.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
OUT
REA ;REACTIVATE AN INAACTIVE BOC
DEA ;DEACTIVATE AN A BOC
ADD ;ADD NEW BOC
AD2
AD1
Q
RW ;
L
H
E
D
D1
PRT1 ;PRINT BOCS LISTING

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DEA+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ADD+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ADD+4
Function Call: WRITE
  • Prompt: !!,"BOC NAME: ",Y
  • Line Location: AD2+0
Function Call: WRITE
  • Prompt: !?9
  • Condition for execution: $X>48
  • Line Location: AD2+0
Function Call: WRITE
  • Prompt: "// "
  • Line Location: AD2+0
Function Call: READ
  • Variable: X
  • Timeout: $S($D(DTIME):DTIME,1:300)
  • Line Location: AD2+2
Function Call: WRITE
  • Prompt: !,$C(7),"Enter BOC NAME, do not include the NUMBER"
  • Line Location: AD2+4
Function Call: WRITE
  • Prompt: !
  • Line Location: AD1+0
Function Call: READ
  • Prompt: " Replace "
  • Variable: X
  • Timeout: $S($D(DTIME):DTIME,1:300)
  • Line Location: L+0
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>50
  • Line Location: L+0
Function Call: WRITE
  • Prompt: " Deletion is not authorized.",$C(7)
  • Line Location: L+0
Function Call: WRITE
  • Prompt: $C(7)," ??"
  • Line Location: L+3
Function Call: READ
  • Prompt: " With "
  • Variable: X
  • Timeout: $S($D(DTIME):DTIME,1:300)
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $C(7),"??"
  • Line Location: H+0
Function Call: WRITE
  • Prompt: S
  • Condition for execution: '$T $C(7) I DG'=Y
  • Line Location: D+0
Function Call: WRITE
  • Prompt: !?3
  • Line Location: D+0
Function Call: WRITE
  • Prompt: X
  • Line Location: D+0
Function Call: WRITE
  • Prompt: !,"Use Standard Filemanager 'Replace With' Techniques to edit the data."
  • Line Location: D1+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRCD(420.2 - [#420.2] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call