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: PRCSEA

Package: IFCAP

Routine: PRCSEA


Information

PRCSEA ;WISC/SAW/DXH/BM/SC/DAP - CONTROL POINT ACTIVITY EDITS ;5/8/13 15:31

Source Information

Source file <PRCSEA.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**81,147,150,174,196,204**;Oct 20, 2000;Build 14
ENRS ;ENTER REQ
ENRS0
TYPE ;
EN1
CMDAT
EDRS ;EDIT REQ
; following line commented out by PRC*5*140 - user responses not used to limit selection of txn and sometimes resulted in bad info being set into the selected txn
; S PRCSK=1 D EN1F^PRCSUT(1) G W2:'$D(PRC("SITE")),EXIT:Y<0 ; ask sta,FY,QRTR,CP ; prc*5*197
; if the above line is reactivated, programmer should note that the transaction selected may not be of the same FY,QRTR,sta, subst, and CP specified by the user
ED1
COMDT
CT ;CANCEL A (PERMANENT) TRANS
CT1
DT ;DELETE A (TEMPORARY) TRANS
DT1
DOR ; Date of Request
FORM ;*81 Allow user to change txn to a valid form and check site parameter to see if issue books are allowed
BACKOUT(TRNNAME,TRNDA) ;
W2
W3
W4
W5
W6
CKPRM
EXIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7)," Must be a new (unique) entry."
  • Line Location: ENRS0+6
Function Call: WRITE
  • Prompt: !!,PRCVY,!
  • Line Location: ENRS0+9
Function Call: WRITE
  • Prompt: !,"File is being accessed...try a different transaction number or try later"
  • Line Location: ENRS0+11
Function Call: WRITE
  • Prompt: !!,"This transaction is assigned temporary transaction number: ",T(2)
  • Line Location: TYPE+1
Function Call: WRITE
  • Prompt: "??"
  • Line Location: TYPE+10
Function Call: WRITE
  • Prompt: !!
  • Line Location: CMDAT+9
Function Call: WRITE
  • Prompt: !,"File is being accessed...please try later"
  • Line Location: EDRS+10
Function Call: WRITE
  • Prompt: !,"The form type for this transaction is ",$P($G(^PRCS(410.5,X,0)),"^"),!
  • Line Location: EDRS+28
Function Call: WRITE
  • Prompt: !!
  • Line Location: EDRS+29
Function Call: WRITE
  • Prompt: !!
  • Line Location: COMDT+9
Function Call: WRITE
  • Prompt: !,"File is being accessed...please try later"
  • Line Location: CT1+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: CT1+5
Function Call: WRITE
  • Prompt: !,"Enter comments for this cancellation",!
  • Line Location: CT1+17
Function Call: WRITE
  • Prompt: !!
  • Line Location: CT1+25
Function Call: WRITE
  • Prompt: !,"File is being accessed...please try later"
  • Line Location: DT+8
Function Call: WRITE
  • Prompt: !,"Okay....."
  • Line Location: DT1+6
Function Call: WRITE
  • Prompt: "It's deleted"
  • Line Location: DT1+14
Function Call: WRITE
  • Prompt: !!
  • Line Location: DT1+16
Function Call: WRITE
  • Prompt: !,PRCVY1,!
  • Line Location: FORM+4
Function Call: WRITE
  • Prompt: !,"Please enter another form type",!
  • Line Location: FORM+5
Function Call: WRITE
  • Prompt: !!,"WARNING: WITHOUT A FORM TYPE, TRANSACTION """,TRNNAME,""" WILL BE DELETED!",$C(7)
  • Line Location: BACKOUT+2
Function Call: WRITE
  • Prompt: !,"Are you sure you want to delete this transaction"
  • Line Location: BACKOUT+3
Function Call: READ
  • Variable: X
  • Timeout: 5
  • Line Location: W2+0
Function Call: WRITE
  • Prompt: !!,"You are not an authorized control point user.",!,"Contact control point official"
  • Line Location: W2+0
Function Call: WRITE
  • Prompt: !!,"This transaction is assigned temporary transaction number: ",X
  • Line Location: W3+1
Function Call: WRITE
  • Prompt: !!,"Would you like to ",T," another transaction"
  • Line Location: W4+0
Function Call: WRITE
  • Prompt: !!,"Would you like to ",T," another request"
  • Line Location: W5+0
Function Call: WRITE
  • Prompt: !!,"For the transaction number, use an uppercase alpha as the first character,",!," and then 2-15 alphanumerics, as in 'ADP1'.",!
  • Line Location: W6+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRCS(410 - [#410] Classic Fileman Calls
^PRCS(410.5 - [#410.5] Classic Fileman Calls
^PRC(443 - [#443] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call