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

Package: Medicine

Routine: MCNP2CHK


Information

MCNP2CHK ;HIRMFO/DAD-UNIQUE PROVIDER NAME PRINT ;4/18/96 08:33

Source Information

Source file <MCNP2CHK.m>

Entry Points

Name Comments DBIA/ICR reference
TASK ;
PRINT ;
EXIT ;
XIT
GETDATA ;
GETMULT ;
SETTMP(MC200) ;
PAUSE ;
HEADER ;
FILEFLD ;;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: MCNP2CHK+3
Function Call: WRITE
  • Prompt: !!,"Task queued, task number ",ZTSK,"."
  • Line Location: MCNP2CHK+8
Function Call: WRITE
  • Prompt: !!,"Task not queued."
  • Line Location: MCNP2CHK+9
Function Call: WRITE
  • Prompt: !!,^TMP("MC",$J,MCFILE)," file (#",MCFILE,")"
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: !?5,^TMP("MC",$J,MCFILE,MCFLD)," field (#",MCFLD,")"
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: !?10,"*** NONE ***"
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: !?10,MCPROV,?50,$J($P(MCDATA,U),6),?65,$S($P(MCDATA,U,2):"YES",1:"NO")
  • Line Location: PRINT+17
Function Call: WRITE
  • Prompt: !?15,"Unique New Person Names in Medicine Provider Fields"
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: ?68,MCTODAY,!?68,"Page: ",MCPAGE
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,"File Name (Number)"
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !?5,"Field Name (Number)"
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !?10,"New Person Name",?50,"IEN",?65,"Provider Key",!,MCUNDL
  • Line Location: HEADER+7
Info |  Source |  Entry Points |  Interaction Calls