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

Package: Generic Code Sheet

Routine: GECSVFY1


Information

GECSVFY1 ;WISC/RFJ-verify and check code sheet parameters (check) ;18 Nov 93

Source Information

Source file <GECSVFY1.m>

Entry Points

Name Comments DBIA/ICR reference
CHECK ; check batch type

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,%,!,"checking batch type: ",$P(GECSD,";")
  • Line Location: CHECK+3
Function Call: WRITE
  • Prompt: !?10,"*** UNABLE TO ADD BATCH TYPE TO FILE 2101.1."
  • Line Location: CHECK+11
Function Call: WRITE
  • Prompt: !?10,"... BATCH TYPE ADDED TO FILE 2101.1."
  • Line Location: CHECK+12
Function Call: WRITE
  • Prompt: !?5,$J(GECSERR,2),". ERROR -- MAX CODE SHEETS PER MESSAGE SHOULD EQUAL '",$P(GECSD,";",2),"' [NOT '",$P(GECSD1,"^",3),"']"
  • Line Location: CHECK+16
Function Call: WRITE
  • Prompt: !?10,"... FIXING MAX CODE SHEETS PER MESSAGE."
  • Line Location: CHECK+17
Function Call: WRITE
  • Prompt: !?5,$J(GECSERR,2),". ERROR -- SYSTEM ID SHOULD EQUAL '",$P(GECSD,";",3),"' [NOT '",$P(GECSD1,"^",4),"']"
  • Line Location: CHECK+19
Function Call: WRITE
  • Prompt: !?10,"... FIXING SYSTEM ID."
  • Line Location: CHECK+20
Function Call: WRITE
  • Prompt: !?5,$J(GECSERR,2),". ERROR -- RECEIVING USER SHOULD EQUAL 'XXX'"
  • Line Location: CHECK+30
Function Call: WRITE
  • Prompt: !?10,"*** UNABLE TO ADD RECEIVING USER 'XXX'."
  • Line Location: CHECK+34
Function Call: WRITE
  • Prompt: !?10,"... RECEIVING USER 'XXX' ADDED."
  • Line Location: CHECK+35
Function Call: WRITE
  • Prompt: !?5,$J(GECSERR,2),". ERROR -- DOMAIN '",$P(GECSD,";",4),"' NOT FOUND IN DOMAIN FILE."
  • Line Location: CHECK+40
Function Call: WRITE
  • Prompt: !?10,"*** UNABLE TO ADD DOMAIN TO DOMAIN FILE."
  • Line Location: CHECK+44
Function Call: WRITE
  • Prompt: !?10,"... DOMAIN ADDED TO DOMAIN FILE."
  • Line Location: CHECK+45
Function Call: WRITE
  • Prompt: !?5,$J(GECSERR,2),". ERROR -- DOMAIN MAIL ROUTER SHOULD EQUAL '",$P(GECSD,";",4),"' "
  • Line Location: CHECK+49
Function Call: WRITE
  • Prompt: !?46
  • Condition for execution: $L(GECSDOM)>5
  • Line Location: CHECK+49
Function Call: WRITE
  • Prompt: "[NOT '",GECSDOM,"']"
  • Line Location: CHECK+49
Function Call: WRITE
  • Prompt: !?10,"... FIXING DOMAIN MAIL ROUTER."
  • Line Location: CHECK+50
Function Call: WRITE
  • Prompt: !?5,$J(GECSERR,2),". ERROR -- TRANSMIT SHOULD BE 'YES' [NOT 'NO']"
  • Line Location: CHECK+52
Function Call: WRITE
  • Prompt: !?10,"... FIXING TRANSMIT (TO YES)."
  • Line Location: CHECK+53
Function Call: WRITE
  • Prompt: !?5,$J(GECSERR,2),". ERROR -- NO MAIL GROUP DEFINED."
  • Line Location: CHECK+61
Function Call: WRITE
  • Prompt: !?5,$J(GECSERR,2),". ERROR -- THE MAIL GROUP '",X,"' NEEDS TO BE SET UP."
  • Line Location: CHECK+62

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GECS(2101.1 - [#2101.1] Classic Fileman Calls
^XMB(3.8 - [#3.8] Classic Fileman Calls
^DIC(4.2 - [#4.2] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call